Ir ao conteúdo
  • Comunicados

    • Gabriel Torres

      Seja um moderador do Clube do Hardware!   12-02-2016

      Prezados membros do Clube do Hardware, Está aberto o processo de seleção de novos moderadores para diversos setores ou áreas do Clube do Hardware. Os requisitos são:   Pelo menos 500 posts e um ano de cadastro; Boa frequência de participação; Ser respeitoso, cordial e educado com os demais membros; Ter bom nível de português; Ter razoável conhecimento da área em que pretende atuar; Saber trabalhar em equipe (com os moderadores, coordenadores e administradores).   Os interessados deverão enviar uma mensagem privada para o usuário @Equipe Clube do Hardware com o título "Candidato a moderador". A mensagem deverá conter respostas às perguntas abaixo:   Qual o seu nome completo? Qual sua data de nascimento? Qual sua formação/profissão? Já atuou como moderador em algo outro fórum, se sim, qual? De forma sucinta, explique o porquê de querer ser moderador do fórum e conte-nos um pouco sobre você.   OBS: Não se trata de função remunerada. Todos que fazem parte do staff são voluntários.
    • DiF

      Poste seus códigos corretamente!   21-05-2016

      Prezados membros do Fórum do Clube do Hardware, O Fórum oferece um recurso chamado CODE, onde o ícone no painel do editor é  <>     O uso deste recurso é  imprescindível para uma melhor leitura, manter a organização, diferenciar de texto comum e principalmente evitar que os compiladores e IDEs acusem erro ao colar um código copiado daqui. Portanto convido-lhes para ler as instruções de como usar este recurso CODE neste tópico:  
AdrianoPires

Excel RESOLVIDO Adicionar um botão "+1" no Excel

Recommended Posts

Oi Gente, estou fazendo uma tabela no excel,  e preciso colocar um botão com uma Funcionalidade " +1 " ou seja, a cada vez que apertar esse botão ele vai somar mais uma unidade na célula selecionada. Alguém me ajuda? 

idenizações.png

Editado por DiF

Compartilhar este post


Link para o post
Compartilhar em outros sites

Boa tarde, amigo.

 

Sub somaum() 
Range( "a1" ).Value = Range( "a1" ).Value + 1 

End Sub 

Substitua o A1 pela célula que tu queres.

Para criar a macro, você tecla ALT+F11, vai em "inserir módulo" e poôe esse código aí. 

Em seguida, é só ir na parte de controles, colocar um botão na sua planilha e associá-lo a macro que você acabou de criar. 

 

  • Curtir 1

Compartilhar este post


Link para o post
Compartilhar em outros sites
42 minutos atrás, Niê disse:

Boa tarde, amigo.

 

Sub somaum() 
Range( "a1" ).Value = Range( "a1" ).Value + 1 

End Sub 

Substitua o A1 pela célula que tu queres.

Para criar a macro, você tecla ALT+F11, vai em "inserir módulo" e poôe esse código aí. 

Em seguida, é só ir na parte de controles, colocar um botão na sua planilha e associá-lo a macro que você acabou de criar. 

 

Amigo, coloquei o macro super funcionou, porém ao atribuir um novo macro para o botão seguinte o mesmo substitui o anterior, desculpa a ignorância é que sou da área de marketing, estou enferrujado em excel, você teria uma sugestão de como posso por a função nos outros botões? Sendo que minha planilha tem 70 botões.

Compartilhar este post


Link para o post
Compartilhar em outros sites

@AdrianoPires

 

Se você anexar a planilha aqui no fórum, fazemos para você.

 

[]s

  • Curtir 1

Compartilhar este post


Link para o post
Compartilhar em outros sites

Você conseguiu? @AdrianoPires

 

  • Curtir 1

Compartilhar este post


Link para o post
Compartilhar em outros sites
14 horas atrás, Patropi disse:

@AdrianoPires

 

Se você anexar a planilha aqui no fórum, fazemos para você.

 

[]s

@Patropi Agradeço muito se poder ajudar, segue o arquivo. 

Planilha para vendas FÓRUM.xlsx

adicionado 1 minuto depois

@Niê Bom dia Niê, vi as respostas agora, devido ao excesso de trabalho, anexei o arquivo para o amigo, caso queira da uma olhadinha também, fique a vontade. Abraço.

Compartilhar este post


Link para o post
Compartilhar em outros sites
7 minutos atrás, AdrianoPires disse:

@Patropi Agradeço muito se poder ajudar, segue o arquivo. 

Planilha para vendas FÓRUM.xlsx

adicionado 1 minuto depois

@Niê Bom dia Niê, vi as respostas agora, devido ao excesso de trabalho, anexei o arquivo para o amigo, caso queira da uma olhadinha também, fique a vontade. Abraço.

Puts, esse LibreOffice me deixa maluco. ahuauhauh

  • Curtir 1

Compartilhar este post


Link para o post
Compartilhar em outros sites

Imagine pra mim que mal uso o excel pelo ao menos uma década kkk. 

  • Triste 1

Compartilhar este post


Link para o post
Compartilhar em outros sites

Seguinte, @AdrianoPires;

 

O jeito vai ser você criar um "Sub somab" diferente para cada botão da seguinte forma:

image.thumb.png.2fb913ef1f0cf8298e1a9ebc09447c65.png

 

Vai dar trabalho, mas dá certo. Indico nomear todos os módulos de forma que não te deixe confuso mais pra frente, caso queira mudar algo.

 

Depois de digitado, você pode atribuir aos botões as funções:

 

image.thumb.png.e6b41b9536abfd6d56c3b5294bc6419b.png

 

Sub somab6()
Range("b6").Value = Range("b6").Value + 1

End Sub

Sub somab7()
Range("b7").Value = Range("b7").Value + 1

End Sub

Planilha para vendas FÓRUM1.rar

Veja acima o que eu já fiz, está em .rar pois salvei de um jeito que o macro não desliga ao fechar a planilha.

 

 

image.png

Editado por Niê
  • Obrigado 1

Compartilhar este post


Link para o post
Compartilhar em outros sites
8 minutos atrás, Niê disse:

Seguinte, @AdrianoPires;

 

O jeito vai ser você criar um "Sub somab" diferente para cada botão da seguinte forma:

image.thumb.png.2fb913ef1f0cf8298e1a9ebc09447c65.png

 

Vai dar trabalho, mas dá certo. Indico nomear todos os módulos de forma que não te deixe confuso mais pra frente, caso queira mudar algo.

 

Depois de digitado, você pode atribuir aos botões as funções:

 

image.thumb.png.e6b41b9536abfd6d56c3b5294bc6419b.png

 


Sub somab6()
Range("b6").Value = Range("b6").Value + 1

End Sub

Sub somab7()
Range("b7").Value = Range("b7").Value + 1

End Sub

Planilha para vendas FÓRUM1.rar

Veja acima o que eu já fiz, está em .rar pois salvei de um jeito que o macro não desliga ao fechar a planilha.

image.png

Lollllllllllllllllllll!!!! kkk Obrigado caraaaa! Rapaz, pensei nessa possibilidade mas desconhecia a existência dessa lista no atribuir macro! Obrigado cara!! Sucesso. 

adicionado 11 minutos depois

obrigado niê obrigado também pratopi, sucesso pra vocês. 
muitíssimo grato pela ajuda. 

  • Curtir 1

Compartilhar este post


Link para o post
Compartilhar em outros sites

@AdrianoPires Fico feliz em ter ajudado, ahuahuauh.

 

Aqui, segue esse passo pra finalizar o post; 

 

  • Curtir 1

Compartilhar este post


Link para o post
Compartilhar em outros sites

Daria também pra fazer só com uma macro geral, ao invés de uma pra cada botão. Usando a propriedade Application.Caller dá pra saber qual botão foi clicado e em qual célula ele está, aí é só usar o Offset pra acrescentar o valor +1 à célula vizinha ao botão.

Mas como a solução proposta já atendeu, isso é o que importa...

  • Amei 2

Compartilhar este post


Link para o post
Compartilhar em outros sites

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário






Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas publicações sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×