Sélectionnez une colonne entière moins la ligne d'en-tête dans une macro Excel

Comment puis-je accéder à une plage qui correspond à une colonne entière commençant à la ligne 2 (il y a une ligne d'en-tête)?

La fin de la sélection doit être la dernière cellule non vide de la colonne.

Voir l'article de support Microsoft Comment sélectionner des cellules / plages à l'aide des procédures Visual Basic dans Excel , n ° 19 ( Comment sélectionner une plage entière de cellules contiguës dans une colonne ).

Essaye ça:

Range(Range("A2"),Range("A2").End(xldown)).Select

ou ca:

Range(Range(Cells(2, 1), Cells(2, 1)), Range(Cells(65535, 1), Cells(65535, 1)).End(xlUp)).Select

En se référant à cette réponse SO , la seule méthode sûre est la .find()méthode.
Toutes les autres méthodes peuvent donner des résultats erronés si vous avez précédemment supprimé certaines cellules.

Exemple pour obtenir les dernières cellules

Lastrow =  Cells.Find("*", [A1], , , xlByRows, xlPrevious).Row
Lastcol =  Cells.Find("*", [A1], , , xlByColumns, xlPrevious).Column

Et une réponse spécifique à votre question (en supposant que vos données se trouvent dans la colonne 2, en commençant à la ligne 2)

Range([B2], [B:B].Find("*", [B1], , , xlByRows, xlPrevious)).select

Vous pouvez utiliser les raccourcis clavier d'Excel. Essayez Ctrl+ Home.

Cela vous amènerait à la cellule A1 (si vous n'avez pas utilisé le volet d'arrêt). Descendez d'une cellule puis utilisez les boutons Ctrl+ Shift+ Down arrowpour sélectionner jusqu'à la dernière ligne entrée.

Si vous devez sélectionner la valeur de la colonne, utilisez le right arrowbouton au lieu du down arrowbouton.

Ce morceau de code fait la moyenne de tout sauf l'en-tête avec l'en-tête dans la cellule "B1"

Dim GG as Long
GG = Application.WorksheetFunction.Average(ActiveSheet.Range("B2", Range("B2").End(xlDown)))