Marcos, Passei por esse "problema" ontem com o meu boss. A tela do notebook dele é um pouco menor que a minha então ele tinha que ficar dando zoom para conseguir visualizar. Essa macro vai agregar demais as minhas apresentações. Obrigada mais uma vez!
Imaginava que seria muito mais complicado para realizar este procedimento, mas vocês fazem parecer que VBA é muito fácil com sua claras explicações. Parabéns!
Sou programador ha muitos anos em softwares de máquinas industriais, e mesmo entendendo menos sobre outras linguagens, busco informações baseadas em conceitos. Já vi alguns vídeos desse canal e digo que não ensinam apenas a a resolver um problema, mas sim de forma coesa, profissional e estruturada. Super recomendo
Marcos, show essa publicação. Estou apenas com uma dificuldade. Tenho 3 planilhas com intervalos do mesmo tamanho e preciso navegar entre elas, porém, só a primeira fica ajustada. Como proceder?
Quando coloco duas condições, da erro..o que esta de errado ?? Range("TELA01").Select ActiveWindow.Zoom = True Tela01.Range("A1").Select Range("Tela02").Select ActiveWindow.Zoom = True Tela02.Range("A1").Select
Colega além do comando do zoom eu também gostei do design da sua tela os botões e tudo mais, ficou muito top. Observação: faltou você colocar um prazo de validade na sua planilha caso você for vender pra alguem por assinatura chegou na data estipulado a planilha se auto bloquea e pede nova renovação, entendeu?
Marcos Rieper Marcos Rieper 4 meses atrás Crie intervalos nomeados para cada planilha e aplique o zoom pra todas ao ativar a pasta de trabalho. Pode colocar no evento open também.
Muito obrigado por esse excelente conteúdo. Trouxe muita praticidade as planilhas que utilizo no dia a dia. Tenho duas dúvidas: Notei que na sub "mostrar", o Application.Formulabar se repete duas vezes. É mesmo necessário, ou podemos descartar um deles? Também encontrei uma necessidade que não consigo resolver. Esse código remove a barra de título e as linhas de grades, apenas da aba selecionada durante a execução. Eu gostaria que o mesmo fosse feito em todas as abas, poderia me ajudar por favor?
Muito interessante essa dica do zoom Marcos! Essa planilha de Manutenção ficou muito top! Gostaria de dar uma sugestão de aula, na verdade é uma dificuldade minha e acho que pode ajudar muita gente que é a confecção de uma Ribbon. Poderia ajudar?
Sendo RgExtrato o range definido, cole no código da aba que deseja o zoom: Private Sub Worksheet_Activate() Range("RgExtrato").Select ActiveWindow.Zoom = True Range("A2").Activate End sub
Muito bom! Tenho uma pergunta, como faço para desativar os códigos depois que abro o arquivo? Aperto Esc, porém as barras vertical e horizontal permanecem ocultas.
Diogo a solução mais fácil seria vc fazer uma macro para ativar os scrollbars já q vc só quer as barras de rolagem. Daí tu executa elas pelo alt+f8 ou então atribui à uma forma, aí vai depender da sua criatividade.
Olá Marcos, tenho a mesma duvida do Leandro Braga "Excelente. Parabéns! Só tenho uma dúvida: como faço para multiplicar a mesma atividade para demais guias de planilha na mesma pasta Excel ?", porém acho que não compreendi sua resposta pra ele pois tenho 5 menus fiz todo processo apenas aterando os nomes dos intervalos e dá erro constante, onde estou errando?
Bom dia, ótimo conteúdo. Uma dúvida: Esta ação é específica para esta planilha? Ou seja, se eu abrir outro excel, esta ação não vai para o outro excel não, né? Preciso que fique restrito a este excel e os outros que eu abrir não tenham estas ações, eles precisam ficar normais.
Excelente. Parabéns! Só tenho uma dúvida: como faço para multiplicar a mesma atividade para demais guias de planilha na mesma pasta Excel ? Pois tenho apresentação por hiperlink. Obrigado pelo vídeo. Abraço
Mesmo processo em todas as planilhas, porque cada planilha é diferente o intervalo a dar o zoom. Grato por assinar e acompanhar o canal, e conheça o nosso método domineoexcel.guiadoexcel.com.br/
O activate.zoom precisa ser necessariamente nessa ordem? Não posso colocá-lo logo abaixo de 'sub workbook_Open' junto com os outros códigos? Faz diferença?
Boa tarde Guia do Excel! Depois de executar esse código para deixar o excel em tela cheia, todas as outras Pastas de trabalho do excel abertas posteriores abrem em tela cheia, como faço pra isso não acontecer?
Seus videos são incríveis, mas esse não está indo pra mim... Tipo, meu Excel só ajusta o tamanho da tela uma vez que vou para outra planilha e volto. Ele, por alguma razão não inicia ao abrir o Excel... Não é o pior dos problemas porque ele de fato fica na medida correta, mas é bem estranho que ele não executa juntamente com a abertura do Excel.
Existe alguma opção de "Application." que somente recolha a barra de opções assim como ocorre no atalho Ctrl+F1? Ocultar a barra de opções não atende ao meu caso.
Olá, eu fiz do jeito que vc mostrou no vídeo, mais na minha planilha não fica centralizado, só do lado direito e não no centro que nem o seu. O painel que eu fiz com os botões e tal, ocupam apenas a metade da tela do pc, mais ai eu queria que ficasse centralizado que nem o seu. Como eu faço pra ele centralizar o intervalo criado automaticamente? Seria possível isso ?
Olá Felipe. A solução é mesmo ir ajustando a sua planilha para que fiquem distribuídos da melhor forma. Entenda que ele vai fazer com que apareça exatamente o que selecionou, então veja se a seleção está correta também e tente distribuir na horizontal as informações.
@@MarcosRieper Assim meu caro, agora entendi o que vc disse. E realmente faz sentido. Ajustei como vc disse e ficou perfeito 🙏 vlw de vedd. Me ajudou muito pois ficava algo estranho, feio sem profissionalismo algum. Mais agora ficou incrível. Vlw e abraços.
Muito obrigado ! Gostaria de saber como faço o procedimento para cada planilha no documento. pois tenho várias abas no meu documento. Ficaria muito grato se puder me ajudar
Bom dia Flávio, tem que repetir o procedimento para cada uma das planilhas, principalmente porque o intervalo deve ser diferente. Grato por acompanhar e assinar o canal.
@@GuiadoExcelOficial Obrigado por responder ! A dúvida é... onde colocar o código das outras planilhas. Seria na sequência ? Eu tentei colocando na sequencia e deu erro 1004
@@flaviocosta4302 Olá. Tem que repetir exatamente igual para cada planilha, criar um novo intervalo nomeado, etc. No intervalo nomeado de cada planilha mude o nome, e depois ao colar o código vba, coloque o nome deste intervalo nomeado desta planilha no lugar do antigo do código.
@@GuiadoExcelOficial Obrigado ! Sim isso eu entendi ...irei colocar o codigo de uma planilha abaixo para exemplificar. A dúvida é como colocar se logo abaixo exatamente igual ou se tem algum código anterior a isso . Não sei se estou conseguindo colocar a minha dúvida corretamente. Private Sub Workbook_Open() 'Seleciona a região home Range("Home").Select 'Aplica o zoom automático ActiveWindow.Zoom = True Planilha24.Range("A1").Select End Sub
Bom dia, gostaria de saber se tem como retornar largura e altura de um imagem através dos resultados do Excel, por exemplo, para uma planilha de moveis sob medida onde posso montar as peças e editar o tamanho, e gostaria de ter uma imagem do projeto mas que seja do tamanho proporcional ao que foi montado.
Olá, bom dia, ..... bem interessante e prático.....uma dúvida, como fazer para que todas as ações, sejam aplicadas para todas as guias do arquivo? No caso do cabeçalho de linhas e colunas, executou apenas em uma guia e nas demais não....obrigado!!!
Excelente! Mas tenho um dúvida, se tenho q abrir essa planilha em outros computadores ou preciso que um cliente abra no seu computador isso vai funcionar tbem?
Bom dia! Primeiramente parabéns pelo trabalho! O que eu deveria alterar para que este zoom fosse aplicado a todas as abas da planilha. Agradeço pela força. Abraço
@@MarcosRieper Eu tentei fazer isso... Mas vive dando erro. Tentei em "Open" e em "Activate" e não vai. Se for só uma aba funciona perfeitamente. Mas com 2 ou mais dá erro. Tentei fazer isso em uma pasta de trabalho que tenho com 10 abas... Não funcionou mesmo... Se puder ajudar, ficaria imensamente grato.
With ActiveWindow Worksheets("Cardiorrespiratório").Activate Range("testeteste").Select ActiveWindow.Zoom = True Worksheets("Funcional").Activate Range("teste2").Select ActiveWindow.Zoom = True End With É necessário que a planilha esteja ativa para que a função range possa funcionar, logo consegui desta maneira.
Muito ointeressante! Parabéns! Deixa eu tirar uma dúvida: Eu tenho uma pasta onde tenho as planilhas: DADOS, T. Dinâmica e Dashboard. Se eu quiser aplicar o zoom somente no Dash, tenho q colocar todos aqueles códigos de desativação da barra, etc?
A parte q faz o zoom é: Range("tela").select Activewindow.zoom=True Só isso Aí vc tem q ver o q exatamente vc quer fazer. Se vc quer dar zoom só no seu dashboard vai na planilha e seleciona o intervalo do dashboard e cria um outro nome, daí põe Range("o_nome_novo").select Activewindow.zoom=True Aí vc pode colocar esse código no evento worksheet activate (qndo a planilha dash for ativada) Vai depender do que vc quer fazer exatamente.
Olá Rafael, obrigado por assinar o canal. Segue o link da sua dúvida: www.guiadoexcel.com.br/abrir-o-excel-em-tela-cheia-ocultar-barras-guias-e-ferramentas/
Este recurso de selecionar o intervalo e aplicar o zoom ao selecionado é muito prático e importante para a apresentação de uma planilha, mas eu sugiro ainda que seja feito o congelamento da última linha + 1 do intervalo selecionado para o zoom, pois assim a área da apresentação da planilha não sairá acidentalmente da visão do usuário, mesmo que ele venha a teclar [PgDown] ou até as teclas [KeyDown] ou [KeyRight].
Bom dia Soares, muito obrigado pela mensagem, é muito gratificante o elogio a didática. Ano que vêm estaremos com uma plataforma com muitos cursos de Excel já em janeiro. Avisaremos pelo youtube, blog e mídias sociais, vai valer a pena esperar.
With ActiveWindow Worksheets("Cardiorrespiratório").Activate Range("testeteste").Select ActiveWindow.Zoom = True Worksheets("Funcional").Activate Range("teste2").Select ActiveWindow.Zoom = True End With É necessário que a planilha esteja ativa para que a função range possa funcionar, logo consegui desta maneira.
Marcos, bom dia! Muito bom! Realizei todo os passos do vídeo e do blog, mas como faço para desativar os códigos depois que abro o arquivo? Aperto Esc, porém as barras vertical e horizontal permanecem ocultas.
Ali no vídeo tem a parte de voltar a questão das barras também. mas veja neste artigo: www.guiadoexcel.com.br/abrir-o-excel-em-tela-cheia-ocultar-barras-guias-e-ferramentas/
Gostei da ideia, mas ela não funcionou comigo: ao abrir a pasta de trabalho não se dá o zoom pretendido. Para que o zoom aconteça, preciso ativar uma outra planilha dentro da pasta de trabalho e depois voltar a ativar a planilha com as instruções; aí dá certo. Por que o meu Excel não considera que a planilha foi «ativada» ao abrir a pasta de trabalho?
@@GuiadoExcelOficial @Guia do Excel Workbook_Open? Não entendi… Se for uma sub-rotina com o nome «Workbook_Open()» ela não seria na área «Worksheet», pois não existe «Open» nas alternativas. Se for uma sub-rotina, em um «módulo», com o nome «Sub Workbook_Open()», não funcionou. Em módulo dá para fazer uma sub-rotina com o nome «Sub Auto_Open()» que dá certo. Mesmo assim, a «Private Sub Worksheet_Activate()» deverá continuar, para o caso de se mudar de planilha e ocorrer a desativação pela «Private Sub Worksheet_Deactivate()».
@@GuiadoExcelOficial Não sou programador e por isso não estava achando o evento «Open», pois estava procurando em "Worksheet». Ele só aparece quando se seleciona «EstaPastaDeTrabalho». Deu certo, mas colocando juntas as instruções do «Ocultar» e do «Worksheet_Activate». Valeu pela dica. 👍🤗
Tento executar mas aparece o seguinte erro, " Identificador sob o cursor não foi reconhecido", alguém sebe mim explicar em qual parte posso estar errando .
Bom dia, como vai? Acho que o nome que colocou no range está incorreto. Este erro normalmente ocorre se não encontra o endereço. No caso o intervalo nomeado no VBA. Obrigado por assinar o canal e pelo comentário.
Boa tarde, Estava procurando este codigo, porem preciso adaptar essa macro para todas as abas que tenho dentro da minha planilha, e cada aba terei uma "TELA" diferente. Do jeito que esta ela abre maximizado e fica no tamanho ideal independente do computador e resolução que uso, porem as demais planilhas que tenho dentro na outras abas não adquirem o mesmo formato de dela cheia. Como eu poderia estar adicionando as demais abas dentro deste mesmo codigo, e para cada uma utilizarei um tamanho de tela configurado de forma diferente? Obrigado
Bom Dia Gostaria que me ensisse a fazer um sorteio de nomes mas que nao repetissem estes nomes e que seja projetado no projeto somente o simbolo da igreja abaixo escrito ganhadorr do sorteio e abaixo aparecera o nome do soteado e que tenha um botao no projetor com o nome e depois de sorteado este nome que ele nao seja mais sorteado sortear e que a tela tenha uma cor total e que nao apareça o excell poderia me ajudar
Olá, fiz conforme suas instruções só que aparece Erro em tempo de execução "1004": o método Select da classe Range falhou. O que devo fazer para solucionar esse problema?