Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Sverweis mit Variablen bei VBA Programmierung

Sverweis mit Variablen bei VBA Programmierung
24.06.2007 19:57:00
Sebastian
Ich möchte in einem Makro in eine Zelle eine Sverweis Formel bringen und die Datei und das Register als Variable in die Formel eintragen:
ActiveCell.FormulaR1C1 = _
"=VLOOKUP(RC2,'[Auftraggeber aus SAP.xls]Auftraggeber aus SAP'!R2C1:R9999C24,8,FALSE)"
Also die Datei Auftraggeber aus SAP.xls und das Register Auftraggeber aus SAP sollen als Variable eintragbar sein:
Ich denke ich muss dabei die Variablen wie folgt definieren:
Dim SAPDatei As Object
Dim SAPRegister As Object
und dann "aktivieren":
Set SAPDatei = ActiveWorkbook
Set SAPRegister = ActiveWorksheet
und dann in die Formel eintragen:
ActiveCell.FormulaR1C1 = _
"=VLOOKUP(RC2,'[SAPDatei]SAPRegister'!R2C1:R9999C24,8,FALSE)"
Das funktioniert aber nicht. Woran liegts? Syntax? Oder geht das gar nicht?
Nachdem ich mir daran die Zähne ausgebissen habe, wäre ich für einen Tipp sehr dankbar
Sebastian

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Sverweis mit Variablen bei VBA Programmierung
24.06.2007 20:24:00
Beverly
Hi Sebastian,
ich kann den Code jetzt nicht testen, aber vom Prinzip her sollte es so funktionieren
ActiveCell.FormulaR1C1 = _
"=VLOOKUP(RC2,'[" & SAPDatei & "]" & SAPRegister & "'!R2C1:R9999C24,8,FALSE)"
________________________________________

Anzeige
AW: Sverweis mit Variablen bei VBA Programmierung
24.06.2007 20:28:00
Josef
Hallo Sebastian,
in der Formel kannst du nicht das Objekt übergeben sondern einen String der den Namen des Objektes trägt.
Ungetestet:

Dim SAPDatei As String, SAPRegister As String
SAPDatei = ActiveWorkbook.Name
SAPRegister = ActiveWorksheet.Name
ActiveCell.FormulaR1C1 = _
"=VLOOKUP(RC2,'[" & SAPDatei & "]" & SAPRegister & "'!R2C1:R9999C24,8,FALSE)"


Gruß Sepp

Anzeige
;

Forumthreads zu verwandten Themen

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige