Hej,
Testade dina förslag, men får det inte till att funka.
Så här ser min befintliga kod ut:
Public Com1
Private Sub Worksheet_Change(ByVal Target As Range)
Com1 = Range("X23").Value
On Error Resume Next
If Target.Address = "$U$30" Then
If Target.Value = 1 Then
Target.Offset(0, -10).AddComment
Target.Offset(0, -10).Comment.Text Com1
Target.Offset(0, -10).Comment.Visible = True
Else: Target.Offset(0, -10).ClearComments
End If
End If
End SubKoden infogar en kommentar om värdet i U30 är = 1. Jag vill dock att kommentaren ska infogas om datumet i U30 har passerat dagens datum (åååå-mm-dd). Detta vill jag även ska funka från rad 30 till 60, i kolumn U.
Är det möjligt? Jag är ganska grön......
Tack!
//Gustav