Jump to content


SMSM

Member Since 19/01/2007
Offline Last Active 27/12/2011, 08:21
-----

#946967 Quebrando Texto - Campo Memorando.

Posted by SMSM on 18/11/2008, 14:44

Boa tarde.

Estou trabalhando com Acess 2007 e preciso de uma macro ou rotina que quebre uma descrição longa em campo MEMORANDO em 132 caracteres e ainda coloque a referência do código dessa descrição, segue exemplo abaixo:

INFORMAÇÕES ORIGINAIS
Campo 1 - Texto - Campo 2 - Memorando
1234567 - EIXO; TIPO: NAO APLICAVEL; APLICACAO: REDUTOR VELOCIDADE/VARIADOR; MODELO: SIZE-F-12; SERIE: NAO APLICAVEL; FABRICANTE CARTER GEAR PN 409

987665 - EIXO; TIPO: NAO APLICAVEL; APLICACAO: VENTILADOR AXIAL; MODELO: MDL45-100/160T; SERIE: NAO APLICAVEL; FABRICANTE BOLDROCCHI MOD MDL45-100/160T

INFORMAÇÕES APÓS O TRATAMENTO
Campo 1 - Texto - Campo 2 - Memorando
1234567 - EIXO; TIPO: NAO APLICAVEL; APLICACAO: REDUTOR VELOCIDADE/VARIADOR; MODELO: SIZE-F-12; SERIE: NAO APLICAVEL; FABRICANTE CARTER GEAR P
1234567 - N 409

987665 - EIXO; TIPO: NAO APLICAVEL; APLICACAO: VENTILADOR AXIAL; MODELO: MDL45-100/160T; SERIE: NAO APLICAVEL; FABRICANTE BOLDROCCHI MOD MDL4
987665 - 5-100/160T


A segunda situação que estou enfrentado e também preciso de uma macro ou rotina e fazer a concatenação de texto de várias linhas com vários campos em um único campo, sendo que quando o código do item e a descrição forem identicas efetue a concatenação, segue abaixo exemplo:

INFORMAÇÕES ORIGINAIS
Campo 1 - Texto - Campo 2 - Memorando - Campo 3 Texto - Campo 4 Texto
1234567 - EIXO; APLICACAO: REDUTOR VELOCIDADE - FABRICAN 1 - REFERENCIA 1
1234567 - EIXO; APLICACAO: REDUTOR VELOCIDADE - FABRICAN 2 - REFERENCIA 2
1234567 - EIXO; APLICACAO: REDUTOR VELOCIDADE - FABRICAN 3 - REFERENCIA 3

INFORMAÇÕES APÓS O TRATAMENTO

Campo 1 - Texto - Campo 2 - Memorando - Campo 3 Memorando
1234567 - EIXO; APLICACAO: REDUTOR VELOCIDADE - EIXO; APLICACAO: REDUTOR VELOCIDADE; FABRICAN 1 REFERENCIA 1; FABRICAN 2 REFERENCIA 2; FABRICAN 3 REFERENCIA 3

Fico no aguardo.
Obrigado.


IPB Skin By Virteq