Saberexcel - o site de quem precisa Aprender sobre Macros Microsoft Excel VBA
Esse procedimento do Aplicativo Microsoft Excel VBA(Visual Basic Application), mostra os objetos TextBox desejados a partir de uma seleção no Objeto Combobox. Aproveitei para lhes mostrar como interagir com alguns outros objetos, formatando-os. É bem simples. Espero que o exemplo possa ajudá-los. Fiquem com Deus. Expedito Marcondes
Option Explicit
Private Sub ComboBox1_Click()
Dim i As Byte
'------------'
For i = 1 To 4
Controls("textbox" & i).Visible = False 'torna visivel a textbox(caixa de texto) desejada
Next i
Controls("textbox" & ComboBox1.ListIndex + 1).Visible = True
'------------'
'apenas formatação dos objetos (treinamento excel vba)
'observe que somente copiei a parte do código acima em laranja e inserí como Caption e ou Backcolor dos objetos desejados
Frame1.Caption = Controls("textbox" & ComboBox1.ListIndex + 1)
ComboBox1.BackColor = Controls("textbox" & ComboBox1.ListIndex + 1).BackColor
Label1.BackColor = Controls("textbox" & ComboBox1.ListIndex + 1).BackColor
Label2.ForeColor = Controls("textbox" & ComboBox1.ListIndex + 1).BackColor
frmSaberexcel_Treinamento.BackColor = Controls("textbox" & ComboBox1.ListIndex + 1).BackColor
End Sub
(esse exemplo faz parte dos nossos módulos COMO FAZER - Programação MS Excel VBA)

Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel


Excel planilha vba textboxes interacao com objeto combobox (66.3 KB)