SVERWEIS mit einem Platzhalter für Pfad- und Datein=?ISO-8859-1?Q?amenangabe_in_einem_Makro_m=F6glich?????=

13/12/2007 - 14:16 von Walter | Report spam
Hallo,

ich möchte einen SVERWEIS variabel halten, weil für jeden Monat eine
neue Datei kreiert wird und ich immer aus der neuesten Werte
übernehmen muss.
Kann man dieses über ein Makro Werte in Zellen eintragen lassen?
Zur Verdeutlichung gebe ich mal ein Beispiel:
Pfad = cells(2, 2)
Dateiname = cells(2, 3)
Pfad_Dateiname = Pfad&"\"&Dateiname
Blatt = cells(2, 4)
"=VLOOKUP(RC1,'[Pfad_Dateiname]Blatt'!B2:X600,20,false)"

Kann mir jemand helfen?

Gruß
Walter
 

Lesen sie die antworten

#1 Wolfgang Kutsche
13/12/2007 - 17:48 | Warnen spam
Hallo Walter,

hier das Makro:

Sub FormelAnpassen()
Pfad = Cells(2, 2)
Dateiname = Cells(2, 3)
Blatt = Cells(2, 4)
Range("B21").FormulaR1C1 = _
"=VLOOKUP(RC[-1],'" & Pfad & "\[" & Dateiname & "]" _
& Blatt & "'!R2C2:R600C24,20,FALSE)"
End Sub

Das Suchkriterium steht in Zelle A21.
Die gewünschte Formel in B2.

Gruß Wolfgang
WinXP Home SP2, Office 2003 SP2
http://www.wk-bau-edv.de


"Walter" wrote:

Hallo,

ich möchte einen SVERWEIS variabel halten, weil für jeden Monat eine
neue Datei kreiert wird und ich immer aus der neuesten Werte
übernehmen muss.
Kann man dieses über ein Makro Werte in Zellen eintragen lassen?
Zur Verdeutlichung gebe ich mal ein Beispiel:
Pfad = cells(2, 2)
Dateiname = cells(2, 3)
Pfad_Dateiname = Pfad&"\"&Dateiname
Blatt = cells(2, 4)
"=VLOOKUP(RC1,'[Pfad_Dateiname]Blatt'!B2:X600,20,false)"

Kann mir jemand helfen?

Gruß
Walter

Ähnliche fragen