Discussion :

[alderic76]

Bonjour à tous,



j'ai créé un userform avec un bouton quitter excel et un autre pour quitter l'userform et revenir vers excel et donc l'éditeur VBA

je souhaite qu'à l'ouverture d'Excel se passe les choses suivantes de façon automatique :
-lancement de l'userform
-possibilité de quitter l'application
-possibilité de revenir vers l'éditeur de vba
-que ma feuille excel soit "invisible"
-pouvoir ouvrir et agir sur un nouveau classeur excel
-pouvoir voir et utiliser un excel ouvert avant le lancement de l'userform
-que lorsque je clic sur le bouton quitter, ca ferme l'userform mais pas les autres fichiers excel

donc, pour l'instant, j'ai essayé plusieurs solution, je n'arrive pas à remplir la totalité de mes critères (notamment sur la possibilité de voir et utiliser d'autres fichiers excel)et je pense que je m'enterre sur une voie sans issue

merci à tous pour le coup de main

[Menhir]

A mon avis, ce que tu essaye de faire est dangereux.

Tu devais plutôt mettre ça dans un fichier XLAM plutôt que de le lancer à l'ouverture de l'applicatif.
L'avantage d'un XLAM, c'est qu'il ne contient pas de feuille de calcul, ce qui rempli déjà l'un de tes critère.
Tu pourrais faire un raccourci sur ton bureau vers ce fichier, ce qui te donnerait le lancement de ton UserForm au démarrage, tout en gardant un Excel "propre" pouvant être lancé naturellement.

Mais, à ta place, je ne ferais pas un UserForm. Je mettrais des icône dans la barre d'outils à accès rapide.
Vu que toutes les fonctions que tu souhaites sont disponibles en standard dans Excel sous forme d'icones.
Au lieu de te compliquer la vie avec un UserForm, agrémenter la barre d'outils à accès rapide ne prendrait que quelques minutes.

[alderic76]

xlam ..... euhhhh

Avant de me pencher sur cette possibilité (que je ne domine pas du tout), je précise l'utilisation de ce fichier :
-j 'ai une base de données que je dois être le seul à pouvoir voir et modifier
-l'userform est quand à lui utilisé par différents utilisateurs en prenant en compte que certains utilise encore le minitel lol
-que je dois impérativement pouvoir utiliser d'autres fichiers excel

merci

[riaolle]

Je ne sais pas quelles sont toutes les "fonctionnalités" dont tu as besoin dans ton userform, mais à ta place je procéderai autrement:
Utilise une feuille de ton classeur en tant que formulaire. Tu peux déjà faire beaucoup de chose sur une feuille ! Et tu n'auras pas les pbs d'ouverture de classeurs etc..., car tu pourras utiliser les fonctionnalités basiques d'Excel.
Que veux-tu mettre concrêtement dans ton Userform?
En ce qui concerne la BDD, il te suffit de protéger la feuille qui la contient (avec un mot de passe éventuellement) pour que les autres personnes n'y aient pas accès : pas besoin de VBA !

[Menhir]

xlam ..... euhhhh
Avant de me pencher sur cette possibilité (que je ne domine pas du tout),

Il n'y a rien à "dominer".
Fichier > Enregistrer Sous... > Parcourir > Type = Macro complémentaire Excel (*.xlam).

C'est un fichier Excel qui ne contient que des macro, pas de feuille de calcul.
C'est, en quelque sorte, l'opposé du xlsx.

-j 'ai une base de données que je dois être le seul à pouvoir voir et modifier

Il suffit de la protéger en écriture :
Ruban Révision > Icone Protéger la feuille
ou
Ruban Révision > Icone Protéger le classeur

Protéger le classeur est plus global mais protéger la feuille permet plus de possibilités.

Brider Excel entièrement en limitant son usage aux commande d'un UserForm, juste pour protéger un fichier, ça me semble un peu excessif comme démarche.

[alderic76]

merci pour vos réponses,

En fait , je ne vois vraiment pas ou est le soucis dans mon intention
pour l instant, mon fichier fonctionne parfaitement et réponds quasi totalement à ma recherche
la seule chose, c est qu'en rendant invisible l'Excel contenant l'userform, les autress excel se trouvent rendus invisibles aussi

[riaolle]

Peux-tu nous donner le code que tu utilises, stp?

[Menhir]

la seule chose, c est qu'en rendant invisible l'Excel contenant l'userform, les autress excel se trouvent rendus invisibles aussi

C'est bien pour ça que je te conseille de faire un fichier XLAM qui n'a pas de feuille de calcul. Il devient donc inutile de le rendre invisible, ce qui règle ton problème.

[riaolle]

Bonjour et bienvenue sur le forum
Tout d'abord, un tuto sur les userform qui répondra certainement à beaucoup de tes questions: http://silkyroad.developpez.com/VBA/UserForm/#LI

-lancement de l'userform

Intéresse-toi aux macros évènementielles et notamment à Workbook_Open.

-possibilité de quitter l'application

Peux-tu être plus précis sur ce que tu veux? Normalement, quand tu créés un Userform, en haut à droite, il y a toujours un bouton rouge avec une croix qui permet de sortir du Userform. Si "quitter l'application" signifie plus que cela, tu peux ajouter tout ce que tu veux en plus dans la méthode UserForm_QueryClose (cf. tuto).

-possibilité de revenir vers l'éditeur de vba

En manuel on utilise le raccourci Alt-F11 pour aller sur l'éditeur VBA. La méthode Sendkeys permet d'utiliser ces raccourcis en VBA. Essaie donc avec

Code :

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

SendKeys("%{F11}")

-que ma feuille excel soit "invisible"

Est-ce que tu pourrais donner plus de précisions sur ce que tu entends par "invisible"? Est-ce que tu veux qu'une certaine feuille ne soit pas vue à l'ouverture du fichier? A ce moment-là, tu peux, par exemple, créer une feuille vierge que tu affichera automatiquement au lancement du fichier --> ici aussi avec l'évènement Workbook_Open.

-pouvoir ouvrir et agir sur un nouveau classeur excel
-pouvoir voir et utiliser un excel ouvert avant le lancement de l'userform

Peux-tu être plus précis?

-que lorsque je clic sur le bouton quitter, ca ferme l'userform mais pas les autres fichiers excel

Quel bouton quitter? Cf. réponse précédente sur le bouton quitter.

Il serait bien que tu nous montres ce que tu as déjà et où conrêtement tu bloques, on pourra mieux t'aider. J'espère que ces premiers éléments de réponses t'aideront.

[Invité]

Bonsoir,
Déjà wb.close arrête la macro ce qui n'est pas dommageable si il y a Plusieurs classeurs d'ouvert.

En revanche si ton classeur est seule, il se ferme et laisse une fenêtre excel vide il faut vérifier le nombre de classeur.

Code :

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

1
2
3
4
5
 if workbooks.count=1 then
Application.quit
Else
Thisworkbook.close
End if