Bonjour à tous, Bonjour à toi!
J'utilise des Boutons d'ioptions dans un userform, avec 3 options dispo pour l'utilisateur.
J'aimerais que lorsque l'utilisateur selectionne une des options et appuie sur Ok, sa reponse soit enregistré par excel.
Par exemple
l'utilisateur choisi Option1, alors excel enregistre reponse = "ARVFWD".
Ensuite VBA va réutiliser reponse = "ARVFWD" pour renommer des fichiers etc...
Mais mon pb est qu'il me renvoi que reponse= vide...

Voici une partie du code en question(de l'userform):

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
27
28
29
30
31
32
33
Private Sub Forwards_Click()
If Forwards = True Then
reponse = "ARVFWD"
Else
End If
End Sub
 
Private Sub Options_Click()
If Options = True Then
reponse = "ARVALL-OPT"
Else
End If
End Sub
 
Private Sub Offres_Click()
If Offres = True Then
reponse = "ARVALL-OPT"
Else
End If
End Sub
 
Private Sub OK_MouseUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal x As Single, ByVal Y As Single)
UserForm1.Hide
ouvrir_fichier
End Sub
Sub ouvrir_fichier()
 
FichFin = ActiveWorkbook.Sheets(1).Cells(18, 12).Value
'MsgBox prompt:=FichFin
 
If reponse = "ARVALL-OPT" Then Call opt Else
 
Workbooks.Open Filename:=Worksheets("1").Range("J12") & "\" & reponse & ".xls"
Merci pour vos eclairages @+