title image


Smiley Re: Excel-Datei öffnen, Fehler wenn schon offen (VBA)
Hallo Rüdiger,ob es eleganter ist, bezweifle ich, aber angesichts der Uhrzeit denke ich mal, daß es vertretbar ist. Was meinst Du dazu:Dim strDateiPfad$, strDateiname$, strTemp$strDateiPfad = "C:\eigene dateien\test\"strDateiname = "test.xls"On Error GoTo weiterstrTemp = Workbooks(strDateiname).NameGoTo losgehtsweiter:If Dir(strDateiPfad & strDateiname) = "" Then Application.Dialogs(xlDialogOpen).Show Else Workbooks.Open Filename:=strDateiPfad & strDateinamelosgehts:Viele GrüßeJörgFragen zu Excel, Access oder Word?EWAF-FAQ-Seiten und www.joerglorenz.de durchsuchen:


geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: