ich habe folgendes Problem . ich soll Daten aus einer ExcelTabelle auslesen mitweiteren merkmalen versehen und anschließend in eine Batchdatei umwandeln . dies alles soll automatich geschehen!Kann mir bitte einer helfen?
der Code zum auslesen lautet wie folgt..(hab ich aus dem Internet..
Sub IntTextDatei()
Dim intRow As Integer, intColCount As Integer, intCol As Integer
Dim strTmp As String
intColCount = Range("A1").CurrentRegion.Columns.Count
intRow = 1
Open "Test.txt" For Output As #1
Do Until IsEmpty(Cells(intRow, 1))
strTmp = ""
For intCol = 1 To intColCount
If strTmp <> "" Then
strTmp = strTmp & "," & Cells(intRow, intCol)
Else
strTmp = Cells(intRow, intCol)
End If
Next intCol
Print #1, strTmp
intRow = intRow + 1
Loop
Close
MsgBox "Habe die Daten eingelesen!"
End Sub