txt-Datei per VBA in Excel einlesen
11.01.2005 15:47:09
Christian
ich habe am 21.12. schon mal über das Thema gesprochen und eine gute Antwort erhalten. (Workbooks.OpenText Filename:="...) Danke nochmals.
Inzwischen habe ich einiges ausprobiert, aber es gibt seltsame Fehlermeldungen!
Die Select/Activate-Methode des Range-Objektes...
Hier mein Code:
Private Sub CommandButton4_Click()
Workbooks.OpenText Filename:=(ThisWorkbook.Path & "\test.log")
Columns("C:C").Select
Selection.Replace What:=" *", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False
Range("C43:C52").Select 'hier spinnt er!!!
Selection.Copy
Windows("Test.xls").Activate
Sheets("Tabelle1").Select
ActiveSheet.Paste
End Sub
Vielleicht kann mir jemand sagen, was das soll mit dem Range-Objekt?
Und wie ich es vielleicht besser hinbekomm?
Dankeschön im Voraus
MfG
Christian