Trouver La Derniere Cellule D'une Colonne

[MERLIN]

Bonjour à tous !!!!

Je suis de RETOUR sur le forum pour une petite broutille laquelle je pense ne devrait pas poser problème à plus d'un.

Voilà. en vba je souhaiterais trouver la dernière cellule avec une valeur dans une colonne (Ex. colonne E). Puis prendre sa valeur lui ajouter 1 et la placer dans la cellule juste au dessous.

Merci pour vos réponses.
Bonne soirée !!
MERLIN

 

[Robert]

Re : Trouver La Derniere Cellule D'une Colonne

Bonsoir Merlin (enchanté), bonsoir le forum,

Essaie comme ça :

Sub Macro1()
Dim der As Range 'déclare la variable der
Set der = Range("E65536").End(xlUp) 'définit la variable der
der.Offset(1, 0).Value = der.Value + 1 'inscrit la valeur
End Sub

 

[MERLIN]

Re : Trouver La Derniere Cellule D'une Colonne

MERCI Robert !
Ca marche au poil !

MERLIN