Discussion :

[CodeFacile]

Bonjour,

j'ai un formulaire Excel avec des cellules ouvertes à la saisie et les autres sont protégées. Il y a des saisies possibles sur 2 onglets et chacun des onglets et le fichier sont protégés par mot de passe .
Il y a différentes macros ( commandées pas des boutons )dont une pour controler les valeurs saisies et une pour imprimer.

Il y a un bug inexpliqué dans la macro d'impression et le plantage fait que dans la fenêtre Excel , la mention 'groupe de travail apparait' ; Dans la macro suivante , je lance des tests et j'enleve la protection mais comme le classeur est partagé , j'ai une erreur... Comment faire pour empecher le passage en groupe de travail ?

la macro d'impression qui semble provoqué le plantage ( ça fonctionnait chez moi , j'ai distribué le programme et certaines personnes ont l'erreur ).

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
Public Sub Imprimer_Fiche()
     nb_feuil = 0
    For Each feuil In ActiveWorkbook.Worksheets
        If feuil.Name = O_description Then nb_feuil = nb_feuil + 1
        If feuil.Name = O_achat Then nb_feuil = nb_feuil + 1
    Next
 
     If nb_feuil = 2 Then
               ActiveWorkbook.Worksheets(Array(O_description, O_achat)).PrintOut collate:=True
   end if

je précise que O_description et O_achat sont des constantes globales qui designent des chaines textes ( exemple "description_piecexx"). La syntaxe array () permet d'imprimer les 2 onglets d'un seul clic. Chaque onglet ayant une mise en page et une zone d'impression définie

[CodeFacile]

J'ai trouvé ma réponse.

En fait l'annotation 'groupe de travail' ne signifie pas que le fichier est partagé ou utilisé par un groupe.
Cela indique qu'il y a une utilisation 'groupée' de plusieurs éléments.

Dans mon cas , l'utilisation de la syntaxe :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Worksheets(Array(O_description, O_achat)).PrintOut collate:=True

a 'groupés' les 2 onglets qui sont actif en même temps . Mais problème , on ne peut pas protéger ou déprotéger les onglets par macro dans cet état. L'interface ne fournit pas d'option pour en sortir.
La solution -> sélectionner un autre onglet ( diifférent du groupe ) pour sortir.