Impression USF avec imprimante en réseau (Nom + Port OK)

Bonjour à tous,

Je coince sur l'impression d'un USF sur une imprimante sur serveur. Après avoir cherché j'ai trouvé plusieurs choses intéressantes mais qui ne fonctionne pas pour moi. (Dans un cas on imprime une feuille du classeur sur une imprimante en réseau, dans un autre cas on imprime un USF sur une imprimante en local) => J'ai essayé de faire un micmac mais rien de bon

Si quelqu'un a déjà écris ce genre de macro pour un USF sur imprimante en réseau qu'il me fasse signe

Nom de l'imprimante en question : FR HP Chef LPI Transfo

Port : 172.17.72.228

Essai non concluant (sans aucune prétention car je ne sais pas par où passer...)

    Dim Nom As String
    Dim Imprimante As String
    Dim i As Integer

    Imprimante = "FR HP Chef LPI Transfo"

    For i = 0 To 100
        If i < 10 Then
            Nom = Imprimante & " sur Ne0" & i & ":"
        Else
            Nom = Imprimante & " sur Ne" & i & ":"
        End If
        On Error Resume Next
        Application.ActivePrinter = Nom
        If ActivePrinter = Nom Then Exit For
    Next

        Me.PrintForm , ActivePrinter:=Nom, Collate:=True

Merci pour votre aide

Re-bonjour,

En passant l'imprimante que je veux en défaut c'est Ok mais j'ai toujours pas l'impression du Userform... Je suis donc passé par "Me.Printform" et il me dit que le nombre d'arguments incorrects ou affectation de propriété incorrecte...

Je pense que cela vient du fait que je maximize mon USF et que j'enlève la barre de titre, donc j'ai essayé en enlevant tout ça et j'ai l'erreur ci-dessous :