title image


Smiley Re: ... dann rauch' ich im Wald.
Hallo Ramses,



vielen Dank für die Hilfe. Auch an die anderen, die ihre Hilfe in meinen Dienst stellten. Bei EWAF (siehe Header im Forum) habe ich so was gefunden, was Deinem Vorschlag ähnelt. Habe es ein wenig modifiziert und:



Open Pfad & "kx_" & Mid(DateiName, 5, 3) & ".mob" For Output As #1

For Lauf = 1 To AnzZeilen

Print #1, Range("A" & Lauf).Value & ";" & Range("B" & Lauf).Value & ";" & Range("C" & Lauf).Value & ";" & Range("D" & Lauf).Value & ";" & Range("E" & Lauf).Value & ";" & Range("F" & Lauf).Value & ";" & Range("G" & Lauf).Value & ";" & Range("H" & Lauf).Value & ";" & Range("I" & Lauf).Value & ";" & Range("J" & Lauf).Value & ";" & Range("K" & Lauf).Value & ";" & Range("L" & Lauf).Value & ";" & Range("M" & Lauf).Value & ";" & Range("N" & Lauf).Value & ";" & Range("O" & Lauf).Value

DoEvents

Next Lauf

DoEvents

Close

DoEvents



Jetzt klappt's auch mit dem Nachbar.

Also nochmals vielen Dank und einen schönen Sonntag aus dem sonnigen Sachsen.

Thomas

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: