A voir également:
- Empêcher l'ouverture classeur Excel une deuxième fois
- Liste déroulante excel - Guide
- Déplacer une colonne excel - Guide
- Deuxieme ecran pc - Guide
- Calculer une moyenne sur excel - Guide
- Si et excel - Guide
3 réponses
cs_Le Pivert
Messages postés
7904
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
14 août 2024
729
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
7904
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
14 août 2024
729
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
7904
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
14 août 2024
729
>
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