Contenu récent par Chaps

Re : filtre et macro En cherchant bien, j'ai trouvé une réponse de Hervé à un post, j'ai tenté d'adapter son code. Sub Macro2() Dim i As Byte Dim x As PivotTable Dim nombre As Boolean Set x = Worksheets("TCD").PivotTables("Tableau croisé dynamique2") With x.PivotFields("A terme")...

Re : filtre et macro Re, En fait, pour être plus précis, c'est un filtre de TCD, voici ce que j'aimerai obtenir, évidemment mon code est faux, mais je pense que vous comprendrez mon besoin. Sub Macro2() Dim c As long For c = 0 To 99999999999 ActiveSheet.PivotTables("Tableau...

Bonjour, J'ai un filtre sur lequel je n'aimerai demander que les valeurs négatives, sachant qu'elles sont nombreuses est il possible de faire la manip sous macro. Merci pour le retour @+ Chaps

Re : code à adapter Bonjour wilfried_42, Merci pour ton post, je le garde sous le coude, ca me semble pas évident meme si ca a l'air trés bien detaillé. @+ Chaps

Re : code à adapter Bonjour, Oops pas good new. M'enfin histoire à suivre !!

Re : code à adapter Re, Demande complémentaire, pour chaque changement de critère de filtre en colonne H je souhaiterais que la macro test soit lancée automatiquement, après recherche, j'ai collé ceci dans ma feuille et testé cela mais ca fonctionne pas ! Private Sub...

Re : code à adapter Bonjour, Ca m'a l'air ok, MERCI !!

Re : code à adapter Bonjour, Scusy je tente une relance Merci

Bonjour, Voici mon code, mais j'ai un pb, ma sélection à copier comporte parfois plus d'une ligne, serait il alors possible d'adapter mon code pour ne prendre en compte que la première ligne visible des lignes visibles de ma sélection (Range("g18:g" & Fin).Select) afin de ne coller qu'une...

Bonjour, URGENT : J'ai un filtre situé en I17, je souhaiterais obtenir dans ma cellule A7 l'élément coché dans mon filtre, et avoir genre une alerte d'erreur si plus d'un élément coché dans ce filtre. De plus, le résultat obtenu en A7 devra être concaténé avec une partie texte. Merci pour...

Re : Aide sur macro Bonjour à tous, Tout d'abord merci pour le suivi, et avec retard spécialement Pierrot93 qui a compris mon besoin. @+ Chaps

Re : Aide sur macro Mini Fixe : F19 Maxi variable : Soit dernière cellule de la colonne F non vide, avec comme celulle mini F19

Re : Aide sur macro re, merci pour la réponse, mais apparemment j'ai du mal m'exprimer, disons plutot que ma variable Fin doit avoir comme interval, mini F19 et maxi F65536. merci pour le suivi

Bonjour, J'ai besoin d'aide, voici le code suivant, je voudrais spécifier que ma variable appelée Fin ne peut aller en deçà de la cellule F19. Sub Clean() [E1].Value = "" Dim Fin As Integer Fin = [F65536].End(xlUp).Row Range("A19:F" & Fin).Select Selection.Delete Shift:=xlUp...

Re : probleme syntaxe code vba Ok merci pierrejean, j'étais sur d'avoir testé ca avant mais apparemment non car ca fonctionne bien.