Notifications
Clear all

Selecionar Valor na combobox

7 Posts
2 Usuários
0 Reactions
1,627 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

"Nisto se manifestou o amor de Deus em nós: em haver Deus enviado o seu Filho unigênito ao mundo, para vivermos por meio dEle" 1 Jo 4-9

 
Postado : 06/08/2012 8:30 am
Fernando Fernandes
(@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

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

 
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:

"Nisto se manifestou o amor de Deus em nós: em haver Deus enviado o seu Filho unigênito ao mundo, para vivermos por meio dEle" 1 Jo 4-9

 
Postado : 09/08/2012 11:08 am
Fernando Fernandes
(@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"

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

 
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 ^^

"Nisto se manifestou o amor de Deus em nós: em haver Deus enviado o seu Filho unigênito ao mundo, para vivermos por meio dEle" 1 Jo 4-9

 
Postado : 09/08/2012 12:07 pm
Fernando Fernandes
(@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

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

 
Postado : 09/08/2012 3:58 pm
(@vitor)
Posts: 57
Trusted Member
Topic starter
 

Isso mesmo ;D
vlw ^^

"Nisto se manifestou o amor de Deus em nós: em haver Deus enviado o seu Filho unigênito ao mundo, para vivermos por meio dEle" 1 Jo 4-9

 
Postado : 10/08/2012 10:32 am