VBA Excel: Zeilenumbruch per Macro in Kommentar

Computer: Software & Programmierung Visual Basic
#1

Hallo,
folgendes hab ich vor:
Ich will aus Workbook A nach Workbook B einen Zellenwert kopieren. Soweit kein Problem. Außerdem will ich weitere Daten aus Workbook A in einen Kommentar einer Zelle in Workbook B schreiben. Das mach ich dann ja quasi so:

wbB.cells(x,y).NoteText wbA.cells(v,w).Value

Die Daten die im Kommentar hinterlegt werden, sollen jetzt noch weiter verwendet werden und in Workbook C kopiert werden. Es handelt sich bei den hinterlegten Daten um Anschriften mit Namen, Straße, sowie PLZ und Ortsangabe. Diese muss ich also wieder auslesen. Nächste Frage ist also, wie ich das wiederum mache.

Dann hab ich noch ne Frage:
Ist es möglich per Macro einen Textumbruch im Kommentar zwischen zb. Straße und PLZ zu bringen. Kann ich den Zeilenumbruch dann per Macro abfragen? Wie würdet ihr die Daten voneinander trennen? Bezeichner mit Sonderzeichen hervorgehoben (z.B."||PLZ||") vielleicht? Die Daten MÜSSEN im Kommentar hinterlegt werden.

Danke schonmal für eure Hilfe.

Mfg, Jan

#2

Ist es möglich per Macro einen Textumbruch im Kommentar
zwischen zb. Straße und PLZ zu bringen. Kann ich den
Zeilenumbruch dann per Macro abfragen? Wie würdet ihr die
Daten voneinander trennen? Bezeichner mit Sonderzeichen
hervorgehoben (z.B."||PLZ||") vielleicht? Die Daten MÜSSEN im
Kommentar hinterlegt werden.

Hallo Jan,

Sub Komment()
Dim T
T = Split(Range("a1").Comment.Text, Chr(10))
Range(Cells(3, 1), Cells(3, UBound(T))) = T
MsgBox UBound(T)
End Sub
'
'oder
'
Sub Komment2()
Dim T
T = Split(Range("a1").NoteText, Chr(10))
Range(Cells(3, 1), Cells(3, UBound(T))) = T
End Sub

Gruß
Reinhard