Recherche de la dernière cellule renseignée à droite

  • Initiateur de la discussion Initiateur de la discussion Hugues
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Hugues

XLDnaute Impliqué
Bonjour Le Forum,

Je souhaiterais connaitre le code afin de positionner le curseur sur la dernière cellule renseignée à droite de la ligne 6.

A ce jour, je n'ai trouvé que le code me permettant d'activer la colonne mais pas uniquement la cellule.

Private Sub Worksheet_Activate()
'recherche de la dernière colonne renseignée
dercolonne = Range("HK6").End(xlToLeft).Column
'MsgBox (dercolonne)
Columns(dercolonne + 1).Select
End Sub

Merci par avance pour votre aide,

Hugues
 
Re : Recherche de la dernière cellule renseignée à droite

Re
Code:
[COLOR=blue]Sub[/COLOR] test2()
[COLOR=green]'recherche de la dernière colonne renseignée[/COLOR]
dercolonne = Range("HK6").End(xlToLeft).Column
[COLOR=green]'MsgBox (dercolonne)[/COLOR]
Cells(6, dercolonne + 1).Select
[COLOR=blue]End Sub[/COLOR]
Que l'on peut réduire à
Code:
[COLOR=blue]Sub[/COLOR] test2()
Cells(6, Range("HK6").End(xlToLeft).Column + 1).Select
[COLOR=blue]End Sub[/COLOR]
Cordialement
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
7
Affichages
168
Retour