Hello,

I have this code for Checkbox on Userform :

Me.CheckBox1 = Application.WorksheetFunction.CountA(Sheet1.Range("C3,C4")) = 2

It tickes Checkbox If cell values are not blank. Code works great, but I need that code for several rows and columns, and different sheets (It's a monthly worksheet). Is there any way that I could drag code like formulas, or do I have to type this code for each Checkbox ?

Any suggestions ?