WCM Forum - Einzelnen Beitrag anzeigen

flinx · 29.08.2004, 16:13

Probier:

Code:

meinstring = "URL; http://www."+Trim(Sheets(1).Range("A1").Text)
ActiveSheet.QueryTables.Add Connection:=meinstring, _
        Destination:=Range("A5")

29.08.2004, 16:13	#2
flinx Inventar Registriert seit: 08.04.2001 Beiträge: 3.101	Probier: Code: meinstring = "URL; http://www."+Trim(Sheets(1).Range("A1").Text) ActiveSheet.QueryTables.Add Connection:=meinstring, _ Destination:=Range("A5")