Como o número da linha inicial e final de um intervalo é obtido?

Question

Dado um intervalo selecionado pelo usuário, qual é a maneira mais simples de determinar o número da linha inicial e o número da linha final?

Range.Address retorna uma string contendo qualquer número de formatos possíveis. Tem que haver algo mais simples.

Desejado:

Dim oRange As Range
Dim startRow As Integer
Dim endRow As Integer

oRange = Range("A1:X50")
startRow = oRange.Address.StartRow
endRow = oRange.Address.EndRow

é claro, essas propriedades não existem. Eu quero fazer o mesmo para retornar as letras das colunas.

    

Answer 1

que tal:

Dim oRange As Range
Dim startRow As Integer
Dim endRow As Integer

With Selection
    startRow = .Rows(1).Row
    endRow = .Rows(Selection.Rows.Count).Row
End With