sélection plage cellules dernière ligne

A

Abel

XLDnaute Accro

• 24 Février 2006

• #2

Bonjour Fifi_Bricotin,

Essaie avec :
DerLigne = range ('a65536').end(xlup).row
range ('a' & DerLigne & ':g' & DerLigne).clearcontents

Cet exemple est basé sur le fait que c'est en colonne 'A' que l'on trouve la ligne la plus 'basse' du tableau. Sinon, il suffit d'adapter.

En espérant que cela te dépanne.

Abel.

 

Vote positif 0 Vote négatif

JC de Lorient

XLDnaute Impliqué

• 24 Février 2006

• #3

salut
dernière ligne de valeur
sub fin_classeur()
dim dernligne as Integer
dernligne = range('A65536').end(xlup).row

'pour sélectionner cette dernière ligne (A à G)
range('A' & dernligne & ':' & 'G' & dernligne).select
end sub

JC

 

Vote positif 0 Vote négatif

F

Fifi Bricotin

Guest

• 24 Février 2006

• #4

Bonjour Abel, et JC de Lorient,

Vos deux réponses me comblent !
Je vous remercie et vous souhaite une bonne journée.

Fifi

 

Vote positif 0 Vote négatif

myDearFriend!

XLDnaute Barbatruc

• 24 Février 2006

• #5

Bonjour Fifi_Bricotin, Abel, JC de Lorient,

Heu... si je puis me permettre... si l'objectif est d'effacer toutes les données des colonnes A à G jusqu'à la dernière ligne de données, il n'est peut être pas très utile de mettre une ligne de code pour déterminer cette dernière ligne...

Et si on faisait simplement ?

      Columns('A:G').ClearContents

Cliquez pour agrandir...

Ca revient pas au même ?


Cordialement,

 

Vote positif 0 Vote négatif

A

Abel

XLDnaute Accro

• 24 Février 2006

• #6

Re,

Hi hi ! Bonjour Didier.

Ca dépend si on veut effacer entièrement le contenu des colonnes ou juste la dernière ligne. Non ?

ps : fifi, dans mon exemple, la variable n'est là que pour simplifier la lecture.

Abel.

 

Vote positif 0 Vote négatif