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