Coleta de dados com...
 
Notifications
Clear all

Coleta de dados com popup

5 Posts
2 Usuários
2 Likes
768 Visualizações
(@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)
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)
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