Fórum Pular linha depois de uma tabela do word #337056
31/01/2007
0
Olá Pessoal!
Como faço, no word, para pular uma linha logo após uma tabela, para dar continuidade no texto.
O código tá assim, mas qdo insiro uma linha ele insere na coluna e se eu der nextcell ele vai construir uma próxima linha!
[i:8633ca822e][b:8633ca822e] msword.Insert(´ Ótima Oportunidade para regularizar seu nome: ´);
msword.tableinserttable(NumColumns:=2, NumRows:=2); //Insere tabela
msword.TableSelectTable; //seleciona a tabela inteira
msword.TableAutoFormat(Format:=16);
msword.startOfRow;//coloca o cursor piscando no começo da linha
msword.insert(´Valor dos Títulos Vencidos R$ ´+CurrToStr(total));// escreve
msword.nextcell;//vai para a Proxima Celula se não existe ainda ele cria outra linha
msword.insert(´Descontos e Número de Parcelas´);// escreve
msword.nextcell;//vai para a Proxima Celula se não existe ainda ele cria outra linha
msword.insert(´Pagamento à vista´);// escreve
msword.nextcell;//vai para a Proxima Celula se não existe ainda ele cria outra linha
msword.insert(´R$ ´+CurrToStr(total*0.5));// escreve[/b:8633ca822e][/i:8633ca822e]
msword.nextcell;//vai para a Proxima Celula se não existe ainda ele cria outra linha
msword.insert(´Pagamento à vista´);// escreve
msword.nextcell;//vai para a Proxima Celula se não existe ainda ele cria outra linha
msword.insert(´R$ ´+CurrToStr(total*0.5));// escreve[/b][/i]
msword.nextcell;//vai para a Proxima Celula se não existe ainda ele cria outra linha
msword.insert(´Pagamento a prazo´);// escreve
msword.nextcell;//vai para a Proxima Celula se não existe ainda ele cria outra linha
msword.insert(´40¬ desc o restante em até 8x (entrada + 7x)´);// escreve
[u:8633ca822e] msword.Insert(´ ´+#13);
msword.Insert(´Obs.: Os descontos serão aplicados sob o valor principal e não incidirá ´);
msword.Insert(´juros nem multa, todas as parcelas serão em cheque. ´);[/u:8633ca822e]
O código sublinhado deve estar fora da tabela e não dentro dela!
Aguardo!
Silbene.[/i][/b]
Como faço, no word, para pular uma linha logo após uma tabela, para dar continuidade no texto.
O código tá assim, mas qdo insiro uma linha ele insere na coluna e se eu der nextcell ele vai construir uma próxima linha!
[i:8633ca822e][b:8633ca822e] msword.Insert(´ Ótima Oportunidade para regularizar seu nome: ´);
msword.tableinserttable(NumColumns:=2, NumRows:=2); //Insere tabela
msword.TableSelectTable; //seleciona a tabela inteira
msword.TableAutoFormat(Format:=16);
msword.startOfRow;//coloca o cursor piscando no começo da linha
msword.insert(´Valor dos Títulos Vencidos R$ ´+CurrToStr(total));// escreve
msword.nextcell;//vai para a Proxima Celula se não existe ainda ele cria outra linha
msword.insert(´Descontos e Número de Parcelas´);// escreve
msword.nextcell;//vai para a Proxima Celula se não existe ainda ele cria outra linha
msword.insert(´Pagamento à vista´);// escreve
msword.nextcell;//vai para a Proxima Celula se não existe ainda ele cria outra linha
msword.insert(´R$ ´+CurrToStr(total*0.5));// escreve[/b:8633ca822e][/i:8633ca822e]
msword.nextcell;//vai para a Proxima Celula se não existe ainda ele cria outra linha
msword.insert(´Pagamento à vista´);// escreve
msword.nextcell;//vai para a Proxima Celula se não existe ainda ele cria outra linha
msword.insert(´R$ ´+CurrToStr(total*0.5));// escreve[/b][/i]
msword.nextcell;//vai para a Proxima Celula se não existe ainda ele cria outra linha
msword.insert(´Pagamento a prazo´);// escreve
msword.nextcell;//vai para a Proxima Celula se não existe ainda ele cria outra linha
msword.insert(´40¬ desc o restante em até 8x (entrada + 7x)´);// escreve
[u:8633ca822e] msword.Insert(´ ´+#13);
msword.Insert(´Obs.: Os descontos serão aplicados sob o valor principal e não incidirá ´);
msword.Insert(´juros nem multa, todas as parcelas serão em cheque. ´);[/u:8633ca822e]
O código sublinhado deve estar fora da tabela e não dentro dela!
Aguardo!
Silbene.[/i][/b]
Silbene
Curtir tópico
+ 0
Responder
Posts
01/02/2007
Curiosa
sobe!
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)