texto formatado no word

Discussão em 'Progress 4GL' iniciado por rbaselio, Junho 16, 2010.

  1. rbaselio

    rbaselio Membro Participativo

    Bom dia a todos.

    Pessoal, considerando o seguinte codigo:
    Código:
    AppWord:Selection:Find:Text = "$nome".
    AppWord:Selection:Find:Replacement:Text = "Cleber" + chr(10) + "Machado".
    AppWord:Selection:Find:Forward = True.
    AppWord:Selection:Collapse.
    AppWord:Selection:Find:Execute(,,,,,,,,,,1,,,,).

    Quando eu abro o arquivo word gerado o comando de nova linha chr(10) não foi incluido e tudo está na mesma linha. Ja tentei com chr(13) e com "<br>" e deu na mesma.

    Alguém sabe como eu insiro um "enter" entre as palavras do word????

    Obrigado.

    Roberto Lopes
  2. mcarril

    mcarril Membro Participativo

    Abre o word, manda gravar uma nova macro, realize a operacao que você deseja, depois pare a macro e edite ela, veja o comando que foi utilizado, depois é so fazer analogia.

    Se ficar complicado, grave a macro simulando algum comando que voce ja conseguiu fazer.
  3. rbaselio

    rbaselio Membro Participativo

    Amigo, uma macro não resolve meu problema, o que eu quero é que ao inserir um texto no word por exemplo "Cleber" + chr(10) + "Machado" o resultado seja:
    Cleber
    Machado

    e não Cleber Machado;


    Obrigado.
  4. eduardo.leite

    eduardo.leite Equipe de Suporte Moderador Equipe de Suporte

    tente o seguinte:

    Código:
    
    AppWord:Selection:Find:Replacement:Text = "Cleber ^p Machado".
    
    
    O ^p indica quebra de paragrafo para o Word.
  5. mcarril

    mcarril Membro Participativo

    Você não entendeu o que eu quis dizer.

    Se você gravar uma macro enquanto faz um texto no Word, e for verificar o código gerado por esta macro, você encontrar os comando que você executou dentro do Word, enquanto estava gravando a macro.
    Com este procedimento você encontra os comando que você necessita para incluir nos programas progress que geram arquivos do Word.

    Abraços,

Compartilhe esta Página