VBA to clear textbox within the dates.

Good Morning everyone.

I am looking for a VBA that would clear all the information in the calendar textbox days. So each month I can just easily push a button that would clear that month full of data. I would greatly appreciate the help.


Thank you

I think the procedure below will do the trick. For what it's worth, though I noticed that you seem to have carefully crafted worksheet cells that are the size of each of your calendar days. Why not put your text in the cells, rather than in the textboxes you've built over the cells? Excel tends to be much more versatile when dealing with cells as opposed to textboxes.

Sub Clear_TextBox()
Dim tbx As Shape

For Each tbx In ActiveSheet.Shapes
    If Not Intersect(tbx.TopLeftCell, Range("F10:T28")) Is Nothing Then
        tbx.TextFrame.Characters.Text = ""
    End If
Next
End Sub

Thank you very much. That worked great and you are right I probably will use the cells instead.