Create and auto-populate comments

[T1991]

Good afternoon,

Is it possible to create and auto-populate comments in Excel?

If for example I have two sheets and sheet 2 is pulling values from sheet 1 that meet certain criteria, can I automatically create a comment for any values pulled over and then populate it with values from sheet 1 that are in different columns but on the same row?

So sheet 2 pulls the values from A1 and A3 in sheet 1.
Comment boxes are created for each one and is populated with values from:
For A1 - B1, C1, D1
For A3 - B3, C3, D3

Thanks

 

[rlv01]

Is it possible to create and auto-populate comments in Excel?

It is possible using VBA.

 

[T1991]

It is possible using VBA.

What would that look like? I've tried a few things and I can't seem to get anything to work.

 

[rlv01]

Book4
	A	B	C	D
1	Pets	Dog	Cat	Parakeet
2
3	Sky	Sun	Moon	Stars
Sheet1

Sub DoSomething()
    Dim WS1 As Worksheet, WS2 As Worksheet
    Dim S As String

    Set WS1 = Worksheets("Sheet1")
    Set WS2 = Worksheets("Sheet2")

    With WS1.Range("A1")
        .Copy WS2.Range("A1")
        S = .Offset(0, 1).Value & vbCrLf & .Offset(0, 2).Value & vbCrLf & .Offset(0, 3).Value
    End With

    WS2.Range("A1").AddComment S

    With WS1.Range("A3")
        .Copy WS2.Range("A3")
        S = .Offset(0, 1).Value & vbCrLf & .Offset(0, 2).Value & vbCrLf & .Offset(0, 3).Value
    End With

    WS2.Range("A3").AddComment S
End Sub