Derniere ligne du talbeau

vidou · 19 Juin 2011

BOnjour,

J'ai repris ce code pour selectionner la dernier ligne non vide d'un tableau
Ce code selectionne toute la ligne et je voudrais qu'il selectionne toujours la derniere ligne mais uniquement avec les colonnes avec des données

Exemple si donneés ligne 14 de A a F, il selectionne A14 : F14

La derniere ligne et la derniere colonne etant variable

Code:

Sub selection()

Dim L  As Long

    L = Range("a65436").End(xlUp).Row
    Rows(L).Select

End Sub

Vous remerciant par avance

Cordialement

pierrejean · 19 Juin 2011

Re : Derniere ligne du talbeau

Bonjour vidou

A tester:

Code:

Sub selection()
Dim L  As Long
Dim C As Long
    L = Range("A65436").End(xlUp).Row
    C = Cells(L, 256).End(xlToLeft).Column
    Range(Cells(L, 1), Cells(L, C)).Select
End Sub

vidou · 19 Juin 2011

Merci pierre jean, c'est excatement ce qu'il me fallait

VBA c'est un vrai plaisir

Bon dimanche

Staple1600 · 19 Juin 2011

Re : Derniere ligne du talbeau

Bonjour vidou, pierrejean

Une autre façon

Code:

Sub a()
Range("A65536").End(xlUp).SpecialCells(2).Select
End Sub

hamcec · 19 Juin 2011

Re : Derniere ligne du talbeau

Bonsoir,

Nouvelle option possible :

VB:

Sub P_Selection()
Range(Cells(1, 1), Cells(Cells(1, 1).CurrentRegion.Rows.Count, 1)).Select
End Sub

Cdt, Hamcec.

Derniere ligne du talbeau

vidou

XLDnaute Junior

pierrejean

XLDnaute Barbatruc

vidou

XLDnaute Junior

Staple1600

XLDnaute Barbatruc

hamcec

XLDnaute Nouveau

Discussions similaires