Discussion :

[Ju1.0]

Bonjour

Je voudrais savoir ou trouver les ressources pour lancer des macro sur évènement. Plus particulièrement à la fin de la saisie d'une cellule (entrée ou sélection d'une autre cellule) ou comment interdire la sélection d'une autre cellule autrement que par entrée lorsque l'on écrit dans une cellule. Ou encore comment lancer une macro par le clique sur n'importe quelle cellule, avec en paramètre, les coordonnée de cette cellule.

De plus

Dans ce zoli fichier Excel il y a tout un tas de groupe de colonne groupée (), et pareil avec les lignes. Je voudrai pouvoir enrouler et dérouler automatiquement certain de ces groupes. Direction l'enregistreur de macro pour voir quel code sort, si il y a quelque chose d'exploitable. après plusieurs essais qui ne donnent rien, j'ai ça

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Sub Macro6()
'
' Macro6 Macro
' Macro enregistrée le 11/02/2011 par ju1.0
'
 
'
    Rows("5:12").Select
    Range("B12").Activate
    ExecuteExcel4Macro "SHOW.DETAIL(1,11,FALSE,,4)"
    Rows("12:12").Select
    Range("B12").Activate
    ExecuteExcel4Macro "SHOW.DETAIL(1,11,TRUE,,4)"
End Sub

Et petit test pour voir si ça marche

Erreur d'exécution '1004':

Vous avez tapé un nombre trop important d'arguments pour cette fonction.

Pour obtenir de l'aide sur la manière de saisir des arguments pour la fonction, cliquez sur OK pour fermer ce message. Sur la barre de formule, cliquez sur le bouton du signe égal (à gauche du signe égal de votre formule).

1. le message d'erreur n'a pas de bouton OK, juste 'fin', 'déboguage', 'aide', et 'continuer' en gris (à la rigueur, je suis pas trop bète, je clique sur faim, ..euh ... fin)
2. Je ne comprend pas trop ce que la barre de formule viens faire ici. Et de toute façon ils ne donnes pas vraiment plus de précision sur le sujet
3. Le bouton d'aide ne donne absolument rien de rien du tout à part des banalités inutile.

Donc, comment faire pour exécuter ce petit bout de code pour pouvoir enrouler et dérouler les groupes ?
Et je le rappelle, comment lancer une macro sur action genre clic dans le classeur ?

Merci d'avance

[LouiMz]

Bonjour,

La programmation événementielle s'effectue directement dans les feuilles (Sheets) de l'editeur de macro, egalement dans le Classeur (Workbook) ou encore dans les UserForm.

Changement de selection, activation, avant la sauvegarde faire...

Vous pouvez egalement faire de l'événementielle sur les controles (textbox, combobox...) inserés dans le classeur ou dans un userform.

Cordialement

Ps: Lorsqu'on change de selection, inclure une condition pour ne provoquer les evenements que sur les cellules souhaitées :

Code :

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

1
2
3
4
5
 
'Executera le code si la cellule selectionnée est B5
If Activecell.row = 5 and Activecell.column = 2 then
...
End if

[Ju1.0]

Merci de la réponse LouisMz mais...
Je n'ai ni UserForm ni contrôles. Ça aurait été simple, vu que ce sont des objet créé pour la programmation évènementielle.
En fait il y a un début de réponse qui m'intéresse ici

La programmation événementielle s'effectue directement dans les feuilles (Sheets) de l’éditeur de macro

mais je ne sais toujours pas comment faire ! Même un exemple me permettrai de savoir ou feuilleter la documentation.

[LouiMz]

Re,

Pas de problème il est vrai que je n'ai pas assez détaille.

Dans l'editeur de macro, l'ensemble des feuilles présentes dans les classeurs sont listées sur la gauche.

En double cliquant dessus, on arrive dans le "code" des feuilles. Puis en cliquant sur la liste au dessus à gauche selectionnez Worksheet (ou Workbook) puis vous verez apparaitre l'ensemble des methodes appliquées à la feuille, dans la liste en haut à droite.

Une image vaut mieux qu'un long discours :

Cordialement

[Didier Gonard]

Bonjour,

un peu de recherche dans les Tutoriels et la FAQ Excel te serait des plus salvateurs, par exemple :

Les évènements dans la feuille de calcul Excel

cordialement,

Didier

[Ju1.0]

En fait, je me sens tout minable de vos 2 réponses. Bien que la partie première de mon job ne soit pas développeur, je suis censé assez bien connaitre toussa. De plus, je fait systématiquement des recherche avant de poster, mais apparemment, pas les bonne.
dois être fatigué moi

En vérité, je vous le dis, j'ai honte.
J'espère que personne que je connais ne me reconnaitra ici

Il me reste toujours la 2ème partie. pourquoi le message d'erreur lorsque je lance une macro que je viens d'enregistrer ?

Je craint un max, jvous jure

[Ju1.0]

J'ai revu ce dont j'avais besoin. Je ne fait plus que refermer tout les groupes. J'ai refait l'enregistrement de macro, simplifier un peu le code et le message d'erreur n'apparait plus.

Code :

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

1
2
3
4
5
6
7
8
9
10
Sub OpenMacro()
'
' OpenMacro Macro
' Macro enregistrée le 14/02/2011 par jchartrain
'
 
'
    ActiveSheet.Outline.ShowLevels RowLevels:=0, ColumnLevels:=1
    ActiveSheet.Outline.ShowLevels RowLevels:=1
End Sub

Je résous, mais si quelqu'un à une explication sur le message d'erreur, je serai ravi d'en aprendre un peu.