[Resolvido]Caixa de combinação ler só a segunda palavra

Boa tarde Amigos

Queria que ao clikar numa caixa de combinação mostrasse a segunda palavra de uma frase:

Exemplo

1º exemplo -Sofá King 3 Lugares ----- Este são os dados do campo da caixa de combinação.

Mas ao fazer click na caixa de combinação só mostrava a palavra King


2º exemplo -Base Royal Madeira ----- Este são os dados do campo da caixa de combinação.

Mas ao fazer click na caixa de combinação só mostrava a palavra Royal

Será possível

Obrigado

Assis veja esse exemplo!!  tenta adaptar ao seu projeto

Caso sejam colunas diferentes tens de ir buscar a colluna 1:

2palavra = Me.caixa.Column(1)

Caso seja uma frase inteira tens de ir buscar a frase e depois partir. Mais ou menos assim:

frase = me.caixa
frasesema1palavra = mid(frase, instr(frase, " ") + 1)
2palavra = left(frasesema1palavra, instr(frasesema1palavra, " ") - 1)

Creio que qualquer coisa assim funciona.

Experimenta,

Eu tenho várias situações dessas.

Espero ter ajudado.

Boa tarde!

Creio que isto atenda sua necessidade:

Mid("teste teste1 teste2", InStr(1, "teste teste1 teste2", " ")+1, InStr(InStr(1, "teste teste1 teste2", " ")+1, Mid("teste teste1 teste2", InStr(1, "teste teste1 teste2", " ")+1), " "))

Altere a string "teste teste1 teste2" para sua variável com valor;
Altere a string " " (espaço simples) para a variável com valor objetivo;

Obs.: O Código acima vai funcionar se houver padrão nos valores quando contiverem apenas um espaço simples. Caso não haja esta padronização recomendo criar uma function que percorra a String implementando uma lógica mais robusta.

Bom dia

Não consegui resolver.

Nuno, ou Philipp, um exemplo ?

Obrigado

Coloca o seguinte texto:


Private Sub Form_Load()
dim tt as string ' variável texto que vais tirar da caixa de combinação
dim t2 as string ' variável texto só com a segunda palavra
tt = "João Maria Paula Antonina"
t2 = Left(Mid(tt, InStr(tt, " ") + 1), InStr(Mid(tt, InStr(tt, " ") + 1), " ") - 1)
MsgBox t2
End Sub


Quando abrires o form vai aparecer "Maria".

Obrigado Mestre Avelino