> Tous les forums > Forum Bureautique
 Macro excel selection d'une plage (a vot bon coeur
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
nbenhamo
  Posté le 16/09/2011 @ 12:17 
Aller en bas de la page 
Nouvel astucien

Bonjour,
Je souhaite automatiser un traitement mais je bloque sur une macro a savoir.
j'ai un tableau de 10 colonnes et un nombre de ligne variable.
Je souhaite par macro sélectionner toutes les colonnes de A à K qui ont la valeur égale soit "OUI" ou à "Fortier" ou à "Test"en colonne G

Si une personne à la solution
D'avance merci



Modifié par nbenhamo le 16/09/2011 16:10
Publicité
gilbert_rgi
 Posté le 16/09/2011 à 20:17 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Bonsoir

ceci peut-il faire la demande ?

cliquez ici

dlxpat
 Posté le 16/09/2011 à 22:05 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Bonsoir ! interessé par la question posée par nbenhamo (que je remercie) j'ai regardé la proposition de gilbert_rgi, mais la macro bloque au niveu de la ligne

.TintAndShade = 0

Est ce normal ? Merci d'avance

gilbert_rgi
 Posté le 17/09/2011 à 09:26 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Fonctionne avec la version excel 2007

ces attributs servent au contraste de la couleur et au motif soit enlever la ligne pour les versions précédentes

ou mettre un rem (') devant cette ligne

idem pour .PatternTintAndShade = 0

comme ceci

With Selection.Interior
.Pattern = xlNone
' .TintAndShade = 0
'.PatternTintAndShade = 0
End With

ce morceau de programme est utilisé uniquement pour enlever la couleur des selections précédentes



Modifié par gilbert_rgi le 17/09/2011 09:37
dlxpat
 Posté le 17/09/2011 à 10:43 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Merci à Gilbert ! j'ai voulu tester mais lorsque j'ouvre le fichier c'est une page blanche !!! en faisant Alt F11 je tombe bien sur le VBA mais impossible de retrouver le fichier original !!

gilbert_rgi
 Posté le 17/09/2011 à 12:14 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

cliquez ici fichier avec modifications faites



Modifié par gilbert_rgi le 17/09/2011 15:53
dlxpat
 Posté le 17/09/2011 à 15:40 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

C'est sympa ! j'ai recopié la mcro dans un fchier pour lequel cette manip m'est utile et tout est OK. Par contre dans ton fichier joint, il faut que j'aille voir un autre onglet puis revenir sur le premier pour que la macro s'effectue correctement !! Ce n'est pas moi qui ai posé la première question, mais ce dossier m'a bigrement plu ! Merci à toi.

gilbert_rgi
 Posté le 17/09/2011 à 16:01 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Sur quelle version de excel êtes vous?

moi je suis sur 2007 et je ne rencontre pas ce problème

dlxpat
 Posté le 17/09/2011 à 19:20 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Je vais paraitre idiot mais je ne sais jamais où aller pour connaitre ma version de Excel et/ou Word.

Nota : désolé de vous avoir tutoyer (ce n'est pas trop mon habitude !) mais j"avais cru comprendre que c'était un peu de mise sur ce forum, au demeuranr absolument superbe.

Publicité
gilbert_rgi
 Posté le 18/09/2011 à 09:12 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

dlxpat a écrit :

Je vais paraitre idiot mais je ne sais jamais où aller pour connaitre ma version de Excel et/ou Word.

Nota : désolé de vous avoir tutoyer (ce n'est pas trop mon habitude !) mais j"avais cru comprendre que c'était un peu de mise sur ce forum, au demeuranr absolument superbe.

au démarrage d'excel ou de word la version est indiquée sinon dans à propos la version y est aussi

le à propos dans la version 2007 se trouve dans les options

le tutoiement ne me choque pas certains l'emploient rapidement d'autres moins ce n'est pas grave.

dlxpat
 Posté le 18/09/2011 à 12:46 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

C'était tout bête et je n'avais jamais fait attention. Ce serait Excel 2000 !

gilbert_rgi
 Posté le 19/09/2011 à 08:30 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

peut-être que que le vba du programme ne fonctionne pas correctement avec cette version ancienne ?

le poseur de la question pourrait peut-être nous dire le fonctionnement avec son environnement pour son premier message il ne donne pas de retour {#}



Modifié par gilbert_rgi le 19/09/2011 08:34
nbenhamo
 Posté le 19/09/2011 à 09:34 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Nouvel astucien
Bonjour a tous et merci a Gilbert_RGI je suis désolé de ne pas avoir pu répondre avant mais j'étais en W.End sans micro désolé. Ce matin j'ai regardé la macro elle fonctionne parfaitement,mais le seul soucis que j'ai c'est qu'elle color en jaune la selection de mais de garde pas la selection active. En fait j'ai besoin soit de copier soit de couper cette selection il faut donc quelle reste active. gilbert peux tu corriger la macro juste enlever le Jaune et garder la selection active. Sinon je te remercie ça fait quinze jours que je galere sans trouver la solution alors merci et bravo.
gilbert_rgi
 Posté le 19/09/2011 à 09:44 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

la selection est temporaire

donc il faut faire le traitement au fure et à mesure du déroulement

ex si le mot trouvé est Oui alors supprimer la ligne

si le mot trouvé est Fortier alors ......

si le mot est Test alors .........

la coloration en jaune est en quelques sortes le traitement

voilà il faut préciser ce que l'on veut faire {#}



Modifié par gilbert_rgi le 19/09/2011 09:45
nbenhamo
 Posté le 19/09/2011 à 10:03 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Nouvel astucien

Gilbert,

J'ai bien compris mais peut-on faire la sélection de toute les lignes et les copier ensuite pour les incorporer a un autre traitement.

Je ne peux pas ou difficilement utiliser cette macro si elle sélectionne ligne par ligne.

Il faut absolument que la sélection se fasse et quelle reste active sur toutes les lignes qui sont ok aux critères de sélection de la colonne A à K.

Merci pour ton aide

gilbert_rgi
 Posté le 19/09/2011 à 10:10 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

je ne comprend pas car ça revient au même de faire le traitement ligne par ligne

mais bon

nbenhamo
 Posté le 19/09/2011 à 10:25 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Nouvel astucien

Gilbert,

Tu as sûrement raison mais je suis pas vraiment une bête en macro et je le vois mieux comme ça avec une sélection entière et qui a la fin de la macro la sélection qui reste active.

Comme ça je peux enchainer avec copier le coller

Merci de ta patience

Publicité
gilbert_rgi
 Posté le 19/09/2011 à 10:34 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

modifier

With Selection
.Interior.ColorIndex = 36
End With

par

With Selection
.Copy Sheets("feuil2").[G65000].End(xlUp).Offset(1, -6)
End With

ce qui copie la selection en feuille 2

suite à ma modification



Modifié par gilbert_rgi le 19/09/2011 10:54
nbenhamo
 Posté le 19/09/2011 à 11:34 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Nouvel astucien

Gilbert,

j'zai eu ta derniere modif, c'est presque ça que je souhaite, peux tu plutôt que de copier en feuil2 , copier la selection à partir de la ligne Z1 de la feuil1 .

Merci

gilbert_rgi
 Posté le 19/09/2011 à 11:45 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

désolé ce sera en z2 {#}

With Selection
.Copy Sheets("feuil1").[z65000].End(xlUp).Offset(1, -6)
End With

nbenhamo
 Posté le 19/09/2011 à 12:31 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Nouvel astucien

Gilbert super, encore merci .

J'ai teste rapidement c'est OK je vérifie plus profondement et te tien au courant.

En tout cas BRAVO et MERCI

nbenhamo
 Posté le 19/09/2011 à 15:22 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Nouvel astucien

Gilbert,

Tout est ok je te remercie pour ta rapidité et ton talent

Publicité
Page : [1] 
Page 1 sur 1

Vous devez être connecté pour poster des messages. Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !


Les bons plans du moment PC Astuces

Tous les Bons Plans
8,99 €McAfee Internet Security 2020 (3 appareils, 1 an) à 8,99 €
Valable jusqu'au 03 Avril

Amazon fait une promotion sur la suite antivirus Internet Security 2020 qui passe à 8,99 €. Cette protection intégrale alliant antivirus, protection de l'identité et protection de la confidentialité des données pour tous vos PC, Mac, smartphones et tablettes est valide pour 3 appareils pendant 1 an. La clé d'activation ainsi que le lien de téléchargement vous seront envoyés par email une fois la commande passée. Une très bonne affaire.


> Voir l'offre
22,99 €Sac à dos Sparin pour ordinateur portable jusqu'à 17.3 pouces à 22,99 €
Valable jusqu'au 03 Avril

Amazon fait une promotion sur le sac à dos Sparin pour ordinateur portable jusqu'à 17.3 pouces qui passe à 22,99 € alors qu'on le trouve habituellement à 32,99 €. Ce sac à dos renforcé, rembourré et étanche comporte un compartiment pour un ordinateur de dimensions max 340x40x470 (17.3 pouces) et un autre compartiment pour ranger vos affaires. Une poche frontale zippée est également présente. Notez que des fentes protégées vous permettront de brancher depuis l'extérieur une prise USB et un casque audio aux appareils à l'intérieur du sac.


> Voir l'offre
279 €Casque sans fil à réduction de bruit Sony WH-1000XM3 (Hi-Res Audio, Bluetooth/NFC) à 279 €
Valable jusqu'au 07 Avril

Amazon propose actuellement le casque sans fil à réduction de bruit et Hi-Res Audio Sony WH-1000XM3 à 279 € livré gratuitement. On le trouve ailleurs à partir de 360 €. Jusqu'à 30h d'autonomie avec la fonction de réduction de bruit activée et fonction Quick Attention pour réduire instantanément le volume de votre musique et pouvoir suivre une conversation. 


> Voir l'offre

Sujets relatifs
[Excel 2007] Macro : Sélection d'un tableau selon sa longueur variable
sélection plage de données (macro)
Définir 1 plage de cellules dans 1 macro excel
excel macro selection cellules vides Résolu
2 pages par feuille dans macro excel
Creation d' une boucle macro dans fichier EXCEL pour impression
besoin d'une macro excel 2007
Macro Excel. Mes colonnes disparaissent.
libre Office : macro Excel présente et non active
Macro couleur séries graphique excel 2010
Plus de sujets relatifs à Macro excel selection d''une plage (a vot bon coeur
 > Tous les forums > Forum Bureautique