Notifications
Clear all
Topic starter
02/05/2018 6:16 pm
Boa-noite
Tenho um formulário que baixei e no Office 32 bits funciona blz...no 64 bits alterei todos que acusavam erro na linha "Private Declare Function" para "Private Declare PtrSafe Function", só que no final do UserForm está dando erro na linha "g_lpMyWndProc = SetWindowLong(g_hForm, GWL_WNDPROC, AddressOf HookWinProc)".
no "AddressOf HookWinProc"
Private Sub UserForm_Initialize()
Dim lngWinState As XlWindowState
códigos...e deposi lá no final
g_hForm = FindWindow(vbNullString, Me.Caption)
Call CreateAPIMenu
#If VBA6 Then
g_lpMyWndProc = SetWindowLong(g_hForm, GWL_WNDPROC, AddressOf HookWinProc)
#Else
g_lpMyWndProc = SetWindowLong(g_hForm, GWL_WNDPROC, AddrOf("HookWinProc"))
#End If
End Sub
Teria alguma solução !?
03/05/2018 8:19 am
fcarlosc,
Bom dia!
Pedimos, por gentileza, ao postar código VBA aqui no fórum, utilizar a ferramenta CODE que fica localizada logo acima da caixa de mensagens (quinto botão da esquerda para a direita).
Se a resposta foi útil para você, por gentileza, Amigo, clique em Curtir.
Atenciosamente
Wagner Morel
19/02/2021 9:36 pm
Boa noite
Alguém teve solução para a solicitação acima?
20/02/2021 8:06 pm
Bem vindo ao Planilhando, @andreoew!
Este post está parado há muito tempo. Descreva a sua dúvida em detalhes e anexe um arquivo que reflita o problema que está enfrentando. Talvez este tópico não tenha evoluído justamente pelo fato do autor não ter fornecido subsídios suficientes para isso.
