Escrever dados do u...
 
Notifications
Clear all

Escrever dados do user form na planilha

6 Posts
2 Usuários
0 Reactions
1,603 Visualizações
(@vitor)
Posts: 57
Trusted Member
Topic starter
 

Boa tarde,
como se passa os dados do userform para a planilha ?
por favor, expliquem toda a sintaxe usada.

(O userform pra pegar os dados é o "InscreverCandidatos"

"Nisto se manifestou o amor de Deus em nós: em haver Deus enviado o seu Filho unigênito ao mundo, para vivermos por meio dEle" 1 Jo 4-9

 
Postado : 14/08/2012 12:23 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa noite!!

Por favor leia as regras do fórum antes de postar!!!
Nossas Regras
viewtopic.php?f=7&t=203

Quesito REGRAS
Upload de arquivos
Ja temos mais de 1,5GB em arquivos aqui no Planilhando, e como não geramos $$$, temos que ser austeros no uso da banda e recursos, por isso, segue novas regras pra upload de arquivos:
-Tamanho máximo: 2Mb
-Formato obrigatório: .Zip - .rar - .ice

Seu anexo será excluído!!

Att

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 14/08/2012 5:25 pm
(@vitor)
Posts: 57
Trusted Member
Topic starter
 

tá aí o anexo certinho ^^

"Nisto se manifestou o amor de Deus em nós: em haver Deus enviado o seu Filho unigênito ao mundo, para vivermos por meio dEle" 1 Jo 4-9

 
Postado : 16/08/2012 4:49 am
(@vitor)
Posts: 57
Trusted Member
Topic starter
 

já resolvi, se alguém quiser saber, dá o grito ^^

"Nisto se manifestou o amor de Deus em nós: em haver Deus enviado o seu Filho unigênito ao mundo, para vivermos por meio dEle" 1 Jo 4-9

 
Postado : 17/08/2012 10:17 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa noite!!

Ao resolver um questão lembre se de marcar como resolvido!!

Veja como em:
viewtopic.php?f=7&t=3784

Mostre sua solução, alguém pode ter a mesma dúvida....

Obrigado!!!

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 17/08/2012 5:22 pm
(@vitor)
Posts: 57
Trusted Member
Topic starter
 

ok (:

usei

Private Sub CbCadastrar_Click()
     Dim i As Integer
         
    
    
      
    lastrow = Plan2.Range("A1048576").End(xlUp).Row              'confere a última linha preenchida
    lastrow = lastrow + 1                                                         ' começa a escrever depois da última preenchida
    
    For i = lastrow To lastrow
    
        
    Plan2.Range("A" & i).Value = CmbCandidato.Value              'valor da célula será o da combobox 
    Plan2.Range("C" & i).Value = LbaIdade.Caption
    Plan2.Range("D" & i).Value = LbSexo.Caption
    Plan2.Range("E" & i).Value = CmbData.Value
    Plan2.Range("F" & i).Value = CmbCategoria.Value
        

é isso ^^

"Nisto se manifestou o amor de Deus em nós: em haver Deus enviado o seu Filho unigênito ao mundo, para vivermos por meio dEle" 1 Jo 4-9

 
Postado : 20/08/2012 10:29 am