Диапазон VBA от String
Это немного глупо, но я застрял на некоторое время в этом простом утверждении:
<code> Dim range1 as Range Dim mysheet as String Dim myrange as String mysheet = "Sheet1" range = "A1:A10" range1 = Worksheets(mysheet).Range(myrange) </code>
Я тестирую все решения, которые я нашел в Интернете, например,этот, этот а такжеэтот, но ничего.
Все время он выдает мне ошибки: 1004 "Ошибка, определенная приложением" или "объектная переменная или не установлена".
Я пробовал следующее:
<code>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) </code>
а также
<code>with This/ActiveWorkbook range1 = .Worksheets(mysheet).Range(myrange) end with </code>
Никто не работал.
Это действительно глупая вещь, но я застрял на некоторое время: s
Может кто-нибудь мне помочь?
Действительно спасибо заранее.
С наилучшими пожеланиями,