Rechercher

Bonsoir Y a t'il une autre possibilité de remettre un filtre à 0 car avec cette proc ci-dessous cela provoque un ralentissement. Merci de votre aide Salutations David Sub Essais() Selection.AutoFilter Field:=11 Selection.AutoFilter Field:=10 Selection.AutoFilter Field:=9 Selection.AutoFilter Field:=8 Selection.AutoFilter Field:=7 Selection.AutoFilter Field:=6 ...
Entraide publié le Dimanche 07 mars 2004

Bonjour à tous ! J'ai une sélection : Range(Selection, Selection.End(xlDown)) je voudrais décaler cette sélection d'une colonne Comment je fais ?? Merci d'avance... Arnaud ...
Entraide publié le Mardi 19 octobre 2004

Re à tous ... Encore un Pb de selection : J'ai une zone de 5 cellules de sélectionnée. (Par exemple L20:P20) J'aimerai sélectionner automatiquement toute la zonne se trouvant au dessus de cette selection. Un peu du style : Range(Selection, Selection.End(xlUp)).Select Mais avec cette fonction, la premiere zone reste dans la sélection finale En fait, le but est de faire ...
Entraide publié le Lundi 02 février 2004

Bonjour, Dans une macro je veux supprimer une partie de tableau, selection sur la colonne A entre la cellule contenant N° de tâche et la cellule contenant matériel et uniquement les colonnes de A à I. Merci ...
Entraide publié le Samedi 08 avril 2006

Bonjour. J'ai une fichier très long (Obtenu par transfer RS232 via Hyper Terminal) que je met en page avec la macro suivante: Selection.MoveRight Unit:=wdCharacter, Count:=70 Selection.Delete Unit:=wdCharacter, Count:=1 Selection.Delete Unit:=wdCharacter, Count:=1 Selection.Delete Unit:=wdCharacter, Count:=1 Selection.Delete Unit:=wdCharacter, Count:=1 ...
Entraide publié le Jeudi 16 juin 2005

Bonjour, Je voudrais sélectionner un tableau avec la manip : ctrl + shift + flèche droite (4 fois) et flèche bas (4 fois). J'enregistre une macro pour connaitre le code. Il me donne le code suivant : Range(Selection, Selection.End(xlToRight)).Select Range(Selection, Selection.End(xlToRight)).Select Range(Selection, Selection.End(xlToRight)).Select Range(Selection, ...
Entraide publié le Jeudi 22 juillet 2004

Bonjour à tous et toutes Dans un classeur comportant une quinzaine de feuilles, je devrais pouvoir effacer le contenu de 6 feuilles; malheureusement pour moi avec des entêtes fixes différentes et nombre de lignes différents. J'ai fait un essai sur un classeur de 3 feuilles. Sub efface() Application.ScreenUpdating = False If MsgBox("Etes-vous certain d'effacer...?", ...
Entraide publié le Mardi 17 avril 2007

Bonsoir, Je souhaite simplifier cela afin de ne pas sélectionner le tableau. Je vous remercie Didier Range("A2:AD2000").Select Selection.AutoFilter Field:=5, Criteria1:="" Selection.AutoFilter Field:=6, Criteria1:="" Selection.AutoFilter Field:=7, Criteria1:="" Selection.AutoFilter Field:=8, Criteria1:="" Selection.AutoFilter Field:=9, Criteria1:="" ...
Entraide publié le Mardi 27 mai 2008

Bonjour à tous; je souhaite faire une macro qui mettra en forme les lignes d'une feuille dès que celle-ci aura dans la cellule A, le mot "ligne" et un chiffre (ligne 1, ligne 2, etc...) voici ma macro, pouvez-vous m'aider pour lui dire "ligne 1, ligne 2, etc" sachant que je ne sais pas à l'avance quelle sera la dernière ligne (ligne 5 ou ligne 250 ?) ----- Range("A1").Select ...
Entraide publié le Mercredi 23 mars 2005

-- Bonjour à tous Dans un listbox comment désactiver la sélection après chaque sélection (effacer la surbrillance de la sélection) J-P.V ...
Entraide publié le Lundi 25 octobre 2004

J'ai la macro suivante : Range("E49").Select Selection.AutoFilter Selection.AutoFilter Field:=5, Critérial1:">=762,25", Operator:=xland, _ Critérial2:=" ...
Entraide publié le Lundi 25 juillet 2005

Bonjour, j'ai des données eparpillé sur ma feuille: 1 2 4 1 1 1 1 1 5 je voudrait supprimer toutes les colonnes vides sur 74 colonnes avec ce code cela ne marche pas Range("b1:b4").Select For compteur = 1 To 74 If IsEmpty(Selection) Then Selection.Delete Shift:=xlToLeft End If Selection = Selection.Offset(0, 1) Next compteur ...
Entraide publié le Vendredi 10 mars 2006

Matériel pour opérateur Télécom. Idéal pour l'Afrique. lot de matériel DMC Stratex pour transmission BLR. photos, liste du matériel par email. matériel dispo à Paris 10éme. ...
Entraide publié le Vendredi 07 octobre 2005

Matériel pour opérateur Télécom. Idéal pour l'Afrique. lot de matériel DMC Stratex pour transmission BLR. photos, liste du matériel par email. matériel dispo à Paris 10éme. ...
Entraide publié le Vendredi 07 octobre 2005

Bonjour Je n'arrive pas à trouver la solution concernant ma mise en forme conditionnelle. Je voudrais que la mise en forme de F(i) se face en fonction de G(i) Sub Macro1() For i = 7 To 20 Range("F" & i).Select Selection.FormatConditions.Delete Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlEqual, Formula1:="=$F$5" ...
Entraide publié le Jeudi 14 septembre 2006

Dans le PS dont je dipsose, on peut transformer la sélection géometriquement, homothetie, rotations etc... Je voudrait savoir si dans des versions plus récente ( CS3 ) on peut faire une transformation de sélection par points de contrôle ; cad, pas modifier seulement le contour de la sélection, mais son contenu. Noëlle Adam. ...
Entraide publié le Lundi 03 septembre 2007

Bonjour Comment obliger une sélection sur un RadioButtonList et afficher un message si pas de sélection, et continuer la procédure après sélection ? Merci pour vos réponses Jean Claude ...
Entraide publié le Jeudi 03 janvier 2008

Bonjour à tous, J'ai 2 Subs. J'arrive à les lancer via 2 boutons independants sans pb. Par contre si je réunis c' 2 sub dans une là excel n'éxécute que la premiere partie pas la deuxième. Merci pour votre aide. Zigute. Voici le code : Sub RefCpt() Application.Goto Reference:="compta" Selection.AutoFilter Field:=1 Selection.AutoFilter Field:=2 ...
Entraide publié le Mercredi 16 août 2006

Bonjour à tous, J'ai enregistré la macro suivante et elle ne donne pas les résultats escomptés. Dans une plage x, je veux supprimer les cellules qui contiennent #valeur. Selection.AutoFilter Selection.AutoFilter Field:=4, Criteria1:="#VALEUR!" Range("D8").Select Range(Selection, Selection.End(xlDown)).Select Selection.Clear Y-a-t-il un expert qui peux m'aider. Merci Beaucoup! ...
Entraide publié le Mercredi 22 novembre 2006

Bonjour, J'ai une macro qui me sélectionne toute la région courante par Selection.CurrentRegion.Select Comment peut connaître le premier numéro de ligne de la sélection ainsi que le dernier numéro de ligne de cette sélection? Merci d'avance pour votre aide. -- @+ HD ...
Entraide publié le Mardi 25 janvier 2005