title image


Smiley Re: Wie bekomme ich Zeilen aus einer txt-Datei in das Worddokument hinein?
Hallo,

geht so. Allerdings Teil 2( zwei Textstrings aus dieser Textdatei...). Welche sollen das denn sein?



Ansonsten so und den Code in den VBA-Editor kopieren:

Sub Test_Z()

Dim sText As String

Dim i As Long

Dim Zeile As String

Dim sPfad As String

'Anpassen

sPfad = "C:\Mein.txt"

Open sPfad For Input As #1

Do While Not EOF(1)

Line Input #1, Zeile

sText = sText & Zeile & vbCrLf

Loop

Close #1

Selection.Range.text = sText

End Sub



Gruß

Artur



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: