Re : Re: Macro bascule pour afficher du texte alternativement
Le
michir

Merci Daniel
J'ai mis ce code dans un module standard et affecté la macro à un bouto=
n, mais cela ne fonctionne pas ?
Sub bascule()
Public Var As Boolean
If Var = False Then
Var = True
MsgBox "Intervention sur site"
Else
Var = False
MsgBox "Intervention à distance"
End If
End Sub
J'ai mis ce code dans un module standard et affecté la macro à un bouto=
n, mais cela ne fonctionne pas ?
Sub bascule()
Public Var As Boolean
If Var = False Then
Var = True
MsgBox "Intervention sur site"
Else
Var = False
MsgBox "Intervention à distance"
End If
End Sub
Public Var As Boolean
Doit être en dehors de la procédure "sub"
'--------------
Public Var As Boolean
Sub bascule()
---
---
End Sub
--
Salutations
JJ
"michir"
Merci Daniel
J'ai mis ce code dans un module standard et affecté la macro à un bouton, mais cela ne fonctionne pas... ?
Sub bascule()
Public Var As Boolean
If Var = False Then
Var = True
MsgBox "Intervention sur site"
Else
Var = False
MsgBox "Intervention à distance"
End If
End Sub