Bonjour le forum
j'ai un petit problème d'impression sur USF qui comporte ce code
Private Sub CommandButton1_Click(
Application.ScreenUpdating = Fals
If OptionButton1 = True And OptionButton4 = True The
Documents.Open "D:\Document\Eric\Transmis\avis-c20.doc
ActiveDocument.Bookmarks("nmrsur2").Selec
Selection.TypeText Text:=TextBox1.Tex
ActiveDocument.PrintOu
ActiveDocument.Close
Els
ActiveDocument.Close
End I
Application.ScreenUpdating = Tru
End Su
Tout fonctionne comme je le désire mais le problème est que le document appelé comporte plusieurs zones et en conséquence l'impression ne se fait pas car quand je force la fermeture de mon document, j'ai la présence d'un MSGBox me demandant
Les marges de la section 1 sont définies à l'extérieur de la zone d'impression de la page
Poursuivre l'impression avec les choix oui ou no
Donc quelqu'un aurait-il une solution pour forcer ce"OUI" en continuant en sous couche? j'ai essayé de modifier le document d'origine mais je ne peux pas car trois zones différentes donc je pense que j'aurai tout le temps ce message... merci d'avance pour votre aid
@++ Ericbtz
Bonjour le forum, j'ai un petit problème d'impression sur USF qui comporte ce code:
Private Sub CommandButton1_Click() Application.ScreenUpdating = False If OptionButton1 = True And OptionButton4 = True Then Documents.Open "D:DocumentEricTransmisavis-c20.doc" ActiveDocument.Bookmarks("nmrsur2").Select Selection.TypeText Text:=TextBox1.Text ActiveDocument.PrintOut ActiveDocument.Close 0 Else ActiveDocument.Close 0 End If Application.ScreenUpdating = True End Sub
Tout fonctionne comme je le désire mais le problème est que le document appelé comporte plusieurs zones et en conséquence l'impression ne se fait pas car quand je force la fermeture de mon document, j'ai la présence d'un MSGBox me demandant: Les marges de la section 1 sont définies à l'extérieur de la zone d'impression de la page. Poursuivre l'impression avec les choix oui ou non
Donc quelqu'un aurait-il une solution pour forcer ce"OUI" en continuant en sous couche? j'ai essayé de modifier le document d'origine mais je ne peux pas car trois zones différentes donc je pense que j'aurai tout le temps ce message... merci d'avance pour votre aide @++ Ericbtz
Bonjour le forum,
j'ai un petit problème d'impression sur USF qui comporte ce code:
Private Sub CommandButton1_Click()
Application.ScreenUpdating = False
If OptionButton1 = True And OptionButton4 = True Then
Documents.Open "D:DocumentEricTransmisavis-c20.doc"
ActiveDocument.Bookmarks("nmrsur2").Select
Selection.TypeText Text:=TextBox1.Text
ActiveDocument.PrintOut
ActiveDocument.Close 0
Else
ActiveDocument.Close 0
End If
Application.ScreenUpdating = True
End Sub
Tout fonctionne comme je le désire mais le problème est que le document appelé comporte plusieurs zones et en conséquence l'impression ne se fait pas car quand je force la fermeture de mon document, j'ai la présence d'un MSGBox me demandant:
Les marges de la section 1 sont définies à l'extérieur de la zone d'impression de la page.
Poursuivre l'impression avec les choix oui ou non
Donc quelqu'un aurait-il une solution pour forcer ce"OUI" en continuant en sous couche? j'ai essayé de modifier le document d'origine mais je ne peux pas car trois zones différentes donc je pense que j'aurai tout le temps ce message... merci d'avance pour votre aide
@++ Ericbtz
Bonjour le forum, j'ai un petit problème d'impression sur USF qui comporte ce code:
Private Sub CommandButton1_Click() Application.ScreenUpdating = False If OptionButton1 = True And OptionButton4 = True Then Documents.Open "D:DocumentEricTransmisavis-c20.doc" ActiveDocument.Bookmarks("nmrsur2").Select Selection.TypeText Text:=TextBox1.Text ActiveDocument.PrintOut ActiveDocument.Close 0 Else ActiveDocument.Close 0 End If Application.ScreenUpdating = True End Sub
Tout fonctionne comme je le désire mais le problème est que le document appelé comporte plusieurs zones et en conséquence l'impression ne se fait pas car quand je force la fermeture de mon document, j'ai la présence d'un MSGBox me demandant: Les marges de la section 1 sont définies à l'extérieur de la zone d'impression de la page. Poursuivre l'impression avec les choix oui ou non
Donc quelqu'un aurait-il une solution pour forcer ce"OUI" en continuant en sous couche? j'ai essayé de modifier le document d'origine mais je ne peux pas car trois zones différentes donc je pense que j'aurai tout le temps ce message... merci d'avance pour votre aide @++ Ericbtz
Anacoluthe « Cest toujours quand il est trop tard que jarrive à lever mes inhibitions. » - Woody ALLEN
Bonjour le forum, j'ai un petit problème d'impression sur USF qui comporte ce code:
Private Sub CommandButton1_Click() Application.ScreenUpdating = False If OptionButton1 = True And OptionButton4 = True Then Documents.Open "D:DocumentEricTransmisavis-c20.doc" ActiveDocument.Bookmarks("nmrsur2").Select Selection.TypeText Text:=TextBox1.Text ActiveDocument.PrintOut ActiveDocument.Close 0 Else ActiveDocument.Close 0 End If Application.ScreenUpdating = True End Sub
Tout fonctionne comme je le désire mais le problème est que le document appelé comporte plusieurs zones et en conséquence l'impression ne se fait pas car quand je force la fermeture de mon document, j'ai la présence d'un MSGBox me demandant: Les marges de la section 1 sont définies à l'extérieur de la zone d'impression de la page. Poursuivre l'impression avec les choix oui ou non
Donc quelqu'un aurait-il une solution pour forcer ce"OUI" en continuant en sous couche? j'ai essayé de modifier le document d'origine mais je ne peux pas car trois zones différentes donc je pense que j'aurai tout le temps ce message... merci d'avance pour votre aide @++ Ericbtz
Anacoluthe
« Cest toujours quand il est trop tard
que jarrive à lever mes inhibitions. »
- Woody ALLEN
Bonjour le forum,
j'ai un petit problème d'impression sur USF qui comporte ce code:
Private Sub CommandButton1_Click()
Application.ScreenUpdating = False
If OptionButton1 = True And OptionButton4 = True Then
Documents.Open "D:DocumentEricTransmisavis-c20.doc"
ActiveDocument.Bookmarks("nmrsur2").Select
Selection.TypeText Text:=TextBox1.Text
ActiveDocument.PrintOut
ActiveDocument.Close 0
Else
ActiveDocument.Close 0
End If
Application.ScreenUpdating = True
End Sub
Tout fonctionne comme je le désire mais le problème est que le
document appelé comporte plusieurs zones et en conséquence
l'impression ne se fait pas car quand je force la fermeture de mon
document, j'ai la présence d'un MSGBox me demandant:
Les marges de la section 1 sont définies à l'extérieur de la zone
d'impression de la page.
Poursuivre l'impression avec les choix oui ou non
Donc quelqu'un aurait-il une solution pour forcer ce"OUI" en
continuant en sous couche? j'ai essayé de modifier le document
d'origine mais je ne peux pas car trois zones différentes donc je
pense que j'aurai tout le temps ce message... merci d'avance pour
votre aide
@++ Ericbtz
Anacoluthe « Cest toujours quand il est trop tard que jarrive à lever mes inhibitions. » - Woody ALLEN
Bonjour le forum, j'ai un petit problème d'impression sur USF qui comporte ce code:
Private Sub CommandButton1_Click() Application.ScreenUpdating = False If OptionButton1 = True And OptionButton4 = True Then Documents.Open "D:DocumentEricTransmisavis-c20.doc" ActiveDocument.Bookmarks("nmrsur2").Select Selection.TypeText Text:=TextBox1.Text ActiveDocument.PrintOut ActiveDocument.Close 0 Else ActiveDocument.Close 0 End If Application.ScreenUpdating = True End Sub
Tout fonctionne comme je le désire mais le problème est que le document appelé comporte plusieurs zones et en conséquence l'impression ne se fait pas car quand je force la fermeture de mon document, j'ai la présence d'un MSGBox me demandant: Les marges de la section 1 sont définies à l'extérieur de la zone d'impression de la page. Poursuivre l'impression avec les choix oui ou non
Donc quelqu'un aurait-il une solution pour forcer ce"OUI" en continuant en sous couche? j'ai essayé de modifier le document d'origine mais je ne peux pas car trois zones différentes donc je pense que j'aurai tout le temps ce message... merci d'avance pour votre aide @++ Ericbtz
