Im trying to count the empty cells, but its counting empty cells that are colored. Any way to not count empty cells that have a color to them.
Sub percentPage()
Dim bcheck As Boolean
Dim myCell
On Error Resume Next
'January
bcheck = Evaluate("isref(Jan_2018!A1)")
If bcheck Then...
This code works great. It creates a new sheet every month. I just want it to stop adding once we get to 2019. Any Ideas?
Sub AddMonthWkst()
Dim ws As Worksheet
Dim strName As String
Dim bcheck As Boolean
On Error Resume Next
strName = Format(Date, "mmm_yyyy")
bcheck =...
bCheck = Len(Sheets("Jan_2018").Name)
If bCheck = True Then
Set myCell = Sheets("Jan_2018")
Trying to see if a worksheet exists and if it does do something and if not skip, but it doesnt skip it always keeps writing on the previous sheet.
We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel
Which adblocker are you using?
Disable AdBlock
Follow these easy steps to disable AdBlock
1)Click on the icon in the browser’s toolbar. 2)Click on the icon in the browser’s toolbar. 2)Click on the "Pause on this site" option.
Go back
Disable AdBlock Plus
Follow these easy steps to disable AdBlock Plus
1)Click on the icon in the browser’s toolbar. 2)Click on the toggle to disable it for "mrexcel.com".
Go back
Disable uBlock Origin
Follow these easy steps to disable uBlock Origin
1)Click on the icon in the browser’s toolbar. 2)Click on the "Power" button. 3)Click on the "Refresh" button.
Go back
Disable uBlock
Follow these easy steps to disable uBlock
1)Click on the icon in the browser’s toolbar. 2)Click on the "Power" button. 3)Click on the "Refresh" button.