Lors du démarrage de mon fichier, on demande à l'utilisateur si il veut
activer les macros ou pas. Je voudrais faire en sorte que:
- soit il accepte et donc le programme continue
- soit il refuse (et c'est son droit) mais le programme s'arrête et le
fichier se ferme sans sauvegarde.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
JB
Bonsoir,
A la sauvegarde du classeur, nous masquons tous les onglets du classeur. Si à l'ouverture du classeur, les macros ne sont pas activées, les pages ne seront pas visibles.
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) For s = 2 To Sheets.Count ' on masque les feuilles Sheets(s).Visible = xlVeryHidden Next s End Sub
Private Sub Workbook_Open() For s = 2 To Sheets.Count Sheets(s).Visible = True Next s End Sub
Lors du démarrage de mon fichier, on demande à l'utilisateur si il ve ut activer les macros ou pas. Je voudrais faire en sorte que: - soit il accepte et donc le programme continue - soit il refuse (et c'est son droit) mais le programme s'arrête et le fichier se ferme sans sauvegarde.
Merci de votre aide.
PJ
Bonsoir,
A la sauvegarde du classeur, nous masquons tous les onglets du
classeur.
Si à l'ouverture du classeur, les macros ne sont pas activées, les
pages ne seront pas visibles.
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
For s = 2 To Sheets.Count ' on masque les feuilles
Sheets(s).Visible = xlVeryHidden
Next s
End Sub
Private Sub Workbook_Open()
For s = 2 To Sheets.Count
Sheets(s).Visible = True
Next s
End Sub
On 10 oct, 19:02, PJ <P...@discussions.microsoft.com> wrote:
Bonjour à tous,
Lors du démarrage de mon fichier, on demande à l'utilisateur si il ve ut
activer les macros ou pas. Je voudrais faire en sorte que:
- soit il accepte et donc le programme continue
- soit il refuse (et c'est son droit) mais le programme s'arrête et le
fichier se ferme sans sauvegarde.
A la sauvegarde du classeur, nous masquons tous les onglets du classeur. Si à l'ouverture du classeur, les macros ne sont pas activées, les pages ne seront pas visibles.
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) For s = 2 To Sheets.Count ' on masque les feuilles Sheets(s).Visible = xlVeryHidden Next s End Sub
Private Sub Workbook_Open() For s = 2 To Sheets.Count Sheets(s).Visible = True Next s End Sub
Lors du démarrage de mon fichier, on demande à l'utilisateur si il ve ut activer les macros ou pas. Je voudrais faire en sorte que: - soit il accepte et donc le programme continue - soit il refuse (et c'est son droit) mais le programme s'arrête et le fichier se ferme sans sauvegarde.
Merci de votre aide.
PJ
PJ
Bonjour JB et merci.
J'ai déjà caché les feuille mais en fait au début, il y a un userform qui se lance pour un choix de langues donc je voudrais qu'on passe automatiquement par là. Ce n'est pas possible?
Merci encore
Bonsoir,
A la sauvegarde du classeur, nous masquons tous les onglets du classeur. Si à l'ouverture du classeur, les macros ne sont pas activées, les pages ne seront pas visibles.
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) For s = 2 To Sheets.Count ' on masque les feuilles Sheets(s).Visible = xlVeryHidden Next s End Sub
Private Sub Workbook_Open() For s = 2 To Sheets.Count Sheets(s).Visible = True Next s End Sub
Lors du démarrage de mon fichier, on demande à l'utilisateur si il veut activer les macros ou pas. Je voudrais faire en sorte que: - soit il accepte et donc le programme continue - soit il refuse (et c'est son droit) mais le programme s'arrête et le fichier se ferme sans sauvegarde.
Merci de votre aide.
PJ
Bonjour JB et merci.
J'ai déjà caché les feuille mais en fait au début, il y a un userform qui se
lance pour un choix de langues donc je voudrais qu'on passe automatiquement
par là.
Ce n'est pas possible?
Merci encore
Bonsoir,
A la sauvegarde du classeur, nous masquons tous les onglets du
classeur.
Si à l'ouverture du classeur, les macros ne sont pas activées, les
pages ne seront pas visibles.
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
For s = 2 To Sheets.Count ' on masque les feuilles
Sheets(s).Visible = xlVeryHidden
Next s
End Sub
Private Sub Workbook_Open()
For s = 2 To Sheets.Count
Sheets(s).Visible = True
Next s
End Sub
On 10 oct, 19:02, PJ <P...@discussions.microsoft.com> wrote:
Bonjour à tous,
Lors du démarrage de mon fichier, on demande à l'utilisateur si il veut
activer les macros ou pas. Je voudrais faire en sorte que:
- soit il accepte et donc le programme continue
- soit il refuse (et c'est son droit) mais le programme s'arrête et le
fichier se ferme sans sauvegarde.
J'ai déjà caché les feuille mais en fait au début, il y a un userform qui se lance pour un choix de langues donc je voudrais qu'on passe automatiquement par là. Ce n'est pas possible?
Merci encore
Bonsoir,
A la sauvegarde du classeur, nous masquons tous les onglets du classeur. Si à l'ouverture du classeur, les macros ne sont pas activées, les pages ne seront pas visibles.
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) For s = 2 To Sheets.Count ' on masque les feuilles Sheets(s).Visible = xlVeryHidden Next s End Sub
Private Sub Workbook_Open() For s = 2 To Sheets.Count Sheets(s).Visible = True Next s End Sub
Lors du démarrage de mon fichier, on demande à l'utilisateur si il veut activer les macros ou pas. Je voudrais faire en sorte que: - soit il accepte et donc le programme continue - soit il refuse (et c'est son droit) mais le programme s'arrête et le fichier se ferme sans sauvegarde.
Merci de votre aide.
PJ
JB
Bonsoir,
Si les macros sont désactivées, on ne peut rien faire. Tout doit être préparé avant.
JB
On 11 oct, 09:38, PJ wrote:
BonjourJBet merci.
J'ai déjà caché les feuille mais en fait au début, il y a un user form qui se lance pour un choix de langues donc je voudrais qu'on passe automatiqueme nt par là. Ce n'est pas possible?
Merci encore
Bonsoir,
A la sauvegarde du classeur, nous masquons tous les onglets du classeur. Si à l'ouverture du classeur, les macros ne sont pas activées, les pages ne seront pas visibles.
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) For s = 2 To Sheets.Count ' on masque les feuilles Sheets(s).Visible = xlVeryHidden Next s End Sub
Private Sub Workbook_Open() For s = 2 To Sheets.Count Sheets(s).Visible = True Next s End Sub
Lors du démarrage de mon fichier, on demande à l'utilisateur si i l veut activer les macros ou pas. Je voudrais faire en sorte que: - soit il accepte et donc le programme continue - soit il refuse (et c'est son droit) mais le programme s'arrête et le fichier se ferme sans sauvegarde.
Merci de votre aide.
PJ- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
Bonsoir,
Si les macros sont désactivées, on ne peut rien faire. Tout doit être
préparé avant.
JB
On 11 oct, 09:38, PJ <P...@discussions.microsoft.com> wrote:
BonjourJBet merci.
J'ai déjà caché les feuille mais en fait au début, il y a un user form qui se
lance pour un choix de langues donc je voudrais qu'on passe automatiqueme nt
par là.
Ce n'est pas possible?
Merci encore
Bonsoir,
A la sauvegarde du classeur, nous masquons tous les onglets du
classeur.
Si à l'ouverture du classeur, les macros ne sont pas activées, les
pages ne seront pas visibles.
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
For s = 2 To Sheets.Count ' on masque les feuilles
Sheets(s).Visible = xlVeryHidden
Next s
End Sub
Private Sub Workbook_Open()
For s = 2 To Sheets.Count
Sheets(s).Visible = True
Next s
End Sub
On 10 oct, 19:02, PJ <P...@discussions.microsoft.com> wrote:
Bonjour à tous,
Lors du démarrage de mon fichier, on demande à l'utilisateur si i l veut
activer les macros ou pas. Je voudrais faire en sorte que:
- soit il accepte et donc le programme continue
- soit il refuse (et c'est son droit) mais le programme s'arrête et le
fichier se ferme sans sauvegarde.
Si les macros sont désactivées, on ne peut rien faire. Tout doit être préparé avant.
JB
On 11 oct, 09:38, PJ wrote:
BonjourJBet merci.
J'ai déjà caché les feuille mais en fait au début, il y a un user form qui se lance pour un choix de langues donc je voudrais qu'on passe automatiqueme nt par là. Ce n'est pas possible?
Merci encore
Bonsoir,
A la sauvegarde du classeur, nous masquons tous les onglets du classeur. Si à l'ouverture du classeur, les macros ne sont pas activées, les pages ne seront pas visibles.
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) For s = 2 To Sheets.Count ' on masque les feuilles Sheets(s).Visible = xlVeryHidden Next s End Sub
Private Sub Workbook_Open() For s = 2 To Sheets.Count Sheets(s).Visible = True Next s End Sub
Lors du démarrage de mon fichier, on demande à l'utilisateur si i l veut activer les macros ou pas. Je voudrais faire en sorte que: - soit il accepte et donc le programme continue - soit il refuse (et c'est son droit) mais le programme s'arrête et le fichier se ferme sans sauvegarde.