Application.Dialogs(xlDialogOpen).show problem
14.11.2006 00:51:14
selo
in meinem Workbook soll der anwender mittels
Sub weiter()
Application.Dialogs(xlDialogOpen).show "*.xls"
Workbooks("planung.xls").Sheets("Tabelle1").Activate
With Workbooks("planung.xls").Sheets("Tabelle1")
.Columns("A:o").Copy
Workbooks("tool.xls").Sheets("Tabelle1").Range("b1")
End With
End Sub
die möglichkeit haben eine exeldatei auszuwählen aus der später daten importiert werden.
jedoch stellt sich für mich nun die frage wie ich die Fehlermeldung abfange, falls jemand auf abbrechen drückt und nicht eine bzw. die Planung.xls datei auswählt
ich hoffe ihr versteht was ich meine
gruß
selo