Comment utiliser VBA pour accéder à la dernière ligne d'une feuille Excel

L'un des grands avantages de Microsoft Excel est la possibilité d'automatiser des fonctions utiles. Lorsqu'une feuille de calcul d'entreprise contient des centaines, voire des milliers de lignes, vous pouvez avoir du mal à vous déplacer dans ses cellules. Éliminez ce problème en créant votre propre fonction de recherche. En utilisant quelques lignes de code, vous pouvez créer un sous-VBA qui trouve la dernière ligne d'une feuille de calcul et y accède automatiquement.

1

Lancez Excel et ouvrez une feuille de calcul contenant plusieurs colonnes.

2

Appuyez sur "Alt-F11" pour ouvrir l'éditeur "Visual Basic" et cliquez sur "Insérer | Module." VBA ajoute un nouveau module à la fenêtre Projet.

3

Collez le code suivant dans la fenêtre d'édition qui apparaît à droite de la fenêtre Projet:

Sub SelectLastRow() Dim finalRow As Integer

finalRow = ActiveSheet.UsedRange.Rows.Count

Si finalRow = 0 Alors finalRow = 1 Fin si

Rows (finalRow) .Sélectionnez End Sub

Ce Sub détermine la dernière ligne de la feuille de calcul en examinant la propriété Count de la collection de lignes. Le Sub stocke ensuite cette valeur dans la variable finalRow. L'instruction finale du Sub transmet la valeur de finalRow à la méthode VBA Select.

4

Appuyez sur «F5» pour exécuter le Sub. La méthode Select recherche la dernière ligne de la feuille de calcul, accède à cette ligne et la met en surbrillance.

Messages récents