no save
Assistance
Achat
News

Forum | Bureautique
Excel : Détection dernière ligne d'un tableau
alainjjb, le jeu. 26 juin 2008 à 21:54:49
Bonjour,
je viens de créer (vite dit car c'est un de vous qui me l'avez transmis) une macro d'insertion de ligne en fin de tableau Excel (2 méthodes qui réagissent de la même manière) :
1°) Sub insert1_ligne()
DerniereLigne = (Range("A1").SpecialCells(xlCellTypeLastCell).Row)
ligne = DerniereLigne - 1
Rows(ligne).Select
Selection.Insert Shift:=xlDown
2°) Sub insert2_ligne()
Dim ligne As Long
ligne = (Cells.SpecialCells(xlCellTypeLastCell).Row) - 1
Rows(ligne).Select
Selection.Insert Shift:=xlDown

Au début tout se passe à merveille. La ligne es insérée correctement. Mais lorsque je supprime des lignes du tableau, la dernière ligne est détectée comme si les lignes supprimées existaient tjs.

Quelqu'un peut-il me dire ce qui peut bien se passer ?

Merci d'avance

AlainConfiguration: Windows XP
Firefox 2.0.0.14


m@rina
juin 08
Suivant
REPONSES
m@rina
juin 08
alainjjb
juin 08
m@rina
juin 08
alainjjb
juin 08
yannou1456
mar. 01
m@rina
mar. 01
Version Web
Réalisé par RedShift
no save