Bonjour,

J'ai beau chercher et je ne trouve pas la solution à mon problème. Je sais même pas par ou commencer.

Dans les grandes lignes, j'ai code qui execute une série d'action.
Arrive un moment ou j'ai mit un MSGBOX en place, OUI, NON, ANNULER.

Par contre il me faudrait un 4eme bouton avec IMPRIMER
Merde MSGBOX me propose que 3 actions. Donc j'ai crée un USERFORM personnalisé.

Mais comment mettre mes fonctions dans cet USF voir BOUTONS
CODE DES BOUTONS

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
Option Explicit
 
Public Sub cmd1_Click()
     xlWba.Close Savechanges:=True
     xlWb.Activate
     Cells(x + 2, 16) = Ligneinsertion
     Unload USF1
End Sub
 
Private Sub cmd2_Click()
    Me.Hide
    Feuil1.PrintPreview
    xlWba.Close Savechanges:=True
    Unload USF1
End Sub
 
Private Sub cmd3_Click()
    xlWba.Close Savechanges:=False
    Unload USF1
End Sub
 
Private Sub cmd4_Click()
     xlWba.Close Savechanges:=False
     Exit Sub
     Unload USF1
End Sub
Merci pour votre aide, ou du moment une piste pour réussir