Boa tarde.
Preciso que ao selecionar a combobox a outra informação seja preenchida na label.
Fiz alguns testes de código encontrados na internet e não deram certos.
Os dados que preciso são da planilha centro de custo, coluna classificação e centro de custo.
Preciso que quando escolher a classificação o label recebe o centro de custo.
O código para aparecer no combobox está funcionando perfeitamente.
Dim codigo
Dim rLast As Integer
Dim nome As String
Dim i As Long
Dim UltimaLinha As Long
UltimaLinha = Sheets("Centro_Custo").Cells(Cells.Rows.Count, 1).End(xlUp).Row
For i = 2 To UltimaLinha
Cbo_Classificacao.AddItem Range("A" & i).Value
Next
Cod_Embalagem.Caption = False
With Sheets("Embalagem")
Postado : 20/07/2018 1:08 pm