Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Microsoft 365 Problème imprimante par défaut

S

sylviecro

XLDnaute Nouveau
Bonjour,

J'ai cherché, essayé plein de trucs mais voilà que rien ne fonctionne.
J'aimerais faire une copie d'une feuille excel et l'imprimer en Foxit reader, mais je
suis incapable de changer l'imprimante par défaut. Ça ne change pas.
Voici le code :

Private Sub CommandButton4_Click()

Dim monfichier As String

monfichier = Sheets("Rapport urgence").Range("S1")
ActiveWorkbook.SaveAs Filename:=monfichier
Application.ActivePrinter = "Foxit Reader PDF Printer sur Ne01:"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
"Foxit Reader PDF Printer sur Ne01:", Collate:=True

End Sub

Merci de m'aider
 
Trier par date Trier par votes

Staple1600

XLDnaute Barbatruc
Re

Voila ce que cela peut donner par le biais d'une macro
VB: 
Sub Macro1()
Dim NomChemFic$
NomChemFic = "C:\Users\STAPLE\Documents\2020\WelcomeToTheMachine.pdf" ' ici adapter chemin dossier et nom fichier
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
    Filename:=NomChemFic, _
    Quality:=xlQualityStandard, _
    IncludeDocProperties:=True, _
    IgnorePrintAreas:=False, _
    OpenAfterPublish:=False
End Sub
 
Vote positif 0 Vote négatif
S

sylviecro

XLDnaute Nouveau
Merci j'ai copié le code plus haut et ajusté à ma feuille et ça fonctionne... surement le workbook qui fonctionnait pas, mais bon j'ai compris c'est ce qui compte.
Encore un gros merci de votre aide, sans vous on pourrait rien faire nous les apprentis
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.

Discussions similaires

G
  • Question
Microsoft 365 Macro Imprimer 2 pages Pdf sur 1 feuilles (par PDF Creator sur un serveur)
Réponses
0
Affichages
815
greg63
G
J
  • Question
Imprimante par defaut
Réponses
7
Affichages
2 K
jpaul625
J
F
  • Question
Problème avec Macro VBA Excel 2003 création de fichier pdf avec adobe 9.5 pro
Réponses
1
Affichages
2 K
farf2101
F
V
  • Question
imprimer feuille en précisant le nom d'une imprimante et non imprimante par défau
Réponses
0
Affichages
788
verolyde
V
S
  • Question
Choix d'une imprimante à partir des imprimantes disponibles
Réponses
3
Affichages
2 K
Sly
S
  • Question
RÉSOLU Forcer utilisation de l'imprimante par défaut
Réponses
2
Affichages
4 K
chris6999
G
  • Question
gestion imprimante
Réponses
3
Affichages
1 K
JCGL
M
  • Question
EXCEL / VBA. Création dossier PDF + Nom fichier variable + dossier variable
Réponses
0
Affichages
2 K
Maxim_
M
L
  • Question
Ordre imprimantes (Ne01,...)
Réponses
2
Affichages
21 K
linux21
L
  • Question
Sélection auto du port de l'imprimante
Réponses
0
Affichages
1 K
francedemo
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…