Przeszukałem tę stronę i wydaje się, że wszystkie odpowiedzi wskazują na znalezienie numeru wiersza komórki.

Próbuję ustawić zakres tak, aby odszedłA1 na końcu danych wA kolumna. Ten arkusz kalkulacyjny będzie aktualizowany co tydzień, więc co tydzień będą dodawane do niego dane.

Zastanawiałem się, jaki kod zadziała, abym mógł znaleźć numer wiersza i jakoś powiązać go z kodem zasięgu, aby był równy"A" + lastrownumber? LUB jeśli istnieje kod, który będzie podawał razem kolumnę i numer wiersza? Jeśli przegapiłem link do poprawnej odpowiedzi, zrobi to również prosty link i przepraszam za post i twój czas.

Oto mój kod:

Sub NamedRange()

Dim Rng1 As Range
Dim newDate As Integer
Dim NumberOfRows As Range


Dim MyRange As Range
Dim lastRow2 As Range


lastRow2 = Range("A65536").End(xlUp).Row
'lastRow2 = LastRow

Set Rng1 = Sheets("Sheet1").Range(lastRow2)
ActiveWorkbook.Names.Add Name:="MyRange", RefersTo:=Rng1


Dim date1 As String
Dim dat As Date
Dim newPrice As Double


Set RgSales = Range("MyRange")