ich habe gerade mal ein kleines Problem.
Wie kann ich den Kommentar einer Zelle in die rechts danebenstehende Zelle schreiben lassen?
(Es handelt sich um ca. 500 Kommentare also mit kopieren und einfügen gehts nicht)
MfG
Christian
Sub kom()
ActiveSheet.Cells.SpecialCells(xlCellTypeComments).Offset(0, 1).Value = ActiveSheet.Cells.SpecialCells(xlCellTypeComments).Comment.Text
End Sub
Sub kom()
Dim zelle As Range
On Error Resume Next
For Each zelle In Sheets(1).UsedRange
zelle.Offset(0, 1).Value = zelle.Comment.Text
Next
End Sub
Um Kommentare in Excel schnell in eine Zelle zu schreiben oder in benachbarte Zellen zu übertragen, kannst du folgende Schritte ausführen:
Strg + C, um die Zelle zu kopieren.Fehler: Kommentare werden nicht korrekt übertragen.
Fehler: Excel stürzt ab oder reagiert nicht.
Eine weitere Möglichkeit, Kommentare in Excel zu übertragen, ist die Verwendung von VBA (Visual Basic for Applications). Hier ist ein einfacher VBA-Code, um Kommentare auszulesen und in benachbarte Zellen zu schreiben:
Sub kom()
Dim zelle As Range
On Error Resume Next
For Each zelle In Sheets(1).UsedRange
zelle.Offset(0, 1).Value = zelle.Comment.Text
Next
End Sub
Dieser Code durchläuft alle verwendeten Zellen und überträgt die Kommentare in die rechts danebenstehenden Zellen.
Angenommen, du hast in Spalte A eine Liste von Kommentaren, die du in Spalte B einfügen möchtest. Nachdem du die Schritte zur Übertragung der Kommentare ausgeführt hast, sieht deine Tabelle folgendermaßen aus:
| Kommentar (A) | Kommentar (B) |
|---|---|
| Dies ist ein Test | Dies ist ein Test |
| Zweiter Kommentar | Zweiter Kommentar |
| Dritter Kommentar | Dritter Kommentar |
So kannst du effizient mit vielen Kommentaren arbeiten, ohne sie manuell übertragen zu müssen.
1. Wie kann ich Kommentare auslesen und in eine neue Zelle schreiben?
Verwende den oben angegebenen VBA-Code, um Kommentare von einer Zelle in eine benachbarte Zelle zu übertragen.
2. Gibt es eine Möglichkeit, Kommentare in mehreren Zellen gleichzeitig zu kopieren?
Ja, du kannst die Methode „Inhalte einfügen“ verwenden, um Kommentare in mehreren Zellen gleichzeitig zu kopieren, oder den VBA-Code, um sie automatisch zu übertragen.
3. Welche Excel-Versionen unterstützen diese Funktionen?
Die beschriebenen Methoden funktionieren in den meisten modernen Excel-Versionen, einschließlich Excel 2010, 2013, 2016, 2019 und Excel 365.