Vba: jak uzyskać numer wiersza z zakresu

Aby uzyskać numer wiersza z zakresu w programie Excel przy użyciu języka VBA, możesz użyć następujących metod:

Metoda 1: Uzyskaj numer wiersza z określonego zakresu

 SubGetRowNumber ()

rowNum = Range(" D7 ").Row
MsgBox rowNum

End Sub

To konkretne makro wyświetli okno komunikatu z numerem wiersza odpowiadającym komórce D7 , czyli 7 .

Metoda 2: Uzyskaj numer wiersza aktualnie wybranego zakresu

 SubGetRowNumber ()

rowNum = Selection.Row
MsgBox rowNum

End Sub

To konkretne makro wyświetli okno komunikatu z numerem wiersza odpowiadającym aktualnie wybranemu zakresowi w programie Excel.

Na przykład, jeśli po uruchomieniu tego makra zostanie wybrana komórka B3 , pojawi się okno komunikatu z wartością 3 .

Poniższe przykłady pokazują, jak zastosować każdą metodę w praktyce.

Przykład 1: Uzyskaj numer wiersza z określonego zakresu

Załóżmy, że chcemy uzyskać numer wiersza dla odwołania do komórki D7 .

W tym celu możemy utworzyć następujące makro:

 SubGetRowNumber ()

rowNum = Range(" D7 ").Row
MsgBox rowNum

End Sub

Kiedy uruchomimy to makro, otrzymamy następujące dane wyjściowe:

W oknie komunikatu zostanie wyświetlona wartość 7 , która odpowiada numerowi wiersza odwołania do komórki D7 .

Przykład 2: Uzyskaj numer wiersza aktualnie wybranego zakresu

Załóżmy, że chcemy uzyskać numer wiersza aktualnie aktywnej komórki.

W tym celu możemy utworzyć następujące makro:

 SubGetRowNumber ()

rowNum = Selection.Row
MsgBox rowNum

End Sub

Załóżmy, że komórka B3 jest aktualnie wybrana.

Kiedy uruchomimy to makro, otrzymamy następujące dane wyjściowe:

W oknie komunikatu wyświetlana jest wartość 3 , która odpowiada numerowi wiersza aktualnie aktywnej komórki B3 .

Dodatkowe zasoby

Poniższe samouczki wyjaśniają, jak wykonywać inne typowe zadania w VBA:

VBA: Jak policzyć liczbę wierszy w zakresie
VBA: Jak skopiować widoczne linie na inny arkusz
VBA: Jak wyróżnić linie