|
|
Postada em 05/01/2005 16:17 hs
Tenho 02 tabelas: uma com um campo que contém nome de empresas e outra com outro campo que contém palavras genéricas. Exemplo:
Tabela 01
Indústria e Comércio de Calçados Vamobora Ltda.
Tabela 02
indústria
comércio
de
Atacadista
calçados
Ltda.
Etc... Etc... Etc...
Olha só agora: Preciso copiar para um segundo campo na tabela 01 somente a palavra Fantasia da empresa, ou seja, VAMOBORA.
Como posso fazer esse tipo de relação??? Me ajudem por favor....
Fernando Crush
|
|
|
|
|
|
|
|
Postada em 05/01/2005 18:27 hs
Assim fica difícil pois como se sabe qual o mone fantasia...? |
|
|
|
|
|
Postada em 06/01/2005 08:57 hs
Romero: O nome fantasia de uma empresa é aquele que fica se vc tirar todas as palavras genéricas. Como no exemplo que eu mostrei na 1ª mensagem. Vai sobrar somente o VAMOBORA..... Obrigado por responder..... |
|
|
|
|
|
Postada em 06/01/2005 11:15 hs
Separe as string e faça sua própria comparação... Ex. Dim mtzTeste As Variant strTeste = Text1
mtzTeste = Split(strTeste, " ") Do While i <= UBound(mtzTeste)
If Len(mtzTeste(i)) = "Nome_a_Ser_Coparado") Then Rotina() end if
i = i + 1
Loop Espero ter ajudado... |
|
|
|
