mit den folgenden Makro wird in Zelle A1 der Bereich B5:N8 als Kommentar angezeigt..........
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
Dim Zelle As Range
Dim Ausgabe As String
Ausgabe = ""
For Each Zelle In Range("B5:N8")
Ausgabe = Ausgabe & Zelle
Next
With Range("A1")
If .Comment Is Nothing Then
.AddComment
End If
.Comment.Text Text:=""
.Comment.Text Text:=Ausgabe
End With
End Sub
....gibt es eine Möglichkeit im selben Tabellenblatt das ganze mit mehreren Bereichen zu machen, und wie müsste das aussehen ?
in Zelle A1 soll der Bereich von B5:N8
in Zelle A2 der Bereich von C7:D9
in Zelle A3 der Bereich von H5:L9
.........
..........
angezeigt werden. Wie müsste ich das Makro dan Schreiben.
Viele Grüße Werner