Bonjour à tous,
J'utilise la macro évènementielle workbook_open lors de l'ouverture de mon fichier.
J'aimerai que cette macro puisse effectuer 2 actions :
la 1ére : demande de mot passe, pour avoir l'accès au fichier
la 2éme : retourne une valeur dans un msgbox.
J'arrive a faire les fonctionner les macros séparément mais je n'arrive pas à faire effectuer les deux actions a l'ouverture du fichier, seuls la 1 s'effectue
Ci-dessous le code :
Private Sub Workbook_Open()
Dim nom As String
nom = InputBox("quel est votre nom")
If nom = "edwards" Then
Workbooks.Open ("C:\Users\edwards\Desktop\SE")
If Cells(2, 11) <= Date + 60 And cellule <> "" And Range("b8").Value > 0 Then MsgBox ("ATTENTION IL FAUT DEPENSER AVANT LE 31/12/2017" & " LE MONTANT QUI RESTE A DEPENSER EST DE :" & Range(" b8 ").Value & "€")
If Range("b8").Value < 0 Then MsgBox ("NE PLUS RIEN DEPENSER NOUS SOMMES EN DEFICIT DE : " & Range("b8").Value & €)
Else
Workbooks.Close
End If
End Sub
merci de votre aide