Ajouter texte en derniere ligne

Dull

XLDnaute Barbatruc

• 21 Mai 2013

• #2

Re : Ajouter texte en derniere ligne

Salut Francois73, le Forum

Peut-être comme cela

Code:

Sub EssAi()
Dim DerLig As Long
DerLig = Range("A" & Rows.Count).End(xlUp).Row
'ICI Ton Code de Mise en forme, de suppression de doublons...
Range("A" & DerLig + 1).Value = "FIN"
End Sub

Bonne Journée

 

Vote positif 0 Vote négatif

F

Francois73

XLDnaute Occasionnel

• 21 Mai 2013

• #3

Re : Ajouter texte en derniere ligne

merci beaucoup , c'est exactement ce que je voulais, peux tu m'éclairer sur ce que veux dire derling
merci

 

Vote positif 0 Vote négatif

Dull

XLDnaute Barbatruc

• 21 Mai 2013

• #4

Re : Ajouter texte en derniere ligne

Re,

Dim DerLig As Long

Cliquez pour agrandir...

Déclare la variable DerLig en Long

DerLig = Range("A" & Rows.Count).End(xlUp).Row

Cliquez pour agrandir...

Derlig est égale à la dernière cellule renseignée de la colonne A

Range("A" & DerLig + 1).Value = "FIN"

Cliquez pour agrandir...

Ecrit le mot FIN à la dernière cellule + 1 de la colonne A

Bonne Journée

 

Vote positif 0 Vote négatif

F

Francois73

XLDnaute Occasionnel

• 21 Mai 2013

• #5

Re : Ajouter texte en derniere ligne

merci pour les explications
bonne journée a toi

 

Vote positif 0 Vote négatif