Ich suche nach einem Makro, der die Werte in der Spalte D als Kommentare in die Spalte C einfügt. Dies soll er solange machen, bis die erste leere Zelle in Spalte D kommt.
Wie kann ich das mit VBA tun?
Besten Dank bereits im Voraus!
Sub teste()
Dim Zeile As Long
Zeile = 2
Do While Cells(Zeile, 4) ""
If Not Cells(Zeile, 3).Comment Is Nothing Then
Cells(Zeile, 3).ClearComments
End If
Cells(Zeile, 3).AddComment (CStr(Cells(Zeile, 4).Value))
Zeile = Zeile + 1
Loop
End Sub
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen