Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Executer une macro à partir de la cellule active

1,484 views
Skip to first unread message

Olivier De.

unread,
Aug 21, 2002, 4:07:50 AM8/21/02
to
Salut zahkoukcha !

Permière règle, ne jamais dire que c'est très urgent ! plus tu stress, plus
long sera le temps d'une réponse concrète ..

Pour ce qui concerne ton problème, pourrais-tu nous donner ton code pour que
l'on puisse te donner de l'aide ..

Dans l'attente de ta prochaine réponse..
Salutations
Olivier De.


Pierre Fauconnier

unread,
Aug 21, 2002, 4:21:47 AM8/21/02
to
Bonjour

En fait, ta macro, probablement enregistrée avec l'enregistreur de macros,
crée un code VBA. Lorsque tu es dans Excel, tu peux basculer en VBA via
Alt+F11, ou arriver directement au code de la macro en allant dans
Outils/Macros... Choisir ta macro puis cliquer sur Modifier.

Le code de la macro se trouve là.

Dans ton exemple, tu as sûrement une ligne de type Range("...").Select ( Les
... représentent la coordonnée de la cellule ). Tu remplaces cela par
Selection

Le plus simple est de sélectionner le code et de le copier dans un nouveau
message DANS LE MEME FIL stp... et sans fichier joint...

D'une façon générale, si tu enregistres une macro qui doit pouvoir être
utilisée avec des cellules différentes, positionne-toi sur une cellule AVANT
de démarrer l'enregistreur. Ainsi, l'enregistreur travaillera avec la
sélection et n'enregistrera pas une cellule particulière

Si ta macro n'est pas trop longue ( peu de manipulations entre le début et
la fin de l'enregistrement), tu peux aussi en enregistrer une nouvelle APRES
t'être placé sur une cellule


--
Cela convient-il?
----
Pierre Fauconnier
"N'insulte pas le crocodile avant d'avoir traversé la rivière"


"zahkoukcha" <zahko...@caramail.com> a écrit dans le message de news:
503801c248ea$5f4b9050$2ae2...@phx.gbl...
>
>
>
>.Merci de ta réponse
mais de quel code s'agit il?
>


Olivier De.

unread,
Aug 21, 2002, 4:33:25 AM8/21/02
to
Salut zahkoukcha !

Quand on parle de code, c'est le texte de ta macro. Donne nous simplement de
"texte de ta macro" et nous verrons ce que nous pourrons faire pour toi ..

Dans l'attente de ta prochaine réponse...

Salutations
Olivier De.


Olivier De.

unread,
Aug 21, 2002, 4:40:04 AM8/21/02
to
Salut zahkoukcha !

Excuse-moi si je ne t'ai donné plus d'info mais je pense qu'avec les
derscriptions de Pierre, tu devrais pouvoir trouver ce fameux "Code" et nous
en faire part ...

Quand tu enregistre une macro, tu fais Outils, Macro, nouvelle macro et tu
lui donne un nom. Ensuite toutes les opérations que tu fais son enregistrées
en code vba. Une foi que tu a fini tes opérations tu fais Outils, Macro,
Arrêter l'enregistrement. Ensuite, tu fais ALT+F8 et à ce moment là, tu vois
apparaître le texte de ta macro sous forme VBA.... Alors à ce moment là, tu
sélectionne tout le texte et tu le copie dans un message (reste dans le même
sujet c'est-à-dire, clique droit sur ton message et tu sélectionne "Répondre
au groupe"!!!!). De cette façon on pourra te donner une réponse dans les
plus brefs délais ...

Salutations
Olivier De.


zahkoukcha

unread,
Aug 21, 2002, 4:50:15 AM8/21/02
to

Encore merci mais ca ne marche toujours pas
Voici la macro
' essai3 Macro
' Macro enregistrée le 21/08/02 par GIGOUT
'
' Touche de raccourci du clavier: Ctrl+z
'
Rows("8:8").Select
Selection.Insert Shift:=xlDown
Range("A7:AG7").Select
Selection.Copy
Range("A8").Select
ActiveSheet.Paste
Application.CutCopyMode = False
End Sub
j'aimerai qu'elle fonctionne n'impote ou la elle ne
fonctionne qu'au niveau des lignes 8 et 7 peu importe ou
je me positionne
merci de votre aide

Pierre Fauconnier

unread,
Aug 21, 2002, 4:58:01 AM8/21/02
to
Bonjour

En fait, tu ne saurais pas enregistrer une macro de ce type pour qu'elle
fonctionne de n'importe quelle cellule. Peux-tu expliquer in extenso ce que
tu souhaites obtenir à partir d'une cellule?


--
Cela convient-il?
----
Pierre Fauconnier
"N'insulte pas le crocodile avant d'avoir traversé la rivière"

"zahkoukcha" <zahko...@caramail.com> a écrit dans le message de news:

50b901c248ef$c4f2b820$2ae2...@phx.gbl...

zahkoukcha

unread,
Aug 21, 2002, 5:25:43 AM8/21/02
to
Merci de ta réponse
En fait ce que je veux faire c'est:
1) Insérer une ligne
2) selectionner une partie dela ligne au dessus de la
ligne que je viens d'insérer
3) Copier cette partie de ligne et la coller dans la ligne
insérer
J'aimerai faire cela dans un tableau relativement grand
Je me positionne sur une cellule et j'active la macro et
ceci à n'importe quelle ligne

Pierre Fauconnier

unread,
Aug 21, 2002, 5:58:27 AM8/21/02
to
Peux-tu donner un exemple à partir d'une cellule ?

Pierre


"zahkoukcha" <zahko...@caramail.com> a écrit dans le message de news:

5c8501c248f4$b94e9430$3bef2ecf@TKMSFTNGXA10...

zahkoukcha

unread,
Aug 21, 2002, 7:21:49 AM8/21/02
to
Je ne comprends pas bien ce que vous me demander.
Par exemple soit la cellule A9 je selectionne la ligne 9
et je fais insertion d'une ligne complète qui apparait
donc au dessus de la ligne 9
Ensuite je selectionne par exemple 26 cellules adjacentes
sur la ligne se situant au dessus de la ligne qui vient
d'etre insérée.Je fais copier et je colle sur la ligne que
j'ai insérée.
mais en faisant ceci à partir de la ligne 9 quand
j'appelle la macro et que je me positionne sur A48 par
exemple , la macro va aller travailler au niveau des
lignes 7,8,9 lignes à partir desquelles j'ai effectué
l'enrgistrement de la macro
La macro que je vous ai envoyée correspond à cette
manoeuvre
Ne connaisant le langage de programmation je ne peux pas
moi meme ecrire le programme
J'espère avoir répondu à vos interrogations.
>-----Message d'origine-----
>.
>

Pierre Fauconnier

unread,
Aug 21, 2002, 7:36:51 AM8/21/02
to
Bonjour

Voici une macro qui pourrait convenir, à condition de l'adapter

Sub InsererCopier()
Dim Cellule As Range
Set Cellule = ActiveCell
Cellule.EntireRow.Insert shift:=xlUp
Set Cellule = Cellule(-1)
Range(Cells(Cellule.Row, 1), Cells(Cellule.Row, 26)).Copy _
Destination:=Range("a" & Cellule(2).Row)
End Sub

Cette macro insère une ligne avant la ligne de la cellule active, puis
sélectionne les 26 premières cellules de la ligne au dessus de la ligne vide
et les colle dans la ligne vide. Il faut évidemment adapter en fonction du
nombre et de la position des cellules à copier


--
Cela convient-il?
----
Pierre Fauconnier
"N'insulte pas le crocodile avant d'avoir traversé la rivière"

"zahkoukcha" <zahko...@caramail.com> a écrit dans le message de news:
bdc401c24904$f0f8cfd0$39ef2ecf@TKMSFTNGXA08...

zahkoukcha

unread,
Aug 21, 2002, 8:42:13 AM8/21/02
to
Merci infiniment!!!!! Ca marche
Mais le problème est que j'ai un
autre problème!!!
En effet je dois mettre en place une autre macro dont le
but est d'effectuer un tri sur une colonne .En fait il
s'agit d'un tri personnalisé dont le critère est "se
termine par" #
Malheuresement en m'inspirant de la macro que vous m'avez
suggeré je n'arrive pas à mettre point cette macro dans la
mesure ou elle ne trie que la colonne qui m'a servi à
l'enregistrement.Le but de cette macro est donc quand je
selectionne une colonne quelconque elle me la trie selon
le critère énoncé auparavant
voici ce que j'ai écrit:
Sub filtrehierarchie()
'
' filtrehierarchie Macro

' Macro enregistrée le 21/08/02 par GIGOUT
'

'Dim Columns As Range
Set Columns = ActiveColumns
Selection.AutoFilter
Selection.AutoFilter Field:=1, Criteria1:="=*#",
Operator:=xlAnd
End Sub
Merci d'avance
>-----Message d'origine-----

>.
>

Pierre Fauconnier

unread,
Aug 21, 2002, 8:56:12 AM8/21/02
to
Normalement, cela devrait marcher, pour autant que la cellule active ne se
trouve pas isolée, c'est-à dire sans données à sa gauche et à sa droite


--
Cela convient-il?
----
Pierre Fauconnier

"N'insulte pas le crocodile avant d'avoir traversé la rivière" (Julos
Beaucarne)

"zahkoukcha" <zahko...@caramail.com> a écrit dans le message de news:

718a01c24910$2c4021a0$9ae62ecf@tkmsftngxa02...

zahkoukcha

unread,
Aug 21, 2002, 9:16:41 AM8/21/02
to
Le filtre doit agir sur la colonne qui est donc remplie
don c la cellule n'est pas isolée mais ça ne marche
toujours pas le résultat concerne toujours la colonne
sélectionée lors de l'enregistrement meme si la cellule
active est dans une autre colonne ,colonne que l'on
souhaite trier

>-----Message d'origine-----

>.
>

sabatier

unread,
Aug 21, 2002, 9:29:22 AM8/21/02
to
tu veux plutôt dire ALT + F11, olivier
jps (qui se demande bien si ce zakhoukcha a un rapport avec la boufe)

Olivier De.

unread,
Aug 21, 2002, 9:52:28 AM8/21/02
to
Salut JPS !

En fait, moi, je fais ALT+F8 et ensuite je sélectionne la marco en question
et je fais "modifier". Toutes mes excuses mais je pense que je me suis un
peu mêlé les pinceaux dans mon blabla...

En effet, ALT+F11 ouvre l'éditeur vba mais pas forcément à l'endroit voulu
(selui de la macro dernièrement créée. Alors que avec ALT+F8 l'on peut
sélectionner celle qui nous intéresse (si on en a plusieurs ...) et après un
clique sur modifier et hop, on est tout de suite dessus ...

Merci quand même pour la remarque ...

Salutations
Olivier De.


sabatier

unread,
Aug 21, 2002, 1:14:30 PM8/21/02
to

salut olivier
à condition encore qu'il ne s'agisse pas d'une macro complémentaire...
enfin, comme disait mon professeur de français -qui était d'origine
suisse- :
"l'essentiel est qu'on se comprend"
jps

"Olivier De." wrote:

> Salut JPS !

Monique Brunel

unread,
Aug 21, 2002, 3:57:03 PM8/21/02
to
Bonsoir zahkoukcha,
bienvenue sur mpfe :-)

Il n'est pas facile de s'expliquer quand on ne connaît pas encore le
logiciel à utiliser. Sur les sites proposés dans ce message d'accueil,
tu découvriras des cours (avec ou sans VBA), des classeurs d'exemples à
télécharger, des macros, des trucs et astuces... Ces pages te
permettront de découvrir un peu Excel et VBA, de prendre connaissance
des termes utilisés... donc de t'expliquer plus facilement et de pouvoir
mieux exploiter les solutions proposées
http://dj.joss.free.fr/vbanul.htm
http://disciplus.simplex.free.fr/xl/lexique.htm
http://www.polykromy.com/html/astuces.html
http://cherbe.free.fr/xl_debutant1999.htm

Pour connaître les habitudes de mpfe (et les erreurs à éviter, comme les
fichiers joints...), tu peux lire ces messages publiés régulièrement
ici, avec l'un de ces intitulés
- FAQ MPFE
- [Charte] du forum MPFE
et consulter ces pages
http://dj.joss.free.fr/netiquet.htm (nétiquette, conseils...)
http://disciplus.simplex.free.fr/mpfe/connection.htm
(connexion,conseils...), à consulter absolument si tu suis le forum
depuis une page web (la solution la moins efficace et la moins
confortable) ou avec le serveur de Wanadoo (très peu performant quant au
délai d'affichage et au nombre de messages publiés).

Pour les débutants, voilà 5 bons trucs pour apprendre vite :
- utiliser souvent l'enregistreur de macro et analyser le code obtenu
- utiliser la touche F1 pour appeler l'aide (à propos du mot-clef, en
VBA, sur lequel se trouve le curseur)
- tester et essayer de comprendre des réponses faites à d'autres
- consulter souvent les sites renseignés
- ne jamais hésiter à poser des questions sur le forum

Voici la liste des sites dédiés à Excel, réalisés par des mpfie(ne)s et
que nous devons tous avoir dans nos favoris.
Débutant ou utilisateur confirmé, tu y trouveras de quoi apprendre,
progresser et résoudre bien des problèmes.
(la date d'une mise à jour est signalée par ** ** )
http://dj.joss.free.fr/faq.htm ** 18/08/02 **
la FAQ du forum, mise en oeuvre par Daniel et à lire absolument par tout
nouveau sur mpfe : la bonne manière de participer au forum (charte,
souriettes, abréviations...), liens, bibliographie, les réponses aux
questions le plus souvent posées, des trucs et astuces, un moteur de
recherche interne et externe (Yahoo), une page débutants
http://disciplus.simplex.free.fr/ ** 20/08/02 **
le site humoro-ludique de Misange : une importante rubrique "Trucs et
astuces", des classeurs à télécharger, un glossaire, une page débutants,
des jeux en VBA... et un méta-moteur de recherche sur 6 sites de cette
liste...
mais aussi tout ce qui fait "l'esprit mpfe", les perles, les gifs...
et,sur http://fotoflo.free.fr/ les photos des soupers/dîners de mpfe
http://longre.free.fr/
le site de Laurent, notre Grand Chef à Quatre Plumes : de très nombreux
liens commentés, les macros pointues de Laurent... (techniques de
programmation, calculs de dates et d'heures, Api...)
http://jacxl.free.fr/mpfe/ ** 17/05/02 **
le site de J@C : les graphiques, la bourse, le Web, un cours VBA, un
moteur de recherche à la page Aide... et le trombinoscope des
mpfien(ne)s
http://ericrenaud.free.fr/index.html ** 15/05/02 **
le site d'Eric : particulièrement destiné aux débutants (UserForm...)
http://perso.wanadoo.fr/frederic.sigonneau ** 26/08/01**
le site de Frédéric : gestions de temps, VBA pour Excel... une mine d'or
de macros
http://xlbysteph.free.fr/aideinformatique/web.htm ** 15/10/01 **
le site de Stéphane : cours VBA, Excel 4 (ou 5) et Excel 97/2000...
http://perso.club-internet.fr/bdafonse
le site de Bruno : formules, classeurs à télécharger...
http://cherbe.free.fr/ ** 21/01/02 **
le site de Christian : initiation à Excel, initiation à VBA, Excel
avancé sans VBA... (cours à télécharger)
http://www.ilyapa.net/excel/ ** 22/05/02 **
le site de Pascal : procédures VBA, composants par
l'exemple,calendriers, jeux
http://intendant.free.fr/ ** 13/03/02 **
le site de Thierry : cours VBA (début et perfectionnement), graphique,
Excel en bureautique...
http://www.polykromy.com/ ** 18/08/02 **
le site de Gaëtan : cours sur Excel sans VBA, les couleurs, des astuces
animées...
http://www.excel-downloads.com ** 12/08/02 **
le site de David, des programmes Excel à télécharger
http://www.anthony-penel.fr.st
le site d'Anthony : des macros appliquées à la finance
http://www.fundp.ac.be/~jmlamber/
le site de Jean-Marie : initiation VBA, TCD, listes, solveur...
http://www.ibelgique.com/OfficeAssistant ** 08/08/01 **
le site de Bureauticien : nombreux exemples résolus par VBA,fonctions...
http://www.cathyastuce.com/index.htm ** 15/12/01 **
le site de Cathy : cours Excel avec ou sans VBA...
http://perso.wanadoo.fr/jean.duprat
le site de Papy Jean : fiches Excel pour débutants...
http://www.ifrance.com/fleguen/excel.html
le site de Konga : des classeurs d'exercices (fonctions, macros)

Pour une collection très fouillée d'adresses (avec commentaires) :
le classeur de Clément M, à télécharger sur disciplus
Favoris.xls
Et un lien à y ajouter, la liste des constantes intrinsèques de VBA avec
leur valeur numérique (par versions d'Excel) :
http://support.microsoft.com/support/kb/articles/Q112/6/71.ASP
(télécharger: wc0993.exe)

Pour le passage de Excel 4 à Excel 97, un lien proposé par Geo
http://www.microsoft.com/FRANCE/officedev/infotech/info.asp?mar=/FRANCE/
officedev/infotech/MacroXLtoVBA.html
(le lien tient sur plusieurs lignes, il se termine par html)
ou http://minilien.com/?5vyhNUG62R

Enfin, pour retrouver d'anciens messages, tu peux aller sur
http://groups.google.com/advanced_group_search
avec les conseils de Clément M pour obtenir les meilleurs résultats :
--- Là, il y a un écran "bilingue" qui permet de faire une recherche
plus ou moins pointue, selon les informations dont l'on dispose.
Une fois que l'on a repéré un message, il est possible de récupérer
l'ensemble de la ficelle, en cliquant sur "Voyez Fil de Discussion (x
articles)".
Je me suis aperçu que Google fonctionnait très mal quand on fait une
recherche avec un nom qui contient des accents. Il semble donc
préférable d'utiliser l'adresse électronique comme nom d'auteur.
Auteur clement....@sympatico.ca => 3.450 messages
Auteur Clément Marcotte => 1 message
Auteur Clément_Marcotte => 0 message ---

Bonne lecture et à bientôt sur mpfe.

--
Amicalement,
au nom des mpfiens et mpfiennes,
Monique (la Wallonne)
http://users.skynet.be/osga , pour les amateurs d'athlétisme

Ce que nous disait "zahkoukcha", <zahko...@caramail.com> :

0 new messages