Почему я не могу инициализировать переменную объекта Worksheets в коллекцию Worksheets?

Question

Я понимаю, что это хорошая привычка кодирования - использовать переменные объекта.Я пытаюсь создать объектную переменную с именем wsc, которая будет инициализирована ссылкой на объект в коллекции рабочих листов активной книги.См. Приведенный ниже код.

Я попытался установить тип данных объектной переменной как «Рабочий лист», но он НЕ работал.Это работает только тогда, когда я устанавливаю тип данных переменной объекта в Object.Это заставляет меня спросить - есть ли тип данных, отличный от Object, который будет работать в этом случае?

Sub FormatAllFormulas()

    Dim ws As Worksheet
    Dim wsc As Object   ' does not work if type is Worksheets - why?

    Set wsc = ActiveWorkbook.Worksheets

    For Each ws In wsc
        With ws.Cells.SpecialCells(xlCellTypeFormulas)
            .Style = "Currency"
            .Font.Bold = True
            .Interior.Color = 4908260
        End With
    Next ws

End Sub

Answer 1

ActiveWorkbook.Worksheets возвращает Sheets, а не Worksheets, поэтому этот тип следует использовать.