title image


Smiley VB: automatisches Öffnen von beliebig vielen dateien??????
hallo,wie kann ich unter VB (Excel97-Makro) den untenstehenden code so umändern,daß mir das makro alle in diesem ordner befindlichen dateien mit txt.-endungunabhängig vom dateinamen öffnet???? (irgend eine schleife???)oder eine alternative???????code:Variable: Neudatei = Application.GetOpenFilename("Textdatei,*.txt") Workbooks.OpenText FileName:=Neudatei, _ Origin:=xlWindows, StartRow:=1, DataType:=xlDelimited, TextQualifier:= _ xlDoubleQuote, ConsecutiveDelimiter:=True, Tab:=False, Semicolon:=False, _ Comma:=False, Space:=True, Other:=False, FieldInfo:=Array(Array(1, 9), _ Array(2, 9), Array(3, 1))vielen dank im voraus!!!!

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: