A voir également:
- Empêcher l'ouverture classeur Excel une deuxième fois
- Liste déroulante excel - Guide
- Formule excel - Guide
- Déplacer une colonne excel - Guide
- Deuxieme ecran pc - Guide
- Deuxième compte whatsapp - Guide
3 réponses
cs_Le Pivert
Messages postés
7903
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
11 mars 2024
728
18 mars 2017 à 14:14
18 mars 2017 à 14:14
Bonjour,
Personne pour m'aider?
malheureusement j'ai essayé le lien ci-dessus.
Pour mon cas ça ne fonctionne pas.
je souhaiterais si le tableau est déjà ouvert empêcher la réouverture de ce même tableau
Personne pour m'aider?
malheureusement j'ai essayé le lien ci-dessus.
Pour mon cas ça ne fonctionne pas.
je souhaiterais si le tableau est déjà ouvert empêcher la réouverture de ce même tableau
cs_Le Pivert
Messages postés
7903
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
11 mars 2024
728
20 mars 2017 à 07:52
20 mars 2017 à 07:52
Personne pour m'aider?
Si justement, mais il y a un minimum de politesse a avoir pour ceux qui te répondent!
Les remercier et leur dire simplement que cette réponse ne convient pas.
Si justement, mais il y a un minimum de politesse a avoir pour ceux qui te répondent!
Les remercier et leur dire simplement que cette réponse ne convient pas.
cs_Le Pivert
Messages postés
7903
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
11 mars 2024
728
>
sormick
20 mars 2017 à 20:04
20 mars 2017 à 20:04
Une autre approche,
A l'ouverture du classeur, le mettre en fichier caché pour les autres utilisateurs.
A la fermeture on rétabli.
Mettre ceci dans ThisWorkbook:
A l'ouverture du classeur, le mettre en fichier caché pour les autres utilisateurs.
A la fermeture on rétabli.
Mettre ceci dans ThisWorkbook:
Option Explicit Private Sub Workbook_BeforeClose(Cancel As Boolean) 'retabli fichier SetAttr ThisWorkbook.Path & "\essai.xls", vbNormal 'adapter chemin fichier End Sub Private Sub Workbook_Open() 'fichier caché SetAttr ThisWorkbook.Path & "\essai.xls", vbHidden 'adapter chemin fichier End Sub
