B
Bill
Hello,
I have some code that looks at sheetnames to see if any have been deleted.
The code is shown below. The problem I have is that if a sheet is named a
number,the code does not recognize the name: For example, suppose I have
sheet names 3 and the number 3 in cells(icount,4) in the code below. The
line:
If shtname.name = cells(icount,4) returns false.
How can I get around this? The code is below.
Thanks.
Bill
For ICount = 2 To LR
Foundit = "No"
For Each Shtname In Sheets
If Shtname.Name = Cells(ICount, 4) Then
Foundit = "Yes"
Exit For
End If
Next Shtname
If Foundit = "No" Then
Cells(ICount, 4).Delete shift:=xlUp
i = i - 1
End If
Next ICount
End If
I have some code that looks at sheetnames to see if any have been deleted.
The code is shown below. The problem I have is that if a sheet is named a
number,the code does not recognize the name: For example, suppose I have
sheet names 3 and the number 3 in cells(icount,4) in the code below. The
line:
If shtname.name = cells(icount,4) returns false.
How can I get around this? The code is below.
Thanks.
Bill
For ICount = 2 To LR
Foundit = "No"
For Each Shtname In Sheets
If Shtname.Name = Cells(ICount, 4) Then
Foundit = "Yes"
Exit For
End If
Next Shtname
If Foundit = "No" Then
Cells(ICount, 4).Delete shift:=xlUp
i = i - 1
End If
Next ICount
End If