Hallo zusammen,
brauche dringen Hilfe. Bekomme beim einlesen einer Datei folgende Zeichen im ersten Feld (Word2010-Vorlage): Ÿþ
Ich bin kein VBA-Profi. Hier der Ausschnitt t aus dem Makro:
Public Function txt_ReadLine(ByVal sFilename As String, ByVal LineToRead As Long) As String
Dim F As Integer
Dim sLine As String
Dim lRow As Long
lRow = 0
If Dir$(sFilename) <> "" Then
' Datei zum Lesen öffnen
F = FreeFile
Open sFilename For Input As #F
While Not EOF(F) And lRow < LineToRead
lRow = lRow + 1
Line Input #F, sLine
Wend
Close #F
End If
If lRow < LineToRead Then sLine = ""
txt_ReadLine = sLine
End Function
Was kann ich tun?
Herzlichen Dank!
Gruß Daniel
|