Hide the X Close Button - Change in direction..

[JJFletcher]

Hello Everyone...

I have a Userform that Auto Launches and is only visible for 10 seconds and Auto Closes ... I am using as a splash...

I would like to know if it is possible to hide the Caption and or X Close button because I need neither because it closes on it's own???



Best Regards,

John

[alansidman]

Open the properties for the UserForm. You should be able to delete the Caption. I don't see any place in the properties to remove the X, however, look at this link

http://www.ozgrid.com/VBA/userform-close.htm

http://www.ozgrid.com/forum/showthread.php?t=40648

[JJFletcher]

Hi Alan,

Thank you for your suggestion.. Unfortunately this will not provide the solution... the Caption and X still remain visible...

The need to hide the Caption and X close button are for my Progress Bar - because the userform auto closes in 10 seconds there is no need for the caption or the X Close button...

Here is my Code for the Progress Bar:

Please Login or Register  to view this content.

Best Regards

John

[YasserKhalil]

Put the following code in standard module

Please Login or Register  to view this content.

And in userform module put the following

Please Login or Register  to view this content.

[JJFletcher]

Hi Yasser,

Good to see you again...

I tried to use the suggested code and got this error:

error1.JPG

Best Regards,

John

[JJFletcher]

Tried this modification but got the following:

error2.JPG

Best Regards,

John

[alansidman]

Maybe this?

http://stackoverflow.com/questions/1...y-progress-bar

[JJFletcher]

Hi Alan,

Modified the code with the suggestion - No change...

Please Login or Register  to view this content.

Best Regards,

John

[JJFletcher]

I found this code but get the following error: Regarding FindWindow

error3.JPG


John

[JJFletcher]

What if we were able to modify the vbFormControlMenu in the Macro...

Please Login or Register  to view this content.

Is there a way to rewrite this so Cancel = True could be replaced somehow with Visible = False..... I tried this but it failed...

Best Regards,

John

[alansidman]

crossposted: http://www.mrexcel.com/forum/excel-q...ml#post4515434

Your post does not comply with Rule 8 of our Forum RULES. Do not crosspost your question on multiple forums without including links here to the other threads on other forums.

Cross-posting is when you post the same question in other forums on the web. The last thing you want to do is waste people's time working on an issue you have already resolved elsewhere. We prefer that you not cross-post at all, but if you do (and it's unlikely to go unnoticed), you MUST provide a link (copy the url from the address bar in your browser) to the cross-post.

Expect cross-posted questions without a link to be closed and a message will be posted by the moderator explaining why. We are here to help so help us to help you!

Read this to understand why we ask you to do this, and then please edit your first post to include links to any and all cross-posts in any other forums (not just this site).

[JJFletcher]

Hello all....

I forgot about rule 8 - I was not getting any response from The Forum on the last question so thought I would address regarding changing the color in another Forum...

Sorry for the mix-up

Best Regards,

John

[bakerman2]

Look at following link to correct function declarations to work on 64-bit systems.
http://www.jkp-ads.com/Articles/apideclarations.asp

[JJFletcher]

Thanks Bakerman2,

I will try to digest this information and see if I can get the code to cooperate.

Best Regards,

John

[romperstomper]

Remember you'll need conditional compilation if you want the code to run on both 32 and 64 bit Office.

Also worth telling people upfront if you're using 64bit Office - it's still relatively rare and will affect any API code as well as what controls you can use in your projects.

[humdingaling]

also the version of excel matters as well

http://www.ozgrid.com/forum/showthread.php?t=85960

[JJFletcher]

Hello Everyone,

When applying the changes - This is the first error received... the highlighted "Blue" - FindWindow is the first error.....

error4.JPG

Here is the current code

Please Login or Register  to view this content.

Best Regards,

John

[bakerman2]

Maybe like this.

Please Login or Register  to view this content.

[JJFletcher]

Unfortunately this did not work.


Any other thoughts?

John

[bakerman2]

I'm really flying blind here since I can't test anything but let's start wit something simple.
Straightforward not too much code in it.
Example file should open userform with no frame on top.

[humdingaling]

running the code i get error in SetWindowLong so i changed it to SetWindowlongPtr instead

Please Login or Register  to view this content.

then second issue i got was about missing Dll entry point

to get around that i changed
this line

Please Login or Register  to view this content.

to

Please Login or Register  to view this content.

after that it works on my system

agree with baker, very hard to test code without having the same system setup

[JJFletcher]

Hi humdingaling and Backerman,

I have attempted to utilize the code but something is not right...

Here is the upload... Going to work - will check back this afternoon!

Best Regards,

John

[bakerman2]

First remove all code from Splash sheet module except for commandbutton.
Try again.
On which line are you getting the error ?

[humdingaling]

you cant really mix and match the way you are trying to do
stick to one method until the API bit is sorted out
as such going with baker's method (as it is much easier to manage). This method is basically taking the menubar away (from what i can tell)

on your "Main"
if you have a caption on the userform it will bring the X back
i commented out the caption

Please Login or Register  to view this content.

deleted whatever was in Initialize2 (this does not work with 2) and added it to just one initialization

Please Login or Register  to view this content.

[JJFletcher]

Hi humdingaling and Backerman,

2 days trying to figure this out and you guys did it...

That did it... Fantastic results and it works

Best Regards,

John

[humdingaling]

glad it worked out in the end

credit goes to bakerman for the source, i just help you debug it to work on your system

[bakerman2]

@ JJFletcher

Good for you.

@ humdingaling

Thanks for kind words and of course the rep.