Hello. I want help modifying the code to be able to execute a specific code when checking that the worksheet name is on any cell of column A provided there is no space in column b
I am now checking specific cells what is required is to check along columns A and B
I am now checking specific cells what is required is to check along columns A and B
VBA Code:
Sub test()
Dim wkSht As Worksheet
For Each wkSht In Sheets
On Error Resume Next
If Sheets("Sheet1").Range("b2").Value <> "" And Sheets("sheet1").Range("a2").Value = wkSht.Name Then
MsgBox "Available"
Else
End If
Next
Exit Sub
End Sub