What is the Correct Data Type?
The code below keeps failing.
Dim i_pwd As Variant i_pwd = InputBox("Please Enter Password to Unhide Sheet", "Unhide Sheet...") If i_pwd = "" Then Exit Sub End If Select Case LCase(i_pwd) Case Is = "ryan72" Worksheets("Ryan - Summary").Visible = True Sheets("Ryan - Summary ").Select A message pops up saying, 'Incorrect Password...' I know the password is correct, I am not sure about the Data Type though. Can someone please give me some guidance? Thanks so much, Ryan--- -- RyGuy |
What is the Correct Data Type?
This Data Type appears to be working:
Dim i_pwd As String I could swear that In tried it before and it didn't work. I guess I posted my question too quickly; a little trial and error would have revealed a solution in the same amount of time. Thanks, Ryan--- -- RyGuy "ryguy7272" wrote: The code below keeps failing. Dim i_pwd As Variant i_pwd = InputBox("Please Enter Password to Unhide Sheet", "Unhide Sheet...") If i_pwd = "" Then Exit Sub End If Select Case LCase(i_pwd) Case Is = "ryan72" Worksheets("Ryan - Summary").Visible = True Sheets("Ryan - Summary ").Select A message pops up saying, 'Incorrect Password...' I know the password is correct, I am not sure about the Data Type though. Can someone please give me some guidance? Thanks so much, Ryan--- -- RyGuy |
What is the Correct Data Type?
I don't think it was the declaration--although I would have use "as String",
too. I don't think you typed in the correct password in the inputbox. Or something else happened in the part of your code that you didn't share. ryguy7272 wrote: This Data Type appears to be working: Dim i_pwd As String I could swear that In tried it before and it didn't work. I guess I posted my question too quickly; a little trial and error would have revealed a solution in the same amount of time. Thanks, Ryan--- -- RyGuy "ryguy7272" wrote: The code below keeps failing. Dim i_pwd As Variant i_pwd = InputBox("Please Enter Password to Unhide Sheet", "Unhide Sheet...") If i_pwd = "" Then Exit Sub End If Select Case LCase(i_pwd) Case Is = "ryan72" Worksheets("Ryan - Summary").Visible = True Sheets("Ryan - Summary ").Select A message pops up saying, 'Incorrect Password...' I know the password is correct, I am not sure about the Data Type though. Can someone please give me some guidance? Thanks so much, Ryan--- -- RyGuy -- Dave Peterson |
What is the Correct Data Type?
I'm fairly certain that I typed the correct password. I thought it had
something to do with the number, the 72-part. I tried it with another password, such as 'showryan', and that worked, but the 'ryan72' didn't work...at least at first. I thought the 72-part was not considered text so it wouldn't work as a String. I don't know what the problem was, but it appears to be resolved now. Thanks, for getting back to me Dave. Regards, Ryan--- -- RyGuy "Dave Peterson" wrote: I don't think it was the declaration--although I would have use "as String", too. I don't think you typed in the correct password in the inputbox. Or something else happened in the part of your code that you didn't share. ryguy7272 wrote: This Data Type appears to be working: Dim i_pwd As String I could swear that In tried it before and it didn't work. I guess I posted my question too quickly; a little trial and error would have revealed a solution in the same amount of time. Thanks, Ryan--- -- RyGuy "ryguy7272" wrote: The code below keeps failing. Dim i_pwd As Variant i_pwd = InputBox("Please Enter Password to Unhide Sheet", "Unhide Sheet...") If i_pwd = "" Then Exit Sub End If Select Case LCase(i_pwd) Case Is = "ryan72" Worksheets("Ryan - Summary").Visible = True Sheets("Ryan - Summary ").Select A message pops up saying, 'Incorrect Password...' I know the password is correct, I am not sure about the Data Type though. Can someone please give me some guidance? Thanks so much, Ryan--- -- RyGuy -- Dave Peterson |
All times are GMT +1. The time now is 04:07 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com