comment ecrire Range avec xlDonw ?

Bonjours,
je voudrais sélectionner la deuxième ligne de mon colonne jusqu’à la dernière ligne, mais je ne sais comment faire avec Range et xlDonw ,vu que la dernier ligne n'est pas fixe donc j'ai utilisé .End(xlDown) , mais je ne sais pas comment faire la sélection maintenant entre les deux.
Merci d'avance pour votre aide :) .

Code:

---

1 2 3 4 5

For col = 1 To 4 If (ComboBox_Respb.Value = Worksheets(sheetName).Cells(1, col).Value) Then Worksheets(sheetName).Activate Worksheets(sheetName).Cells(1, col).End(xlDown).Select Range(col+"23, ActiveCell.End(xlDown)).Select

---

Bonjour !

La propriété End renvoyant déjà un Range …

Sinon dans la "logique" de transformer un Range en numéro de colonne (pour le retransformer en Range ‼ :roll:)

ce serait bien alors de lui adjoindre la propriété Column, non ? …

_________________________________________________________________________________________________________
Je suis Paris, Charlie, Bruxelles, …

je n'ai pas compris ce que vous voulez dire !

En fait le End tel quel serait bon, c'est ton premier argument de Range qui ne veut rien dire !

Range(Cells(2, Activecell.Column), Activecell.End(xlDown)).Select …

A noter : un bon code n'a pas besoin de Select !

_________________________________________________________________________________________________________

Merci de cliquer sur :plusser: pour chaque message ayant aidé puis sur :resolu: pour clore cette discussion …

D'accord merci, mais parce-que j'ai juste testé pour savoir si ça peut fonctionner ou pas, mais finalement les deux fonctionnent pas :(.

comment je peux lire ce qui est dans le xldonw ?

C'est à dire ? En clair, sans décodeur ?! Sinon c'est

http://smileys.sur-la-toile.com/repo...yante-2943.gif !

Quel est le but recherché ? La présentation initiale n'étant pas claire et incomplète …

Sinon ce n'est vraiment pas compliqué !
Une plage a juste besoin d'une cellule de début et d'une cellule de fin comme expliqué dans l'aide VBA de Range, à consulter …
Là je n'ai plus le temps mais si tu ne t'en sors pas, après une présentation digne de ce nom (claire & exhaustive), de l'aide tu auras.

bah en fait en gros je voudrais faire une boucle for qui cherche de A1 jusqu’à D1 un Nom qui j'ai demandé au depart et s'il le trouve il va sélectionner tout les informations au dessous de ce Nom jusqu’à la dernier ligne remplie. du la boucle il fonction et j'arrive a trouvé le Nom mais le problème j'arrive pas a sélectionner les information.

Ah maintenant ce n'est plus depuis la ligne n°2 mais en dessous du nom !

Change le premier argument du Range en utilisant la propriété Offset pour descendre d'une ligne depuis la cellule active …

c'est a partir de la ligne 2 ou il va commencer a sélectionner jusqu’à la dernier ligne remplie

Exemple : si je lui demande le Nom "Clave" il va dans la ligne 1 on il va trouver le Nom "Clave" puis il va commencer a selectionner de la ligne 2 jusqu’à la ligne 9.

Bonjour,

Code:

---

1 2 3 4 5 6

dim lettrecol as string For col = 1 To 4 If (ComboBox_Respb.Value = Worksheets(sheetName).Cells(1, col).Value) Then Worksheets(sheetName).Activate lettrecol = Split(Cells(1, col).Address, "$")(1) Range(lettrecol & "2:" & lettrecol & Range(lettrecol & Rows.Count).End(xlUp).Row).Select

---

Bonne journée !

Merci pour votre aide, mais toujours pas :(

Ca t'affiche un message d'erreur? Ca fait quelque chose?

Erreur d'exécution '1004' : Erreur définie par l'application ou par l'objet

Tu as la ligne où se trouve l'erreur?
Les lignes que j'ai rajouté fonctionnent en local.

sur les ligne que vous m'avez donné.
oui même moi je travail en local

en local --> dans une macro perso :D
Faites un

Code:

---

msgbox lettrecol

---

après la ligne 5.
Sinon l'erreur se trouve sur la ligne 1, 5 ou 6?

en faite il m'affiche rien et l’erreur se trouve sur la ligne 6

Quand tu dis qu'il ne t'affiche rien, il t'affiche la boite de dialogue sans rien dedans ou juste rien?

il m'affiche juste rien, je m'affiche directement le message d'erreur.

A quoi correspond la variable sheetName?
Quelle est sa valeur?