[Resolvido]Como imprimir 2 vias em uma mesma folha/página ?

Highlander8 23/10/2012, 11:32

Highlander8: Intermediário; Respeito às regras :

Sexo :
Localização :
Mensagens : 70
Registrado : 25/10/2011

Mensagem nº1

[Resolvido]Como imprimir 2 vias em uma mesma folha/página ?

Mensagem Highlander8 23/10/2012, 11:32

Amigos,
Achei um tópico parecido, mas o mesmo não havia resposta.
Sendo assim, preciso mais uma vez de vossas ajudas...

Tenho que imprimir um relatório em 2 vias, porém o mesmo só ocupa metade da folha A4.
Para não ter um desperdicio de papel, gostaria de imprimir as 2 vias na mesma folha.

Como consigo fazê-lo?

No aguardo de vossos comentários.

Muito obrigado.

criquio 23/10/2012, 12:54

criquio

criquio: Moderador Global; Respeito às regras :

Sexo :
Localização :
Mensagens : 11229
Registrado : 30/12/2009

Mensagem nº2

Re: [Resolvido]Como imprimir 2 vias em uma mesma folha/página ?

Mensagem criquio 23/10/2012, 12:54

Já tentou a dica desse tópico?

.................................................................................

Meu novo site: www.vcssistemas.com.br

Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.

DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
1 - faça uma cópia do aplicativo
2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
3 - use o Compactar/Reparar
4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)

Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
Positive as mensagens que achar útil, no canto superior direito delas.

Highlander8 23/10/2012, 18:12

Highlander8

Highlander8: Intermediário; Respeito às regras :

Sexo :
Localização :
Mensagens : 70
Registrado : 25/10/2011

Mensagem nº3

Como imprimir 2 vias em uma mesma folha/página ?

Mensagem Highlander8 23/10/2012, 18:12

Amigo Criquio.

Como sempre fazendo a diferença!
Muito obrigado pela ajuda.
RESOLVIDO!!

Coloquei tudo na seção "Detalhes" (Titulos, campos, etc....) e os repeti logo abaixo com "Ctrl+C" e "Ctrl+V".
Diferenciei-os apenas especificando as vias (1ª e 2ª).

Como diz nosso amigo JP: "Se foi resolvido, resolvido está".

Muito Obrigado!
Grande abraço.

.................................................................................
Private Sub Help_AfterUpdate()
If Me.Help = "Pude ajudar" Then
MsgBox("Foi um prazer!")
Else
MsgBox(“Tentarei novamente...")
End If
End Sub

Highlander.