Notifications
Clear all

Selecionar Valor na combobox

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

Novo aqui ^^

Como que seleciono um valor na combobox ?
tipo, Os valores estão listados mas não consigo selecioná-los,
desde já agradeço ^^

Ah! e como associo valores pra listar na combobox ? tipo, combinar o que tá na célula A1 com o qeu está na "B1" ?
Começando agora em programação então, paciência cmg ><'
abrass

 
Postado : 06/08/2012 8:30 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa tarde!!!

Peso que faça uma busca por nosso base de dados!

Caso inda sim não obtiver sucesso, poste seu arquivo compactado!!

Att

 
Postado : 06/08/2012 11:27 am
(@vitor)
Posts: 57
Trusted Member
Topic starter
 

Consegui selecionar os valores e tudo, mas não consegui colocar os valores de duas células associadas na combobox, então usei a função CONCATENAR e coloquei os dados que queria em outra célula :
tem algum outro jeito ? Pesquisei no Fórum mas não encontrei nada ><'

segue o anexo:

 
Postado : 09/08/2012 11:08 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Creio que se refere ao form "Inscrever Candidatos"

tente:

'para os candidatos
CmbCandidato.ColumnCount = 4
Me.CmbCandidato.RowSource = "Candidatos!A1:D9"

 
Postado : 09/08/2012 11:56 am
(@vitor)
Posts: 57
Trusted Member
Topic starter
 

Tem outra forma ? Por que desse jeito Mostrou os dados, mas quero selecionar esses dados, entende ? tipo "Adriano Siqueira".
desde já, agradeço ^^

 
Postado : 09/08/2012 12:07 pm
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Assim?

'para os candidatos
'Me.CmbCandidato.RowSource = "Candidatos!A1:D9"
Dim lastRow As Long
Dim i As Integer
CmbCandidato.Clear
' Verifica qual a ultima linha preenchida
lastRow = Plan3.Range("A65000").End(xlUp).Row
'adiciona dados
For i = 1 To lastRow
CmbCandidato.AddItem Plan3.Range("A" & i) & " " & Plan3.Range("B" & i)
Next
 
Postado : 09/08/2012 3:58 pm
(@vitor)
Posts: 57
Trusted Member
Topic starter
 

Isso mesmo ;D
vlw ^^

 
Postado : 10/08/2012 10:32 am