Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
Dados do FORM para ...
 
Notifications
Clear all

Dados do FORM para a planinha

 
2024 - VBA & Macros
Post Recente por marcosta 7 anos atrás
3 Posts
2 Usuários
0 Reactions
939 Visualizações
RSS
 marcosta
(@marcosta)
Posts: 13
Active Member
Topic starter
 

Boa Noite Amigos,

Segue uma dúvida de leigo:

Se tento fazer isso (T_DESCRICAO e T_CONTA são TEXTBOX do formlário:

Worksheets("T_CONTAS").Range("C" & plano_contas.ListIndex + 1).Value = UCase(T_DESCRICAO.Text)
Worksheets("T_CONTAS").Range("B" & plano_contas.ListIndex + 1).Value = "'" & T_CONTA.Text

Só a primeira linha dá certo (envia o dado do textbox para a célula da planilha), se eu inverto a ordem das linhas dá certo só a primeira também.

Obrigado.

 
Postado : 22/06/2017 7:29 pm
brunoxro
 brunoxro
(@brunoxro)
Posts: 698
Honorable Member
 

Boa noite Marco,

Anexe uma planilha de exemplo, assim fica mais fácil tentar ajudar.

Olhando por cima, não entendi porque você usou .ListIndex nesse caso.

att,

 
Postado : 22/06/2017 8:35 pm
 marcosta
(@marcosta)
Posts: 13
Active Member
Topic starter
 

Boa Noite,

Resolvi atribuindo valores a variáveis:

v_conta = T_CONTA.Text
v_descricao = UCase(T_DESCRICAO.Text)
Worksheets("T_CONTAS").Range("C" & plano_contas.ListIndex + 1).Value = v_descricao
Worksheets("T_CONTAS").Range("B" & plano_contas.ListIndex + 1).Value = "'" & v_conta

Em tempo, usei ListIndex pq "plano_contas" é um list box, e preciso adicionar o valor na linha selecionada.

Obrigado.

 
Postado : 22/06/2017 9:33 pm
Forum Jump:
  Tópico Anterior
Próximo Tópico