Affichage des fenêtres

[camilla116]

Bonjour,
Pour mon travail j'ai besoin de compter les personnes fréquentant mon service. Pour cela j'ai créé une macrocommande qui permet d'additionner les clics que j'effectue sur un bouton.
J'aimerais que cette page Excel soit réduite et se positionne dans un coin de mon écran pour faire juste apparaître le bouton car je n'ai pas besoin de la feuille en entier. Je n'arrive pas à faire cela car quand j'ouvre un autre fichier Excel celui-ci se met automatiquement à la dimension du fichier précédemment ouvert.
Y a-t-il une solution pour ce problème ?
Merci d'avance

 

[JNP]

Re : Affichage des fenêtres

Bonjour Camilla116 et bienvenue 🙂,
Et si tu déclenchais plutôt une petite macro dans PERSO.XLS via un équivalent clavier ?
Tu n'aurais pas besoin d'avoir ta fenêtre ouverte 🙄...
Bon courage 😎

 

[camilla116]

Re : Affichage des fenêtres

Comment crée-t-on un équivalent clavier ? J'ai bien un raccourci pour ctrl+f pour actionner ma macrocommande mais ça ne doit pas être de ça que tu parles. Je précise que c'est la première macrocommande que je crée, je suis débutante en la matière.

 

[JNP]

Re : Affichage des fenêtres

Re 🙂,
Quand tu vas dans VBA, tu dois avoir un fichier PERSO.XLS qui est ouvert alors que tu ne le vois pas. Si ce n'est pas le cas, pas de problème, tu fais un enregistrement de macro avec l'enregistreur, et pour l'emplacement de cette macro, tu choisis classeur des macros personnelles.
A ce moment là, tu peux mettre ta macro dans ce classeur particulier. L'avantage est que la macro est accessible depuis n'importe quel classeur, sans que celui-ci soit visible...
Pour l'équivalent clavier, si, c'est effectivement ce dont je te parlais.
Par contre, le seul problème qui reste, c'est où stocker ton compteur 🙄...
Bon courage 😎

 

[Hippolite]

Re : Affichage des fenêtres

Bonjour,
Pour la partie raccourci clavier :
Menu Outils:Macros/Macros.../Options...
A+

 

[camilla116]

Re : Affichage des fenêtres

Re 🙂,
Quand tu vas dans VBA, tu dois avoir un fichier PERSO.XLS qui est ouvert alors que tu ne le vois pas. Si ce n'est pas le cas, pas de problème, tu fais un enregistrement de macro avec l'enregistreur, et pour l'emplacement de cette macro, tu choisis classeur des macros personnelles.
A ce moment là, tu peux mettre ta macro dans ce classeur particulier. L'avantage est que la macro est accessible depuis n'importe quel classeur, sans que celui-ci soit visible...
Pour l'équivalent clavier, si, c'est effectivement ce dont je te parlais.
Par contre, le seul problème qui reste, c'est où stocker ton compteur 🙄...
Bon courage 😎

Le fichier que j'ai créé est vraiment très basique, à chaque fois que je clique sur le bouton un 1 s'inscrit dans une cellule et sélectionne la cellule suivante, à la dernière ligne j'ai une formule "somme" qui additionne tous les 1 et me donne donc le nombre de personnes qui sont venues dans la journée. Je ne sais pas comment je vais faire pour mon compteur. Je vais me creuser les méninges, je vais bien trouver une solution :-D Merci en tous cas pour les réponses.

 

[JNP]

Re : Affichage des fenêtres

Re 🙂,
Dans ton module du PERSO.XLS, tu colles

Sub Compteur()
' Touche de raccourci du clavier: Ctrl+f
Dim I As Integer
With Application.VBE.ActiveVBProject.VBComponents(2).CodeModule
I = Val(Replace(.Lines(1, 1), "'", ""))
I = I + 1
.ReplaceLine 1, "'" & I
End With
End Sub
Sub ValeurCompteur()
' Touche de raccourci du clavier: Ctrl+Maj+f
With Application.VBE.ActiveVBProject.VBComponents(2).CodeModule
MsgBox Replace(.Lines(1, 1), "'", "")
End With
End Sub
Sub RaZCompteur()
' Touche de raccourci du clavier: Ctrl+g
With Application.VBE.ActiveVBProject.VBComponents(2).CodeModule
.ReplaceLine 1, "'0"
End With
End Sub

et dans le code de Feuil1, tu colles

'0

Il te suffit de mettre les équivalents claviers que tu souhaites. A partir du moment où Excel sera activé, ton compteur fonctionnera. Si tu quittes, il enregistrera ton compteur là où tu en seras 😛...
Seule subtilité dont je ne me rappelle plus sous 2003, c'est que là où tu gères l'acceptation des macros, il faut cocher "Accès approuvé au modèle d'objet du projet VBA" 🙄...
Bon courage 😎