Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
Ajuda com código ut...
 
Notifications
Clear all

Ajuda com código utilizando ComboBox

 
2024 - VBA & Macros
Post Recente por Wagner Morel 10 anos atrás
8 Posts
3 Usuários
0 Reactions
1,200 Visualizações
RSS
 Andilles
(@andilles)
Posts: 4
New Member
Topic starter
 

Necessito de ajuda com a seguinte situação:

Em uma planilha (plan1) existe um ComboBox ao qual escolhendo uma das opções nele envia para outra planilha (plan2).
Escrevi o código da seguinte forma no ComboBox1 utilizando o DropButtonClick

Private Sub ComboBox1_DropButtonClick()
Sheets("ENTREGA DE CAIXA").Activate
Range("H6").Select
ActiveCell.FormulaR1C1 = ComboBox1.Value
End Sub

Aparece o erro:
Erro em tempo de execução '1004'
O método Select da classe Range falhou.

Eu não encontro o erro.

 
Postado : 17/07/2014 11:15 am
Fernando Fernandes
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Experimente utilizar esse codigo no evento Change do combo
Se não forsso poste sua planilha modelo/exemplo (compactada Zip/Rar/7z...)

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

 
Postado : 17/07/2014 11:26 am
Wagner Morel
 Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

Andilles,

Boa Tarde!

Como disse Reinaldo, você deve experimentar colocar o código no evento Change do Combo...

Todavia (não testei), se quiser continuar utilizando o mesmo evento, creio que basta você selecionar antes a planilha para onde o valor será inserido. Tipo isso:

Private Sub ComboBox1_DropButtonClick()
Sheets("ENTREGA DE CAIXA").Activate
Range("H6").Select
Sheets("Plan2").Select
ActiveCell.FormulaR1C1 =Sheets("ENTREGA DE CAIXA").ComboBox1.Value
End Sub

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

 
Postado : 17/07/2014 11:32 am
 Andilles
(@andilles)
Posts: 4
New Member
Topic starter
 

Experimente utilizar esse codigo no evento Change do combo
Se não forsso poste sua planilha modelo/exemplo (compactada Zip/Rar/7z...)

Por gentileza Reinaldo se puder me auxiliar.
https://drive.google.com/file/d/0B2rQgd ... sp=sharing

 
Postado : 17/07/2014 12:02 pm
 Andilles
(@andilles)
Posts: 4
New Member
Topic starter
 

Segue arquivo.

78-09.07.14.rar
 
Postado : 17/07/2014 12:17 pm
Wagner Morel
 Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

Andilles,

Veja se é assim.

78-09.07.14.zip

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

 
Postado : 17/07/2014 1:21 pm
 Andilles
(@andilles)
Posts: 4
New Member
Topic starter
 

É exatamente isto Morel, muito obrigado! :D

 
Postado : 17/07/2014 2:07 pm
Wagner Morel
 Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

Valeu!

Por gentileza, vote positivamente clicando na mãozinha verde que está localizada no canto superior direito da área de mensagens, próxima da ferramenta Citar.

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

 
Postado : 17/07/2014 3:56 pm
Forum Jump:
  Tópico Anterior
Próximo Tópico