Excel Forum

Can help me to run this userform on 64 bit Office

Ivaylo Iliev

Active Member

Members

Forum Posts: 5

Member Since:
February 25, 2022

Offline

February 25, 2022 - 1:14 am

Need help this to be work on 32 bit and 64 bit office. It is menus in userform. For now it work on 32 bit, but I want to work an on 64 bit, can someone help me to fix it. The problem is when I click on "Show Api Menu" - userfom is appear, but whet I choose any of menus ex: File->NewTask nothing happen.Thank you!

See Answer

Catalin Bombea

Iasi, Romania

Member

Dashboards

Power Query

Power Pivot

Xtreme Pivot Tables

Excel for Decision Making

Excel for Finance

Excel Analysis Toolpak

Power BI

Excel

Word

Outlook

Excel Expert

Excel Customer Service

PowerPoint

Forum Posts: 1939

Member Since:
November 8, 2013

Offline

February 28, 2022 - 4:33 pm

Hi Ivaylo,

The form does not load on my side, this line errors out:

g_lpMyWndProc = SetWindowLong(g_hForm, GWL_WNDPROC, AddressOf HookWinProc) (a data type mismatch error)

That mismatch should be fixed by changing the data type of the arguments for the failing procedure, the form loads now.

I changed this function, the part in red:

Public Declare PtrSafe Function SetWindowLong _
Lib "user32" _
Alias "SetWindowLongA" ( _
ByVal hwnd As Long, _
ByVal nIndex As Long, _
ByVal dwNewLong As LongPtr) _
As Long

Velouria

London or thereabouts

Moderator

Members

Trusted Members

Moderators

Forum Posts: 834

Member Since:
November 1, 2018

Online

February 28, 2022 - 6:59 pm

hWnd should also be LongPtr in that code as it's a handle.

Answers Post

Ivaylo Iliev

Active Member

Members

Forum Posts: 5

Member Since:
February 25, 2022

Offline

February 28, 2022 - 9:32 pm

I make it like you say. The form is appear, but when I try ti choose command nothing happen. Do you know Why?

Catalin Bombea

Iasi, Romania

Member

Forum Posts: 1939

Member Since:
November 8, 2013

Offline

February 28, 2022 - 11:30 pm

Is there a reason for using this menu in a userform?

You have much better options, you can build a custom menu in ribbon, even in runtime if a dynamic menu is needed.

Will work in a Mac as well, not limited to windows as the current code is.

See: https://docs.microsoft.com/en-.....19a3cc94b5

The available controls can be found in: https://interoperability.blob......UI2%5d.pdf

Ivaylo Iliev

Active Member

Members

Forum Posts: 5

Member Since:
February 25, 2022

Offline

March 2, 2022 - 1:37 am

I need some like this.

Attachments

Screenshot-2022-03-01-173204.png (238 KB)

Catalin Bombea

Iasi, Romania

Member

Forum Posts: 1939

Member Since:
November 8, 2013

Offline

March 2, 2022 - 3:11 am

Ok, those macros that are called needs to be called only from the form?

They can be called from ribbon, not seeing any reason to use them only in form.

The custom ribbon can be created only for a specific file, but if you want it to show up on every excel file, you have to create the menu on an addin.

See image attached for a custom ribbon.

Attachments

Screenshot-2022-03-01-190824-1.png (110 KB)

Velouria

London or thereabouts

Moderator

Members

Trusted Members

Moderators

Forum Posts: 834

Member Since:
November 1, 2018

Online

March 2, 2022 - 8:14 pm

This should work on 64bit.

Ivaylo Iliev

Active Member

Members

Forum Posts: 5

Member Since:
February 25, 2022

Offline

March 7, 2022 - 7:38 pm

Thank you it worked but if I want to show another userform and hide menu userform it is bug and close again can I make to show another userform by clicking on menu? Can you tell me how? click on "ShellRun" like example.