Liebe Community
Ich pröble schon lange und brauche jetzt eure Hilfe! In meiner Anwendung lesen ich den Inhalt eines txt-files aus und erstelle damit ein Excel, welches gespeichert wird.
Mein Code sieht folgendermassen aus:
Nun möchte ich den Inhalt aus den generierten Zellen A und B in einer neuen Zelle C abfüllen. Ich komme nicht weiter und hoffe, ihr könnt mir helfen!
Vielen Dank schon jetzt!
Ich pröble schon lange und brauche jetzt eure Hilfe! In meiner Anwendung lesen ich den Inhalt eines txt-files aus und erstelle damit ein Excel, welches gespeichert wird.
Mein Code sieht folgendermassen aus:
VB.NET-Quellcode
- Using csvParser As New TextFieldParser(FilePath)
- With csvParser
- .SetDelimiters(";")
- .HasFieldsEnclosedInQuotes = True
- Dim header As String = .ReadLine()
- Dim FieldData() As String
- Do While Not .EndOfData
- FieldData = .ReadFields()
- Debug.Print(FieldData(0))
- wert = FieldData(0)
- If wert = "" Then
- wert = Nummer
- Nummer = Nummer + 1
- sheetStandort.Range("A" & iStandort).Value = wert
- Else
- sheetStandort.Range("A" & iStandort).Value = wert
- End If
- iStandort = iStandort + 1
- Loop
- End With
- End Using
- iStandort = 1
- Using csvParser As New TextFieldParser(FilePath)
- With csvParser
- .SetDelimiters(";")
- .HasFieldsEnclosedInQuotes = True
- Dim header As String = .ReadLine()
- Dim FieldData() As String
- Do While Not .EndOfData
- FieldData = .ReadFields()
- Debug.Print(FieldData(1))
- wert = FieldData(1)
- sheetStandort.Range("B" & iStandort).Value = wert
- iStandort = iStandort + 1
- Loop
- End With
- End Using
Nun möchte ich den Inhalt aus den generierten Zellen A und B in einer neuen Zelle C abfüllen. Ich komme nicht weiter und hoffe, ihr könnt mir helfen!
Vielen Dank schon jetzt!