Discussion :

[baime]

Bonjour,

Oui je sais je sais je sais il ne faut pas désactiver la touche ESC sinon on risque d'être trés mal si la macro par en vrille. Mais, il y a toujours un mais, la macro se lance à l'ouverture et si je laisse ESC active l'utilisateur va interrompre la macro et voir des données sensibles dans les TCD intermédiaires.

Comment je peux faire ??

J'ai essayé avec

Code :

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

Application.EnableCancelKey = xlDisabled

comme première ligne de ma macro

Code :

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

1
2
Sub Auto_Open() 
End Sub

mais ça ne fait rien du tout

Preneur de toutes idées bonnes ou mauvaises

[mfoxy]

Hello,

Au vu que le lancement des Macros peut lui aussi être inhibé à l'ouverture du fichier,je dirais aucune solution réellement fonctionnel.

A l'heure de PowerQuery ,je dirais de laisser les données sensibles ailleurs que dans ton fichier et de faire faire les différents traitement par PQ.

De cette manière seul les données, que tu souhaiterais pourrais être visible /importée.
En sachant qu'en fouillant un peu, l'utilisateur pourra trouver la BD.

Bat,

[baime]

Effectivement la solution de le faire à la source c'est l'idéal mais ce n'est pas possible , j'accède à un cube OLAP et je ne peux pas faire un count distinct directement sur le champ qui m'intéresse.

D'autres solutions ?

[mfoxy]

Re,

Tu pourrais probablement faire ce que tu souhaites, avec une connexion uniquement, via Power query et donc sans importer sur les feuilles les tables.

Je ne suis pas un utilisateur de cube Olap, cependant si tu arrives à lier Excel à celui-ci, tu pourrais aussi le faire via PQ.

Bat

[aalex_38]

Bonjour,

Pourquoi ne pas raisonner dans l'autre sens, c'est à dire :

Si les macros ne sont pas actives, ne rien afficher.
Il te suffit pour ça de cacher les onglets que tu ne souhaite pas montrer et de les afficher par macro à l'ouverture de ton classeur.

[mfoxy]

Bonsoir aalex,baime

Une multitude de pseudos solutions de protection peuvent être imaginée.
Mais aucune réellement efficace, malheureusement.

Cacher les feuilles en veryhidden, n'empêchera pas une personne sachant aligner trois mots dans Google de trouver une parade.
Bloquer la touche échappe non plus.

Le demandeur parle de TDC , un simple double clique sur un champs ,total par exemple, crée une nouvelle feuille avec la BD correspondante. Un code en plus à mettre pour pallier à cela ? Qui lui aussi pourra être inhibé ?

Je dirais , à moins que quelqu'un de plus qualifié ait une autre solution, que si des données ne peuvent pas être vue et/ou utilisées, qu'il faut simplement, qu'elles ne soient pas physiquement présentes, donc je ne fournirais en accès qu'un fichier résultat/vue final et non le fichier contenant les Macros et données pour arriver aux résultats finaux.

Bav,

[Patrice740]

Bonjour,

Pour empêcher l'arrêt d'une macro tu peux inhiber le clavier et la souris en début de macro avec :

Code :

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

1
2
3
4
5
6
7
8
9
10
Private Declare Function BlockInput Lib "user32" (ByVal fBlock As Long) As Long
Sub Bloquer
  DoEvents
  BlockInput True
End Sub
' pour rendre la main :
Sub Liberer
  DoEvents
  BlockInput False
End Sub

Note : pour empêcher l'arrêt (interdire l'interruption), il faut bien évidemment que la macro ait commencé et si on empêche l'exécution de la macro, elle n'accède pas aux données donc pas de risque ...