Первый пост здесь, поэтому извиняюсь, если я ошибаюсь, я в лучшем случае энтузиаст-любитель.
Я пытаюсь автоматически создать массив из списка имен листов, а затем выбрать эти листы, чтобы позволить мне печатать в PDF.
В основном, пытаясь автоматически воспроизвести следующий код без необходимости заходить в VBA для каждого нового созданного листа.
Sheets(Array("Jobs", "5125", "5225", "5228", "5230", "5232", "5234", "5245", "5249", "5251")).Select
Одна из моих многочисленных попыток создать этот массив:
Dim strarry() As String
Dim qtyrows As Long
Dim i As Long
qtyrows = ThisWorkbook.Sheets("Variables").Cells(Rows.Count, 3).End(xlUp).Row
ReDim strarry(1 To qtyrows)
For i = 1 To qtyrows
strarry(i) = ThisWorkbook.Sheets("Variables").Cells(i, 3).Value
Next i
Sheets(strarry(i)).Select
Я пробовал различные методы для создания массива, но, похоже, кавычка вокруг каждого отдельного имени листа.