verzeichnispfad vereinfachen
23.06.2005 21:11:16
mehmet
kann man das folgende auch geschickter coden?
Private Sub Workbook_Open()
Sheets("GoTo").Select
Range("A1").Select
GetObject ("C:\Dokumente und Einstellungen\SiM\Desktop\KainUndAbel\Daten.xls")
End Sub
so, dass man nicht nach dem pfad eingeben muss.
statt dessen nur sagt, hier in diesem verzeichnis ist die datei daten.xls.
dank und gruss
mehmet
Anzeige