Contenu récent par Jeanvaljean

Re : Connaître N° 1ère ligne d'une plage de cellules Bon, finalement j'ai trouvé la solution : je teste les cellules les unes après les autres jusqu'à obtenir mon critère de filtre toto, et à ce moment là, la valeur Firstrow correspond à mon numéro de ligne.... Do Until Range("E" &...

Re : Connaître N° 1ère ligne d'une plage de cellules une ligne vide entre mes 5 lignes d'entêtes et le résultat de mon filtrage.... Jean...

Re : Connaître N° 1ère ligne d'une plage de cellules Je comprends pourquoi, j'obtiens toujours 1 aux différentes solutions évoquées, car le tri est fait dans un tableau avec les 5 premières lignes correspondants à mes entêtes de colonnes. Et lorsque je fais mon fitrage, le résultat obtenu...

Re : Connaître N° 1ère ligne d'une plage de cellules Salut PierreJean Désolé mais j'obtiens toujours la même valeur x = 1. et lorsque je fais : lastrow = Range("A5").CurrentRegion.End(xlDown).Row (j'obtiens bien le numéro de ma dernière ligne). A moins qu'il faut compter le nombre...

Re : Connaître N° 1ère ligne d'une plage de cellules wilfried, J'obtiens également le même résultat No_ligne = 1. @+ Jean

Re : Connaître N° 1ère ligne d'une plage de cellules Salut Pierro, cette formule ne répond pas à mon pb car elle me renvoie à la valeur x=1. Or je voudrai connaître le numéro de la première ligne d'une plage de cellule obtenue après un filtrage automatique.... @+ Jean

Salut le forum,;) Quelqu'un connaîtrait-il l'équivalant de : lastrow = Range("A5").CurrentRegion.End(xlDown).Row (donnant le numéro de la dernière ligne d'une plage de cellules), pour obtenir le numéro de la première ligne???? Merci d'avance, Jeanvaljean

Re : Fonction Range().select Bon, ça y est avec votre aide j'ai pu déterminer la solution ::) Windows("TOTO.xlsm").Activate lastrow = Range("A5").CurrentRegion.End(xlDown).Row Range("A5:D" & lastrow & ", F5:F" & lastrow & ",H5:H" & lastrow & ",J5:J" & lastrow & ",L5:L" & lastrow &...

Re : Fonction Range().select Salut CORIOLAN, le programme s'arrête sur : lastrow = Rows(Selection)....:confused: Jeanvaljean

Salut le forum, :) Nouveau point de blocage : je souhaites copier une plage de cellules non contiguës d'une feuille TOTO dans une autre feuille TITI, et seule la plage A5:D5 est copiée!!! Windows("TOTO.xlsm").Activate Range("A5:D5,F5,H5,J5,L5").Select Range(Selection...

Re : Bog sur la fonction : range().select Ok dac, je vous fais parvenir ça dès demain, car je n'ai pas le fichier à dispo ce soir... Merci pour votre aide, et bonne soirée Jean

Re : Bog sur la fonction : range().select Salut à tous, je vous ai donné la ligne N°28 comme exemple, mais celle-ci peut-être complètement aléatoire, car avant ce bout de programme j'ai une fonction de filtre suivant un critère... et dans certains cas, après ce filtre il peut ressortir...

Re : Bog sur la fonction : range().select Merci pour vos réponses!!! Je pense que je me suis mal exprimé : en fait lorsque la fonction range().select doit sélectionner une ligne de départ (ex:A28) correspondant au code VBA : Range(Selection).select et une ligne d'arrivée identique (ex:A28)...

Salut à tous, Je viens de me rendre compte d'un bog sur un bout de programme, qui apparait lorsque Range(Selection, Selection.End(xlDown)).Select selectionne une seule ligne:confused:Erruer 1004 Windows("toto.xlsm").Activate Range("A5:D5").Select Range(Selection...

Re : Trier une plage de données Merci Banzai64, Ca marche!!!! Bonne semaine Jean