Ajouter texte en derniere ligne

[Francois73]

Bonjour

j'aiencore besoin de votre aide, j'ai un classeur comportant plusieurs macro, de calcul, mise en forme suppression de doublon etc, je souhaite qu'une fois toutes les macro executer excel soit capable de repérer la dernière ligne colonne A, comportant des données et que sur la suivant donc la premiere cellule colonne A vide , il inscrive un texte qui sera toujours identique "fin" par exemple

merci

 

[Dull]

Re : Ajouter texte en derniere ligne

Salut Francois73, le Forum

Peut-être comme cela

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

 

[Francois73]

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

 

[Dull]

Re : Ajouter texte en derniere ligne

Re,

Dim DerLig As Long

Déclare la variable DerLig en Long

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

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

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

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

Bonne Journée

 

[Francois73]

Re : Ajouter texte en derniere ligne

merci pour les explications
bonne journée a toi