|
Help with code that finds a sheet's name
Hi.. Below is part of some code I'm running.. This part: InStr(1, .Name, "OT", vbTextCompare) Call PrintareaOT2 is running when the "Other Deductions" workheet is active.. so I am asumming it's picking up the OT in the Other Deductions name. Is there a way to have this code check the sheet's name. The reason for not identifying the exact names of the sheets is because there can be multiple sheets with the same name ...they just have numbers after them.... like Other Deductions (2).. and so on ... and OT (2) and so on... *********************** With ActiveSheet If InStr(1, .Name, "OT", vbTextCompare) Then Call PrintareaOT2 End If If InStr(1, .Name, "Other Deductions", vbTextCompare) Then Call PrintareaDeductions2 End If End With As Always.. thanks in advance!! Kimberly |
Help with code that finds a sheet's name
Maybe you can just search for more of the name:
If InStr(1, .Name, "OT (", vbTextCompare) Then KimberlyC wrote: Hi.. Below is part of some code I'm running.. This part: InStr(1, .Name, "OT", vbTextCompare) Call PrintareaOT2 is running when the "Other Deductions" workheet is active.. so I am asumming it's picking up the OT in the Other Deductions name. Is there a way to have this code check the sheet's name. The reason for not identifying the exact names of the sheets is because there can be multiple sheets with the same name ...they just have numbers after them.... like Other Deductions (2).. and so on ... and OT (2) and so on... *********************** With ActiveSheet If InStr(1, .Name, "OT", vbTextCompare) Then Call PrintareaOT2 End If If InStr(1, .Name, "Other Deductions", vbTextCompare) Then Call PrintareaDeductions2 End If End With As Always.. thanks in advance!! Kimberly -- Dave Peterson |
Help with code that finds a sheet's name
An added thought:
If you also have a sheet named "OT" then If .Name = "OT" or InStr(1, .Name, "OT (", vbTextCompare) = 1 Then -- Regards, Tom Ogilvy "Dave Peterson" wrote in message ... Maybe you can just search for more of the name: If InStr(1, .Name, "OT (", vbTextCompare) Then KimberlyC wrote: Hi.. Below is part of some code I'm running.. This part: InStr(1, .Name, "OT", vbTextCompare) Call PrintareaOT2 is running when the "Other Deductions" workheet is active.. so I am asumming it's picking up the OT in the Other Deductions name. Is there a way to have this code check the sheet's name. The reason for not identifying the exact names of the sheets is because there can be multiple sheets with the same name ...they just have numbers after them.... like Other Deductions (2).. and so on ... and OT (2) and so on... *********************** With ActiveSheet If InStr(1, .Name, "OT", vbTextCompare) Then Call PrintareaOT2 End If If InStr(1, .Name, "Other Deductions", vbTextCompare) Then Call PrintareaDeductions2 End If End With As Always.. thanks in advance!! Kimberly -- Dave Peterson |
Help with code that finds a sheet's name
Thanks Tom!
That did the trick.. :) "Tom Ogilvy" wrote in message ... An added thought: If you also have a sheet named "OT" then If .Name = "OT" or InStr(1, .Name, "OT (", vbTextCompare) = 1 Then -- Regards, Tom Ogilvy "Dave Peterson" wrote in message ... Maybe you can just search for more of the name: If InStr(1, .Name, "OT (", vbTextCompare) Then KimberlyC wrote: Hi.. Below is part of some code I'm running.. This part: InStr(1, .Name, "OT", vbTextCompare) Call PrintareaOT2 is running when the "Other Deductions" workheet is active.. so I am asumming it's picking up the OT in the Other Deductions name. Is there a way to have this code check the sheet's name. The reason for not identifying the exact names of the sheets is because there can be multiple sheets with the same name ...they just have numbers after them.... like Other Deductions (2).. and so on ... and OT (2) and so on... *********************** With ActiveSheet If InStr(1, .Name, "OT", vbTextCompare) Then Call PrintareaOT2 End If If InStr(1, .Name, "Other Deductions", vbTextCompare) Then Call PrintareaDeductions2 End If End With As Always.. thanks in advance!! Kimberly -- Dave Peterson |
| All times are GMT +1. The time now is 09:16 AM. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com