Vídeo #77 - Menu avançado e profissional para userform VBA (Menustrip)

[@OrganicSheets]

Conheça Nossos Cursos! Aprenda VBA e impulsione sua carreira com nossos cursos exclusivos! Automatize tarefas, aumente sua produtividade e domine o design moderno em Excel. Nossos cursos são desenvolvidos para fornecer as habilidades práticas e conhecimentos necessários para se destacar no mercado. Acesse: ead.organicsheets.top/

[@freeliberalminds]

This is awesome. Thank you Organic Sheets for all the video Dynamic and Modern VBA lessons you are sharing. Such a great help to my VBA Software Development skills. Thanks you so much.

[@OrganicSheets]

Hi Nenclobeldz, thanks. i'm really happy with your comment.

[@Super_Tech_Genius]

Valeu, Fernando. Show de bola! Muito obrigado, parabéns.

[@OrganicSheets]

Disponha Nelson, é muito bom ter vc aqui!

[@Super_Tech_Genius]

@@OrganicSheets Muito obrigado, irmão. Um abraço e muito sucesso!

[@patrycia902]

Parabéns excelente aula 👏👏👏👏

[@OrganicSheets]

Obrigado 😃

[@evaldosoares4269]

É um projeto sensacional, porém a limitação de não poder usar outra planilha ao mesmo tempo, é muito complicado e realmente inviável nos dias de hoje.

[@brennonunes6749]

Cara você é um Deus do Excel, parabéns! Você saberia uma maneira de abrir um formulário sem abrir a planilha, uma maneira 100% eficiente. Porque eu sempre encontro algumas soluções que têm alguns problemas. Acredito que a solução seria separar a aplicação do Excel para cada planilha, dessa forma o código "Application.Visible = False" seria excelente.

[@brennonunes6749]

Outra coisa que seria ótimo seria ocultar aquela logomarca do Excel ao abrir um arquivo, porém acredito que seja mais difícil.

[@OrganicSheets]

Fala Brenno, beleza? Dá uma olhada nesse vídeo e veja se te atende: kzbin.info/www/bejne/ppvPeWNqj9V7b7c

[@paulopms1]

Parabéns !! SHOW adaptação para 64 Bits... Os Itens aceita caracteres, assim pode colocar mais de 10 Itens ou módulo no menu.

[@OrganicSheets]

Obrigado Paulo, não entendi o final do seu comentário, é uma pergunta?

[@paulopms1]

@@OrganicSheets após 9 | , não aceita 10, 11..gera como submenus no primeiro numero. Resolvi apor o 9 colocando A |, B|, C| e gerou o mais de 10 Menus.

[@OrganicSheets]

@@paulopms1 Top Paulo, não havia identificado essa falha, mas que bom que foi sagaz e conseguiu reverter rs

[@paulopms1]

@@OrganicSheets outra coisa enviei via e-mail da Organic uma solução simples de ocultar o módulo quando não autorizado. Ex. Não mostrar o Menu RH.

[@Kimgegla]

@@paulopms1 Que maravilha, eu havia ficado frustrado quando me deparei com essa limitação ao implantar no meu projeto. Agora vai ficar show. outra coisa que é citado no vídeo é que não funciona em modo não Modal. resolvi isto colocando em outra pasta de trabalho um código, para chamar a pasta que está o MenuStrip. e abri-la em outa instancia do excel, no evento Workbook_Open da pasta MenuStrip chamar o form do menu não modal exemplo: MenuStrip.Show vbModeless, no final fecha a aplicação usada como atalho. Dim xlWbPath As String Dim xlApp As Excel.Application ' Declare a variável para a aplicação Excel Dim xlWb As Excel.Workbook ' Declare a variável para a pasta de trabalho Dim Abrir As String ' Declare a variável para o nome da pasta de trabalho Private Sub Workbook_Open() Application.Visible = False ' Define o caminho do diretório onde o arquivo está localizado xlWbPath = Application.StartupPath ' Inicializa uma nova instância do Excel Set xlApp = New Excel.Application ' Oculta a instância do Excel recém-criada xlApp.Visible = False ' Define o nome da pasta de trabalho para abrir Abrir = "MenuStrip.xlsm" ' Abre outra pasta de trabalho na nova instância do Excel Set xlWb = xlApp.Workbooks.Open(ThisWorkbook.Path & "\" & Abrir) ' Fecha a aplicação Excel.Application.Quit End Sub

[@bukittutorial7799]

Thank you my friend, you are my favorite channel and please allow me to learn a lot from your channel once again thank you very much my brother I hope you are healthy and successful always

[@sajinj1543]

Gostei do seu conceito com definições de ícones na folha de cálculo. Pode, por favor, partilhar um vídeo com o ícone e formas de configuração na folha de cálculo do Excel. Estou à espera ♥️

[@OrganicSheets]

Sugestão anotada!

[@marcos.fcunha]

Sempre trazendo conteúdos relevantes!

[@OrganicSheets]

Opa Marcos, que bom que tenha gostado 😁🙌

[@vandersonrogerioss1476]

Que top, top. Vc vai disponibilizar este doc com nós? Este projeto cairia certinho com um projeto que tenho na empresa que trabalho.

[@OrganicSheets]

Vanderson, tem o link na descrição do vídeo para fazer o download da planilha utilizada na aula. Abraços.

[@vandersonrogerioss1476]

@@OrganicSheets bom dia!! Eu vi, já baixei e iniciei meu projeto. Está muito top. Obrigado por compartilhar esse conhecimento.

[@alexandermoncada5920]

Me encanta la apariencia del submenú! Está estupendo! 😃

[@OrganicSheets]

Gracias!

[@alexandermoncada5920]

@@OrganicSheets lo puedo hacer en un desarrollo donde oculto todo excel? Funcionara el menú aunque tenga las hijas ocultas?

[@OrganicSheets]

¡Hola amigo! ¡Perdón por la demora! 😐 Entonces, te pediré amablemente que te registres en el soporte del Hub que creé especialmente para resolver sus dudas. Detalla tu pregunta allí y agrega el archivo (si lo tienes) o el número de la clase de KZbin sobre la cual necesitas ayuda, para facilitar el soporte. Responderé siempre lo más pronto posible. El enlace es hub.organicsheets.top. Aquí, los comentarios están en varios vídeos y no aparecen en el orden en que se publicaron, así que podría terminar respondiendo a quien preguntó primero por último. 😪 Sin mencionar que allí, la respuesta es más dinámica; aquí se está volviendo inviable. ¡Te espero allí! ¡Agradezco tu comprensión! 🙏

[@oyexsabiansyah9458]

Mantab sir ...thank for tutorialnya...I like it..🥰

[@OrganicSheets]

Saya senang Anda menyukainya.

[@fasyrenis]

Solução top 😍 Está de parabéns 😁 Já vou adaptar para o meu projeto. Rs. Existe alguma forma de aumentar os itens no menu? Por que só consigo até 7 itens. Exemplo 1 Módulos 1l1 módulo 1 1l2 módulo 2 1l3 módulo 3 . . . . 1l15 módulo 15 Existe alguma forma de ampliar os itens no módulo? Desde já agradeço por compartilhar essas soluções. 👏🏻☺️

[@OrganicSheets]

Olá José, que bom que ajudou. Acabei de avaliar que realmente tem um limite, mas consegui inserir um total de 10 itens. Após o décimo não reconhece, preciso revisar o código e ver se é possível.

[@fasyrenis]

@@OrganicSheets Obrigado pelo feedback ☺️

[@fasyrenis]

@@OrganicSheets Qual seria o tamanho dos ícones? Por que no meu ficou deformado e de baixa qualidade. Peguei ícones no freepik.

[@paulopms1]

@@OrganicSheets acima de 10 Itens, são inclusos como subitens Ex.: 11 Fica como 1|1

[@fernandocarneiro1984]

Muito Obrigado.

[@OrganicSheets]

Eu que agradeço

[@gersonchaves5860]

Fernando, sem palavras para descrever seu trabalho. Estou no VBA a pouquíssimo tempo e tudo que sei foi vendo videos na Web (procurando dicas e ideias) e foi assim que cheguei ao seu canal. Já fiz algumas automações que ficaram Show de bola (sou coruja!!! KKK), mas vamos a minha duvida!!! Ao inserir um ícone no menu Principal (Raiz) alguns ícones ficam imperceptíveis (muito pequenos) e ao aumentar o pixel eles sobre poem a linha superior e inferior. Como poderíamos fazer para aumentar a distancia delas para minimizar este probleminha? Desde já agradeço sua atenção e Parabéns por seu trabalho Mestre.

[@OrganicSheets]

Tente utilizar o lineseparetor

[@RT-ul1xb]

Da para criar sistemas também no google planilhas

[@OrganicSheets]

Sim é possível, lá no google planilhas utilizamos o JAVASCRIPT para fazer as manipulações dos formulários. Mas eu ainda não domino muito a linguagem.

[@ThiagoWerling]

Há possibilidade de inverter o menu? Criar os itens do menu um abaixo do outro no canto esquerdo?!

[@OrganicSheets]

Não com essa metodologia, mas em breve irei trazer algo parecido para o canal.

[@JDiosTE]

Amigo tu trabajo es de excelencia… me impresionas!!! Solo una duda con el sub menú y es que cuando lo abres y lo detienes con el visual se cierra el libro y marca error.

[@JDiosTE]

Sabes a qué se debe?

[@OrganicSheets]

Gracias Juande. ¿Sabes qué línea de código provoca el error?

[@JDiosTE]

@@OrganicSheets en eso estoy, encanto lo tenga te informo

[@JDiosTE]

Amigo el error lo genera la librería SetWindowLongPtr, no es estable...

[@OrganicSheets]

puede ser una falla en el registro de la biblioteca, pero no puedo decirlo.

[@guilhermesantosandrade1784]

Olá, excelente vídeo. Me tire uma dúvida, por gentileza. Ao executar o form, o menu aparece corretamente, porém meus controles de formulário desaparecem. Como faço para que eles sejam visíveis? Estou usando os códigos de form dinâmico que você apresentou em outros vídeos, ao comentar toda a seção de códigos de form_resize, os controles de formulário aparecem novamente

[@OrganicSheets]

Olá Guilherme, deve estar havendo alguma incompatibilidade entre os dois códigos. Tente debugar e verifique os nomes dos objetos.

[@RT-ul1xb]

Professor o pacote office permite utilizar o excel online , tenho a ideia de usar o excel como front end e o acess como banco de dados .

[@OrganicSheets]

O Excel online é uma ótima ferramenta, mas não possui VBA 😢

[@Eduardonada]

Estou tendo problemas em meu código, já que estou estudando VBA excel a apenas 5 meses e não consegui compreender por completo as API e chamadas do código, preciso minimizar essas interações pois o userform esta extremamente pesado para o meu PC. Conseguiria me auxiliar neste projeto ou trazer de alguma forma uma versão mais simplificada e menos pesada?

[@OrganicSheets]

Fala Eduardo, belezinha? Tenho exatamente o que você precisa, assista o vídeo #108 aqui do canal: kzbin.info/www/bejne/pZmbZYSeocmtg5Y Um abraço e me diga se deu certo.

[@williamsoares7553]

Olá Fernando, primeiro parabéns pelo excelente vídeo. Uma dúvida! É possível criar um tipo de menu desses sem o uso do formulário, colocando esses menus direto na planilha?

[@OrganicSheets]

William é possível com RIBBONS, assista esse vídeo: kzbin.info/www/bejne/rHyrYmadab2gmJY

[@DanielVictor-qy9so]

Once I Get In The Top Ten s Your My Credit ;)

[@givarodri4620]

Boa tarde Baixei a planilha, mas qndo vou carregar o código, dá erro na " função ISVALIDFACEID Tipos incompatíveis. Aguel sabe me.ajudar

[@OrganicSheets]

Fala Givarodri, beleza? Na planilha onde vc monta a estrutura do Menustrip na coluna de ícone deve ter algum código de FACEID (ícones padrões do Excel) inválido. Revise o FACEID, exclua ou insira um outro ícone válido. Espero que isso resolva.

[@fasyrenis]

Não sei se é algo que só acontece comigo, mas testei em diferentes computadores e volta e meia quando entro no painel do desenvolvedor ou aperto Alt + F11 ele começa a bugar e fica Executando o código, travando a planilha. Só para quando aperto esc no teclado. Normalmente ele trava nesse código do IF Win 64 bits na maioria das vezes. Alguém passou por isso? Atualmente uso junto a esse código, outros código como o de remover as bordas do formulário, adicionar ícone no lugar do símbolo do Excel e personalizar o textbox. Não sei se de alguma forma causa conflito. Tenho o efeito mouse move também em uns botões.

[@OrganicSheets]

É Jose, esses códigos que manipulam as API's podem ser conflitantes, teria que juntar esses códigos e tratar linha por linha esses conflitos, ou seja, daria um trabalhinho. Quando me sobrar um pouco mais de tempo irei tentar uni-los.

[@guilhermesantosandrade1784]

Olá, poderia me ajudar? Ao fazer a depuração em códigos que contenham os códigos do menustrip no mesmo conjunto, o excel crasha e reinicia. Eu percebi que isso acontece somente com os formulários que tem menu, pois fiz a remoção dos códigos e tentei debugar o código para ver se crashava, e o crash não aconteceu. A única coisa que eu fiz de diferente do que vc disse no vídeo foi mudar o nome dos módulos para ficar mais fácil de visualizar, garantindo que todos esses nomes alterados fossem substituidos onde eles eram chamados. Será que pode ter sido isso?

[@OrganicSheets]

Guilherme, teria que me enviar o projeto para eu analisar. Certifique-se que os formulários estão com a propriedade modal = true e que nenhum outro código mude essa propriedade durante a execução. Novidades, me avise pfv.

[@vandobuda]

Professor, primeiramente parabéns pelo vídeo Fiz o download da planilha, salvei a pasta imagens na mesma pasta onde se encontra a planilha, porém, toda vez que tento executar ele apresenta um erro em tempo de execução '13' - Tipos incompatíveis Não consigo fazer rodar de forma alguma

[@OrganicSheets]

Conseguiu resolver?

[@Landisval1]

bom dia? porque todos seus arquivos ao abrir mostra que não é confiável, mesmo depois de habilitar as macros......obrigado

[@OrganicSheets]

Landisval, após uma atualização agora exige-se que além de habilitar as macros, tenha que marcar o arquivo como confiável nas propriedades. Verifique se é isso.

[@pedroribeiro1939]

Boa trabalho Quando disponibiliza o código para tentar fazer igual?

[@OrganicSheets]

Olá Pedro, tudo bem? Tem o link na descrição do vídeo onde conseguirá baixar grátis a planilha utilizada no vídeo. 🤝

[@pedroribeiro1939]

@@OrganicSheets vou ver muito obrigado Excelente trabalho

[@pedroribeiro1939]

Já testei mas ele encrava e reinicia o Excel O meu Office é de 32 bits Onde me parece o conflito porque tive a debugar tudo até ver onde estava a encravar É aqui Public function safeexithookdelg... Se resolver avise me gosta de sabe o porquê

[@OrganicSheets]

Pedro certifique-se de que o formulário está com a propriedade show modal = true.

[@pedroribeiro1939]

@@OrganicSheets ok mal possa faço isso

[@wasmascarenhas3388]

more setups tutorial but not sure how Producer asures up in that departnt.

[@OrganicSheets]

As soon as I have more news, I will produce more content.

[@joaocarlosgaspar2906]

BOA TARDE, FERNANDO,NÃO ESTOU CONSEGUINDO BAIXAR O DOWNLOAD DA PLANILHA COM CÓDIGO ABERTO VOCÊ PODERIA ME AJUDA,R SOU FÃ DE SEU TRABALHO PORÉM GOSTARIA DE OBTER O DOWNLOAD DELA,, É POSSÍVEL!

[@OrganicSheets]

Olá João, tudo bem? Estava com um probleminha no site, mas já ajustamos. Tenta fazer o download lá e me diga se funcionou bem.

[@tiagoomayavanguajr8691]

Kami-Sama do excell vba

[@OrganicSheets]

Ressuscitando o Shenlong (VBA) 🐉

[@fasyrenis]

Quando uso o painel com esse código e realizo algumas ações, caso eu tente entrar no painel do desenvolverdor ele trava a tela e fica EXECUTANDO. Quando aperto ESC ele depura no modulo Bas_Delegate nesse código abaixo. Alguém passou por isso? Public Function SafeExitHookDelg( _ ByVal ncode As Long, _ ByVal wParam As Long, _ ByVal lParam As Long _ ) As Long Desde já agradeço o apoio da comunidade. :D

[@OrganicSheets]

Teria que olhar o seu projeto para tentar uma solução. Mas infelizmente eu estou meio sem tempo. Vamos ver se as coisas melhoram. Abraços.

[@luisasayuri9004]

Respect bro

[@OrganicSheets]

😁🤝

[@abualialwais7377]

Can you do this in access

[@OrganicSheets]

Sorry, i don't know do this in Access.

[@guilhermesposito121]

Bro you need to be more specific on what computer ur using, I’m out here trying to right click and left click with my Mac and notNice tutorialngs

[@OrganicSheets]

Sorry, I wasn't really specific about that. All my projects are on windows computers with 64-bit architecture processors. This project, like others, takes advantage of the windows API, so it is not 100% functional on MAC.

[@marcos.fcunha]

Com esse nome, tá na cara que é BR... Tá vendo e ouvindo o cara falando português e vem com essa palhaçada de falar inglês. Em segundo, só olhar pro vídeo que tu vê que é Windows. Ou tu acha que todo mundo é playboyzinho que nem tu? Cada uma...

[@OrganicSheets]

😯