Zakres VBA z String
To trochę głupie, ale utknąłem na chwilę w tym prostym stwierdzeniu:
Dim range1 as Range
Dim mysheet as String
Dim myrange as String
mysheet = "Sheet1"
range = "A1:A10"
range1 = Worksheets(mysheet).Range(myrange)
Na przykład testowałem wszystkie rozwiązania, które znalazłem w Internecieto, to ito, ale nic.
Przez cały czas pojawiają się błędy: 1004 „Błąd zdefiniowany przez aplikację” lub „zmienna obiektowa lub bez ustawienia”.
Próbowałem:
range1 = ThisWorkbook.Worksheets(mysheet).Range(myrange)
range1 = ActiveWorkbook.Worksheets(mysheet).Range(myrange)
range1 = Sheets(mysheet).Range(myrange) (and the combinations above)
range1 = Worksheets(mysheet).Range(Cells(1,1), Cells(1,10)) (and the combinations with This/Active workbook)
i
with This/ActiveWorkbook
range1 = .Worksheets(mysheet).Range(myrange)
end with
Nikt nie pracował.
To NAPRAWDĘ głupia rzecz, ale utknąłem na chwilę
Czy ktoś może mi pomóc?
Naprawdę z góry dzięki.
Z poważaniem,