Rip1971
Board Regular
- Joined
- Nov 3, 2020
- Messages
- 65
- Office Version
- 365
- Platform
- Windows
Hi,
I am looking for a piece of code that more or less follows this proces. it is to show a status change of userid which is in this cell for further filtering
- select 1 or more cells. click on a button this starts below code. this is a simply color cell code to.
- Add comment to all selected cells with the the current date at that comment
- if there is already a comment in the cell i want to change the comment to the current date at that moment.
who can help me with this.
I am looking for a piece of code that more or less follows this proces. it is to show a status change of userid which is in this cell for further filtering
- select 1 or more cells. click on a button this starts below code. this is a simply color cell code to.
- Add comment to all selected cells with the the current date at that comment
- if there is already a comment in the cell i want to change the comment to the current date at that moment.
VBA Code:
Sub Voorinschrijving(control As IRibbonControl)
'
' Voorinschrijving Macro
'
'
Sheets("Data").Select
ActiveCell.Select
ActiveCell.AddCommentThreaded ("Gepland op:")
With Selection.Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.Color = 15773696
.TintAndShade = 0
.PatternTintAndShade = 0
End With
End Sub
who can help me with this.
Last edited: