OVH Cloud OVH Cloud

Visualiser une partie du classeur en survolant une cellule

19 réponses
Avatar
Greg
Bonjour à tous,

Je voudrais savoir s'il est possible, en survolant une cellule (et donc sans
cliquer), de visualiser une zone définie dans une autre feuille du classeur.
On pourrait par exemple
- au passage sur un prénom en feuille 1, visualiser une photo qui se trouve
en feuille 2
- au passage sur une désignation quelconque visualiser plusieurs cellules de
calculs dans une autre feuille etc...

Merci à vous.

Greg

9 réponses

1 2
Avatar
JB
Bonjour,

http://boisgontierjacques.free.fr/pages_site/evenements.htm#survolchamp
http://boisgontierjacques.free.fr/fichiers/Evenementiel/SurvolTexteChamp.xl s


-Sélectionner le champ à afficher(J1:N5)
-Edition/Copier puis appuyer sur la touche Maj /Edition coller l'image
avec liaison et nommer le shape MonCa(en haut à gauche de la barre de
formule)
ou
-Avec l'appareil photo, photographier le champ à visualiser et nommer
le shape MonCa

-Incorporer en B2 un label Label1 avec la Barre Outils Boîte à outils
contrôles
-Le colorier en rouge
-Double-clic

Dans l'événement MouseMove:

Private Sub Label1_MouseMove(ByVal Button As Integer, ByVal Shift As
Integer, ByVal X As Single, ByVal Y As Single)
d = 3
If X < d Or X > Label1.Width - d Or Y < d Or Y > Label1.Height - d
Then
ActiveSheet.Shapes("monca").Visible = False
Else
ActiveSheet.Shapes("monca").Visible = True
End If
End Sub

-Désactiver l'équerre de la Barre Outils Boîte à outils contrôles


JB

On 4 oct, 23:58, "Greg" wrote:
J'ai découvert ce soir, avec grande satisfaction, la fonction appareil
photo. Très intéressant! Merci.

Par contre, malgré quelques recherches sur le net, je ne comprends pas
toutes les démarches:

- nommer le shape MonCa : que faut-il faire?
- -Incorporer en B2 un label Label1 avec la BO contrôle : Je suppose qu 'il
faut aller dans "insérer" de la BO controles... mais après, je ne voi s pas.

Pourriez-vous me venir en aide?

Merci et pitié pour les incultes tels que moi.

Greg

"Greg" a écrit dans le message de groupe de discussion :
4caa4266$0$23959$



> Je n'avais pas vu la solution de JB... le pied apparemment! Je suppose que
> cela fonctionne aussi avec des cellules provenant d'une autre feuille.

> Merci JB!!!!

> Je vais appliquer ça à mon fichier en espérant y arriver comme un grand...

> "JB" a écrit dans le message de groupe de
> discussion :
>
>> Bonjour,

>> Cf onglet Cas2

>>http://boisgontierjacques.free.fr/fichiers/Evenementiel/SurvolTexte.xls

>> Commentaire dynamique
>> Visualise un champ au survol de la partie rouge de B2

>> -Avec l'appareil photo, photographier le champ à visualiser et nomme r
>> le shape MonCa
>> -Incorporer en B2 un label Label1 avec la BO contrôle
>> -Le colorier en rouge

>> Dans l'événement MouseMove:

>> Private Sub Label1_MouseMove(ByVal Button As Integer, ByVal Shift As
>> Integer, ByVal X As Single, ByVal Y As Single)
>>  d = 3
>>  If X < d Or X > Label1.Width - d Or Y < d Or Y > Label1.Height - d
>> Then
>>    ActiveSheet.Shapes("monca").Visible = False
>>  Else
>>    ActiveSheet.Shapes("monca").Visible = True
>>  End If
>> End Sub

>> JB

>> On 3 oct, 18:30, "Greg" wrote:
>>> Bonjour à tous,

>>> Je voudrais savoir s'il est possible, en survolant une cellule (et do nc
>>> sans
>>> cliquer), de visualiser une zone définie dans une autre feuille du
>>> classeur.
>>> On pourrait par exemple
>>> - au passage sur un prénom en feuille 1, visualiser une photo  qu i se
>>> trouve
>>> en feuille 2
>>> - au passage sur une désignation quelconque visualiser plusieurs
>>> cellules de
>>> calculs dans une autre feuille etc...

>>> Merci à vous.

>>> Greg- Masquer le texte des messages précédents -

- Afficher le texte des messages précédents -
Avatar
michdenis
Dans le fichier que j'ai commis, si tu modifies le contenu d'une cellule (A1 OU A2) dans la feuil2
si tu reviens à la feuil1 et tu observes le commentaire en cellule B3, le commentaire est mis à jour.

Si tu n'obtiens pas ce résultat, les procédures événementielles sont désactivées.
Pour les réactiver, tu exécutes cette macro
'--------------------------------
Sub Test()
Application.EnableEvents = True
End Sub
'--------------------------------
Si ça ne fonctionne toujours pas, je n'ai aucune idée de ce qui passe sur ton ordi.

| et semble t-il le prix à payer pour avoir un coup de main...
| Je ne sais pas si c'est le meilleur moyen de faire progresser son prochain.

Quoi demander de plus que d'avoir un fichier exemple ?

| Seulement, il reste perfectible et n'est pas utilisable en
| l'état pour mon utilisation : quand je change le contenu
| des cellules en feuille 2, il n'y a pas le rafraichissement
| dans le commentaire
| quand on change les cellules d'origine dans le code, rien
| ne se passe de différent

A ) Je ne peux pas créer un exemple reprenant à tour de rôle chacune des cellules d'une feuille.
L'exemple suppose que le demandeur a fait un petit effort pour comprendre comme l'exemple fonctionne et qu'il l'adaptera
à son application.

B ) Dans Excel, il y a plusieurs événements (procédures événementielles) dans chacun des modules des feuilles de calcul
et dans le ThisWorkbook susceptibles d'être employés...J'en ai retenu "UN", la sélection d'un autre onglet d'une feuille
stipulée dans la demande initiale...mais j'aurais pu utiliser la procédure événementielle du module feuil2 pour appeler
la procédure de mise à jour.
'---------------------
Private Sub Worksheet_Change(ByVal Target As Range)

End Sub
'---------------------

Conclusion :
Que quelqu'un demande des informations supplémentaires sur l'exemple donné
parce qu'il n'a pas tout compris, je n'ai pas de problèmes avec ça...
Que quelqu'un affirme qu'il n'obtient pas le résultat escompté en modifiant
la donne originale du problème, c'est pour le moins irritant !!!!!!!!!!

| quand on change les cellules d'origine dans le code, rien
| ne se passe de différent


--
MichD
--------------------------------------------


"Greg" a écrit dans le message de groupe de discussion : 4caa4a6a$0$5016$
Rebonsoir,

Je réponds ici à MichDenis (post de 23h09)

Personnellement, je ne comprends cette réponse ni sur le fond, ni sur la
forme...

Sur le fond, j'ai essayé le classeur indiqué sur Cjoint et le commentaire
N'EST PAS dans la même feuille... ce qui est également le cas dans mon
fichier (et je ne pense pas avoir dit le contraire). Ou alors, je me suis
mal exprimé ( "quand je change le contenu des cellules en feuille 2, il n'y
a pas le rafraichissement dans le commentaire [==> qui est en feuil1 !]"

Sur la forme ("Il faudra peut être apprendre à poser une question et à
définir son besoin !"), le style est sobre, sans bavure (quoiqu'un peu
impersonnel), et semble t-il le prix à payer pour avoir un coup de main...
Je ne sais pas si c'est le meilleur moyen de faire progresser son prochain.
C'est une méthode que j'avais oublié et à laquelle je devrais songer plus
souvent d'un point de vue pédagogique : la bonne vieille targnole pour
remettre les idées en place. Encore faut-il que ce soit justifié... Et pour
ma part, je n'aime ni en donner, ni en recevoir.

Greg



"michdenis" a écrit dans le message de groupe de
discussion : i8dfqc$hb$
Ta question était :

| de visualiser une zone définie dans une autre feuille du classeur.

Si le commentaire est dans la même feuille, la procédure proposée
ne mettra pas à jour le commentaire.

Il faudra peut être apprendre à poser une question et à définir son besoin
!


--
MichD
--------------------------------------------


"Greg" a écrit dans le message de groupe de discussion :
4caa3f6d$0$14170$
Bonsoir,

L'idée de MichDenis dans le Cjoint correspond à mon attente. Seulement, il
reste perfectible et n'est pas utilisable en l'état pour mon utilisation :
- quand je change le contenu des cellules en feuille 2, il n'y a pas le
rafraichissement dans le commentaire
- quand on change les cellules d'origine dans le code, rien ne se passe de
différent

Pour répondre à Modeste, l'image dans le commentaire ne remplira pas les
fonctions attendues dans mon fichier. L'idée est bien celle de MichDenis.

Merci à vous... une fois de plus!

Greg



"michdenis" a écrit dans le message de groupe de
discussion : i8cmnh$8d8$
Bonjour Modeste,

Il y a ceci : http://cjoint.com/?kep6xGGBqM

--
MichD
--------------------------------------------


"Modeste" a écrit dans le message de groupe de
discussion
: 4ca9c26c$0$9271$
Bonsour®

"michdenis" a écrit
Le commentaire d'une cellule peut contenir une image !
Ce n'est pas suffisant ?



;o)))
adéquat pour un trombinoscope...
inadapté pour suivre une zone définie dans une autre feuille du classeur,
il
manque le rafraichissement.
:-(
le commentaire n'autorise qu'une image enregistrée
;o)))
sauf peut être à enregistrer périodiquement la zone surveillée

Avatar
Greg
Merci JB, ça marche parfaitement. Comment modifier le code pour que cela
fonctionne également avec des zones d'une autre feuille, dans le même
classeur?

"JB" a écrit dans le message de groupe de
discussion :

Bonjour,

http://boisgontierjacques.free.fr/pages_site/evenements.htm#survolchamp
http://boisgontierjacques.free.fr/fichiers/Evenementiel/SurvolTexteChamp.xls


-Sélectionner le champ à afficher(J1:N5)
-Edition/Copier puis appuyer sur la touche Maj /Edition coller l'image
avec liaison et nommer le shape MonCa(en haut à gauche de la barre de
formule)
ou
-Avec l'appareil photo, photographier le champ à visualiser et nommer
le shape MonCa

-Incorporer en B2 un label Label1 avec la Barre Outils Boîte à outils
contrôles
-Le colorier en rouge
-Double-clic

Dans l'événement MouseMove:

Private Sub Label1_MouseMove(ByVal Button As Integer, ByVal Shift As
Integer, ByVal X As Single, ByVal Y As Single)
d = 3
If X < d Or X > Label1.Width - d Or Y < d Or Y > Label1.Height - d
Then
ActiveSheet.Shapes("monca").Visible = False
Else
ActiveSheet.Shapes("monca").Visible = True
End If
End Sub

-Désactiver l'équerre de la Barre Outils Boîte à outils contrôles


JB

On 4 oct, 23:58, "Greg" wrote:
J'ai découvert ce soir, avec grande satisfaction, la fonction appareil
photo. Très intéressant! Merci.

Par contre, malgré quelques recherches sur le net, je ne comprends pas
toutes les démarches:

- nommer le shape MonCa : que faut-il faire?
- -Incorporer en B2 un label Label1 avec la BO contrôle : Je suppose
qu'il
faut aller dans "insérer" de la BO controles... mais après, je ne vois
pas.

Pourriez-vous me venir en aide?

Merci et pitié pour les incultes tels que moi.

Greg

"Greg" a écrit dans le message de groupe de discussion :
4caa4266$0$23959$



> Je n'avais pas vu la solution de JB... le pied apparemment! Je suppose
> que
> cela fonctionne aussi avec des cellules provenant d'une autre feuille.

> Merci JB!!!!

> Je vais appliquer ça à mon fichier en espérant y arriver comme un
> grand...

> "JB" a écrit dans le message de groupe de
> discussion :
>
>> Bonjour,

>> Cf onglet Cas2

>>http://boisgontierjacques.free.fr/fichiers/Evenementiel/SurvolTexte.xls

>> Commentaire dynamique
>> Visualise un champ au survol de la partie rouge de B2

>> -Avec l'appareil photo, photographier le champ à visualiser et nommer
>> le shape MonCa
>> -Incorporer en B2 un label Label1 avec la BO contrôle
>> -Le colorier en rouge

>> Dans l'événement MouseMove:

>> Private Sub Label1_MouseMove(ByVal Button As Integer, ByVal Shift As
>> Integer, ByVal X As Single, ByVal Y As Single)
>> d = 3
>> If X < d Or X > Label1.Width - d Or Y < d Or Y > Label1.Height - d
>> Then
>> ActiveSheet.Shapes("monca").Visible = False
>> Else
>> ActiveSheet.Shapes("monca").Visible = True
>> End If
>> End Sub

>> JB

>> On 3 oct, 18:30, "Greg" wrote:
>>> Bonjour à tous,

>>> Je voudrais savoir s'il est possible, en survolant une cellule (et
>>> donc
>>> sans
>>> cliquer), de visualiser une zone définie dans une autre feuille du
>>> classeur.
>>> On pourrait par exemple
>>> - au passage sur un prénom en feuille 1, visualiser une photo qui se
>>> trouve
>>> en feuille 2
>>> - au passage sur une désignation quelconque visualiser plusieurs
>>> cellules de
>>> calculs dans une autre feuille etc...

>>> Merci à vous.

>>> Greg- Masquer le texte des messages précédents -

- Afficher le texte des messages précédents -



Avatar
Greg
J'ai bien essayé ceci, mais sans succés:

Private Sub Label1_MouseMove(ByVal Button As Integer, ByVal Shift As
Integer, ByVal X As Single, ByVal Y As Single)
d = 3
If X < d Or X > Label1.Width - d Or Y < d Or Y > Label1.Height - d Then
ActiveWorkbook.Shapes("monca2").Visible = False
Else
ActiveWorkbook.Shapes("monca2").Visible = True
End If
End Sub

C'est surement idiot, mais bon, je fais avec mes tous petits moyens...



"Greg" a écrit dans le message de groupe de discussion :
4cac3662$0$496$
Merci JB, ça marche parfaitement. Comment modifier le code pour que cela
fonctionne également avec des zones d'une autre feuille, dans le même
classeur?

"JB" a écrit dans le message de groupe de
discussion :

Bonjour,

http://boisgontierjacques.free.fr/pages_site/evenements.htm#survolchamp
http://boisgontierjacques.free.fr/fichiers/Evenementiel/SurvolTexteChamp.xls


-Sélectionner le champ à afficher(J1:N5)
-Edition/Copier puis appuyer sur la touche Maj /Edition coller l'image
avec liaison et nommer le shape MonCa(en haut à gauche de la barre de
formule)
ou
-Avec l'appareil photo, photographier le champ à visualiser et nommer
le shape MonCa

-Incorporer en B2 un label Label1 avec la Barre Outils Boîte à outils
contrôles
-Le colorier en rouge
-Double-clic

Dans l'événement MouseMove:

Private Sub Label1_MouseMove(ByVal Button As Integer, ByVal Shift As
Integer, ByVal X As Single, ByVal Y As Single)
d = 3
If X < d Or X > Label1.Width - d Or Y < d Or Y > Label1.Height - d
Then
ActiveSheet.Shapes("monca").Visible = False
Else
ActiveSheet.Shapes("monca").Visible = True
End If
End Sub

-Désactiver l'équerre de la Barre Outils Boîte à outils contrôles


JB

On 4 oct, 23:58, "Greg" wrote:
J'ai découvert ce soir, avec grande satisfaction, la fonction appareil
photo. Très intéressant! Merci.

Par contre, malgré quelques recherches sur le net, je ne comprends pas
toutes les démarches:

- nommer le shape MonCa : que faut-il faire?
- -Incorporer en B2 un label Label1 avec la BO contrôle : Je suppose
qu'il
faut aller dans "insérer" de la BO controles... mais après, je ne vois
pas.

Pourriez-vous me venir en aide?

Merci et pitié pour les incultes tels que moi.

Greg

"Greg" a écrit dans le message de groupe de discussion :
4caa4266$0$23959$



> Je n'avais pas vu la solution de JB... le pied apparemment! Je suppose
> que
> cela fonctionne aussi avec des cellules provenant d'une autre feuille.

> Merci JB!!!!

> Je vais appliquer ça à mon fichier en espérant y arriver comme un
> grand...

> "JB" a écrit dans le message de groupe de
> discussion :
>
>> Bonjour,

>> Cf onglet Cas2

>>http://boisgontierjacques.free.fr/fichiers/Evenementiel/SurvolTexte.xls

>> Commentaire dynamique
>> Visualise un champ au survol de la partie rouge de B2

>> -Avec l'appareil photo, photographier le champ à visualiser et nommer
>> le shape MonCa
>> -Incorporer en B2 un label Label1 avec la BO contrôle
>> -Le colorier en rouge

>> Dans l'événement MouseMove:

>> Private Sub Label1_MouseMove(ByVal Button As Integer, ByVal Shift As
>> Integer, ByVal X As Single, ByVal Y As Single)
>> d = 3
>> If X < d Or X > Label1.Width - d Or Y < d Or Y > Label1.Height - d
>> Then
>> ActiveSheet.Shapes("monca").Visible = False
>> Else
>> ActiveSheet.Shapes("monca").Visible = True
>> End If
>> End Sub

>> JB

>> On 3 oct, 18:30, "Greg" wrote:
>>> Bonjour à tous,

>>> Je voudrais savoir s'il est possible, en survolant une cellule (et
>>> donc
>>> sans
>>> cliquer), de visualiser une zone définie dans une autre feuille du
>>> classeur.
>>> On pourrait par exemple
>>> - au passage sur un prénom en feuille 1, visualiser une photo qui
>>> se
>>> trouve
>>> en feuille 2
>>> - au passage sur une désignation quelconque visualiser plusieurs
>>> cellules de
>>> calculs dans une autre feuille etc...

>>> Merci à vous.

>>> Greg- Masquer le texte des messages précédents -

- Afficher le texte des messages précédents -



Avatar
Greg
Veuillez m'excuser, voici plutôt le code que j'ai essayé:

Private Sub Label1_MouseMove(ByVal Button As Integer, ByVal Shift As
Integer, ByVal X As Single, ByVal Y As Single)
d = 3
If X < d Or X > Label1.Width - d Or Y < d Or Y > Label1.Height - d Then
ActiveWorkbook.Shapes("monca3").Visible = False
Else
Shapes("monca3").Fill.ForeColor.SchemeColor = 13
Shapes("monca3").TextFrame.Characters.Text = [F1]
ActiveWorkbook.Shapes("monca3").Visible = True
End If
End Sub


Apparemment, ce label ne peut pas aller sur une autre feuille (Excel évoque
l'erreur 438 : propriété ou méthode non géré par cet objet) ... Me
trompe-je?

Greg




"Greg" a écrit dans le message de groupe de discussion :
4cac3a44$0$8134$
J'ai bien essayé ceci, mais sans succés:

Private Sub Label1_MouseMove(ByVal Button As Integer, ByVal Shift As
Integer, ByVal X As Single, ByVal Y As Single)
d = 3
If X < d Or X > Label1.Width - d Or Y < d Or Y > Label1.Height - d Then
ActiveWorkbook.Shapes("monca2").Visible = False
Else
ActiveWorkbook.Shapes("monca2").Visible = True
End If
End Sub

C'est surement idiot, mais bon, je fais avec mes tous petits moyens...



"Greg" a écrit dans le message de groupe de discussion :
4cac3662$0$496$
Merci JB, ça marche parfaitement. Comment modifier le code pour que cela
fonctionne également avec des zones d'une autre feuille, dans le même
classeur?

"JB" a écrit dans le message de groupe de
discussion :

Bonjour,

http://boisgontierjacques.free.fr/pages_site/evenements.htm#survolchamp
http://boisgontierjacques.free.fr/fichiers/Evenementiel/SurvolTexteChamp.xls


-Sélectionner le champ à afficher(J1:N5)
-Edition/Copier puis appuyer sur la touche Maj /Edition coller l'image
avec liaison et nommer le shape MonCa(en haut à gauche de la barre de
formule)
ou
-Avec l'appareil photo, photographier le champ à visualiser et nommer
le shape MonCa

-Incorporer en B2 un label Label1 avec la Barre Outils Boîte à outils
contrôles
-Le colorier en rouge
-Double-clic

Dans l'événement MouseMove:

Private Sub Label1_MouseMove(ByVal Button As Integer, ByVal Shift As
Integer, ByVal X As Single, ByVal Y As Single)
d = 3
If X < d Or X > Label1.Width - d Or Y < d Or Y > Label1.Height - d
Then
ActiveSheet.Shapes("monca").Visible = False
Else
ActiveSheet.Shapes("monca").Visible = True
End If
End Sub

-Désactiver l'équerre de la Barre Outils Boîte à outils contrôles


JB

On 4 oct, 23:58, "Greg" wrote:
J'ai découvert ce soir, avec grande satisfaction, la fonction appareil
photo. Très intéressant! Merci.

Par contre, malgré quelques recherches sur le net, je ne comprends pas
toutes les démarches:

- nommer le shape MonCa : que faut-il faire?
- -Incorporer en B2 un label Label1 avec la BO contrôle : Je suppose
qu'il
faut aller dans "insérer" de la BO controles... mais après, je ne vois
pas.

Pourriez-vous me venir en aide?

Merci et pitié pour les incultes tels que moi.

Greg

"Greg" a écrit dans le message de groupe de discussion :
4caa4266$0$23959$



> Je n'avais pas vu la solution de JB... le pied apparemment! Je
> suppose que
> cela fonctionne aussi avec des cellules provenant d'une autre
> feuille.

> Merci JB!!!!

> Je vais appliquer ça à mon fichier en espérant y arriver comme un
> grand...

> "JB" a écrit dans le message de groupe de
> discussion :
>
>> Bonjour,

>> Cf onglet Cas2

>>http://boisgontierjacques.free.fr/fichiers/Evenementiel/SurvolTexte.xls

>> Commentaire dynamique
>> Visualise un champ au survol de la partie rouge de B2

>> -Avec l'appareil photo, photographier le champ à visualiser et
>> nommer
>> le shape MonCa
>> -Incorporer en B2 un label Label1 avec la BO contrôle
>> -Le colorier en rouge

>> Dans l'événement MouseMove:

>> Private Sub Label1_MouseMove(ByVal Button As Integer, ByVal Shift As
>> Integer, ByVal X As Single, ByVal Y As Single)
>> d = 3
>> If X < d Or X > Label1.Width - d Or Y < d Or Y > Label1.Height - d
>> Then
>> ActiveSheet.Shapes("monca").Visible = False
>> Else
>> ActiveSheet.Shapes("monca").Visible = True
>> End If
>> End Sub

>> JB

>> On 3 oct, 18:30, "Greg" wrote:
>>> Bonjour à tous,

>>> Je voudrais savoir s'il est possible, en survolant une cellule (et
>>> donc
>>> sans
>>> cliquer), de visualiser une zone définie dans une autre feuille du
>>> classeur.
>>> On pourrait par exemple
>>> - au passage sur un prénom en feuille 1, visualiser une photo qui
>>> se
>>> trouve
>>> en feuille 2
>>> - au passage sur une désignation quelconque visualiser plusieurs
>>> cellules de
>>> calculs dans une autre feuille etc...

>>> Merci à vous.

>>> Greg- Masquer le texte des messages précédents -

- Afficher le texte des messages précédents -



Avatar
Greg
A force de bidouiller, j'ai trouvé ceci:

http://cjoint.com/?0kglEutCzz7

... et ça fonctionne pas mal, sauf que parfois, la fenêtre qui apparaît ne
disparait pas facilement lorsque la souris quitte le label.

Merci encore JB!
Avatar
JB
Il faudrait poster un .zip

JB

On 6 oct, 11:35, "Greg" wrote:
A force de bidouiller, j'ai trouvé ceci:

http://cjoint.com/?0kglEutCzz7

... et ça fonctionne pas mal, sauf que parfois, la fenêtre qui appara ît ne
disparait pas facilement lorsque la souris quitte le label.

Merci encore JB!
Avatar
Modeste
Bonsour®

"JB" a écrit
Il faudrait poster un .zip
http://cjoint.com/?0kglEutCzz7






;o)))
c'est bien un zip qui est transmis ...

en réception il faut l'enregistrer en changeant l'extension zip en .xlsm
Avatar
Greg
Bonjour,

Désolé... Je vous le joint en Excel 97.

http://cjoint.com/?0khhuL7NhfE

La shape du bas a des difficultés à se cacher... bizarre....





"Modeste" a écrit dans le message de groupe de discussion :
4cac78fa$0$686$
Bonsour®

"JB" a écrit
Il faudrait poster un .zip
http://cjoint.com/?0kglEutCzz7






;o)))
c'est bien un zip qui est transmis ...

en réception il faut l'enregistrer en changeant l'extension zip en .xlsm
1 2