Sélection range

[Famu]

Re-bonjour,

Dans une colonne, comment arriver à sélectionner (en VBA) la cellule vide qui se trouve juste après la dernière valeur ?

731
585
9266
135
28
28
Cellule vide

Merci,
Famu.

 

[pat1545.]

Salut,

Last = Range('L65000').End(xlUp).Row +1
te donne le n° de la ligne de cette colonne L qui est libre (en partant du bas, ce qui est plus logique)
c une des façons de l'écrire...
Patrick

 

[porcinet82]

Salut Famu,

Je ne t'apporte qu'un élément de réponse car je n'ai pas Excel sous la main et je ne peux donc pas tester (je ne connais pas ce code par coeur, vla la honte

Donc ce que je te propose, c'est que lorsque tu ne sais pas et que la question est assez simple, tu peux utiliser l'enregistreur de macro et aller voir le code. Dans ton cas, il te suffit de te placer sur ta première cellule pleine et de faire Ctrl+bas.

@+

Edition : Salut Patrick, j'aurais pu proposer ce code qui donne le numero de ligne, mais notre ami veux sélectionner la cellule et non connaitre ses coordonnées

Message édité par: porcinet82, à: 23/03/2006 17:18

 

[Famu]

J'ai utilisé l'enregistreur Macro et fait CTRL+Bas mais j'arrive à la dernière cellule complétée et non celle qui est vide, juste après.

Famu.

 

[albert]

bonjour porcinet82,pat1545,Famu,
à mon tour,je propose

Sub Macro1()

Cells(1, 1).End(xlDown).Offset(1, 0).Select

End Sub


albert

 

[porcinet82]

re,

A ouai bien vue l'aveugle comme pourrait dire l'ami Robert .
Il te suffit de modifier la fin du code en rajoutant un .offset(1,0).select et ca devrait le faire.

@+

 

[Famu]

TROUVE...grâce à VOUS

Range('D5').Select
Range(Selection, Selection.End(xlDown)).Select
Selection.End(xlDown).Offset(1, 0).Select

Bonne soirée et encore merci,

Salut,
Famu.

 

[pat1545.]

Salut

Range('A65000').End(xlUp)(2).Select
fonctionne aussi


Patrick

 

[porcinet82]

Bonjour a tous,

Alors la pat1545, je garde ton code sous le coude, je n'avais jamais vu cette expression, mais ca ma l'air plutot pratique.

@+