Макрос Excel Игнорирование шага для изменения размера столбца A и G

Question

Я перепробовал все, что мог придумать, чтобы сделать эту работу, я поместил его в несколько разделов макроса безрезультатно ...

 For Each Current In Worksheets
Columns("A:A").ColumnWidth = 9.29
Columns("G:G").ColumnWidth = 13.75
ActiveSheet.Next.Select
Next

Answer 1

Добавьте рабочий лист к диапазону, или он будет использовать только активный лист:

 For Each Current In Worksheets

    Current.Columns("A:A").ColumnWidth = 9.29
    Current.Columns("G:G").ColumnWidth = 13.75

Next