"Splash" screen not displaying correctly when opening.

[Nitro2481]

Hi Guys,

I have a workbook that has a userform on it. So as you know this allows different people login and therefore display different sheets depending on who logs in. While waiting for the person to log in the workbook opens on the "Splash" screen. Sheet number 16. The problem is for some reason every second time the workbook is opened the the screen does a little flicker prior to opening the splash page then it settles on the splash page with cells P2 & R2 selected asking for username & password for someone to login. Due to this the page is displaying colmun G - Y and half the message on the splash screen is hanging off the page on column A-G.

I have attached my "this workbook" code to see if you can see anything that could cause this. This only happens every second time the workbook is opened. Every other time I open it it does not do the flicker and displays it properly. This is very annoying. I have highlighted in red the most recent changes I made to the code before this happened. Any help greatly appreciated. User name John, Password "test"

Update**
I have had someone using excel 2010 look at this attachment and they are not getting my error, I am getting the error on my work pc (2003) and my personal laptop which has both 2003 + 2007 and I am getting the error on both these versions. I wonder if someone using either of these versions could take a look and see if they are experiencing the same issues.

This is the "This Workbook" Code

Please Login or Register  to view this content.

[AlphaFrog]

I can duplicate your problem with Excel 2003 (Windows 10 64-bit). I narrowed down the problem to one line in the Workbook_Open event procedure in the ThisWorkbook code module. If you comment out the Hide columns line, the problem goes away. I'm at a loss to explain why.

Please Login or Register  to view this content.

Do you really need to force those columns hidden? Or perhaps you could hide them in the Workbook_BeforeClose procedure.

[Nitro2481]

Hi Alphafrog,

I recognise the name, think you have helped me beofre. Thank you.

The idea behind it is, when user 1 logs in the numbers "1234" are input into a specific cell. This then triggers all columns to be visible. When any other user logs in this particular cell is cleared of the "1234" therefore hiding certain sensitive columns. However I have commented out the red line above, on the effected sheets and now my splash sheet problem is solved and the columns are still hiding and unhiding. To be honest, I'm not very well up on VBA. Everything I have done to date has been thanks to input by people like yourself. What I did was I put the below code on every sheet to ensure that everytime the workbook was saved or closed every sheet would revert back to protected incase it had been unprotected for whatever reason. (probably a much better way of doing this once on this workbook rather than on every sheet?). But in my newbieness I think I copied the code from the VBA in sheet 2 (which contained the lines below in red) and I pasted them on all the sheets. I can see that it is already in the codes in sheet 2 so probably having it in "this workbook" aswell was screwing everything up. But all seems to be working great now. Really appreciate the help.

Thanks

Matt

Please Login or Register  to view this content.