J'ai un problème de paramétrage d'imprimante
Ça, ça marche !
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
Dim ImprimanteActive 
    ImprimanteActive = Application.ActivePrinter
    MsgBox ImprimanteActive
Mais ça, ça marche pas !
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
    Set ImprimanteActive = Application.ActivePrinter
    With ImprimanteActive 
        '....
    End With
Ça, ça marche !
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
With Application
      ImprimanteActive = .ActivePrinter
End With
Mais ça, ça marche pas !
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
    With Application
        Set ImprimanteParDéfaut = .ActivePrinter
        With ImprimanteParDéfaut
            '....
        End With
    End With
Message d'erreur dans les deux cas "Objet requis" sur ActivePrinter

Alors que dans l'aide j'ai bien ça :
Utilisez la propriété Application pour renvoyer l'objet Application
De quoi "il" parle ?

Merci par avance de me donner vos impressions (!)