Notifications

Clear all

Coleta de dados com popup

2024 - VBA & Macros

Post Recente por brunoxro 8 anos atrás

5 Posts

2 Usuários

2 Reactions

980 Visualizações

RSS

caixeta

(@caixeta)

Posts: 5

Active Member

Topic starter

Boa tarde,

Pessoal tenho uma planilha no excel, e queria que ela coletasse as informaçoes com pop ups, quero isso para que nenhum campo fique sem ser preenchido.

segue anexo do arquivo.

No Arquivo seria o seguinte:
Vem a popup solicitando por exemplo nome do produtor, depois de recebido a informação ele alimentaria a celula com o que foi informado, e ja solicitaria a inscrição estadual logo depois nome da fazenda e assim sucessivamente.

Espero que entendam o que eu preciso.

e muito obrigado!!!

Postado : 15/02/2017 1:26 pm

caixeta

(@caixeta)

Posts: 5

Active Member

Topic starter

Alguem para me ajudar?

Obrigado!!!

Postado : 16/02/2017 11:13 am

brunoxro

(@brunoxro)

Posts: 698

Honorable Member

Boa tarde caixeta,

Minha sugestão é ao invés de usar Inputbox(popup), é melhor montar um formulário.

Mas se você quer montar com inputbox, segue um código de exemplo para começar:

Sub PreencherComInputBox()
    
    Dim Adto    As String
    
'Adto recebe o valor escrito no inputbox
    Adto = InputBox("ADTO? ")
    
'A célula C9 recebe o valore preenchido
    Range("C9").Value = Adto    
    
End Sub

att,

Postado : 17/02/2017 12:38 pm

caixeta reacted

caixeta

(@caixeta)

Posts: 5

Active Member

Topic starter

Boa Tarde brunoxro ,

Como seria essa sua sugestao de formulário usando esse meu arquivo?

Esse exemplo que você me passou como que eu poderia fazer para que quando eu abra a planilha a inputbox ja seja executada.?

E muito Obrigado por enquanto...

Postado : 17/02/2017 3:09 pm

brunoxro

(@brunoxro)

Posts: 698

Honorable Member

Boa tarde,

Seria montar um formulário mesmo, ao invés de ficar preenchendo em um monte de inputbox uma atrás da outra. Leva tempo, mas acredito que seria uma solução mais prática.

Para uma macro ser executada quando abrir o arquivo, você pode usar o evento Workbook_Open().

att,

Postado : 17/02/2017 4:03 pm

caixeta reacted