Spisie treści
Ten samouczek pokaże, jak uzyskać adres komórki.
Uzyskaj adres zakresu
Spowoduje to wyświetlenie adresu komórki za pomocą obiektu Range:
1 | Zakres MsgBox("A1").Adres |
Uzyskaj adres komórek
Spowoduje to wyświetlenie adresu komórki za pomocą obiektu Cells:
1 | MsgBox Cells(1,1).Adres |
Adres ActiveCell
Aby uzyskać adres ActiveCell, użyj tego kodu:
1 | MsgBox ActiveCell.Address |
Ustaw zmienną na adres komórki
Możesz również przypisać adres komórki do zmiennej łańcuchowej, aby ułatwić jej użycie w kodzie:
1234 | Dim strAdresstrAddress = Zakres("A1").AdresMsgBox strAddress |
Uzyskaj numer wiersza z adresu komórki
Ten kod wyodrębni numer wiersza z adresu:
1234567891011 | Sub GetRowNumber From CellAddress()Dim strAddress As StringDim rownum As LongstrAddress = Zakres("A1:a10").Adresrownum = Range(strAddress).RowNumer wiersza MsgBoxNapis końcowy |
Jednak zazwyczaj możesz użyć znacznie prostszego kodu:
1 | MsgBox Range("A1").Wiersz |