Прокрутка объектов Chart в книге Excel

Я видел много кода, который прорисовывается в отдельном листе, но я пытаюсь прокрутить диаграммы, которые являются отдельными листами в книге. Мой код выглядит следующим образом (как вы видите, я просто пытаюсь сохранить диаграммы в формате PDF):

Sub ExportAllCharts() Dim Current As Worksheet ' Loop through all of the worksheets in the active workbook. For Each Current In Worksheets If TypeName(Current) = "Chart" Then objCht.ExportAsFixedFormat xlTypePDF, Filename:= _ "c:/" & Current.Name, Quality:=xlQualityStandard, _ IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False End If Next End Sub 

К сожалению, когда код проходит все листы в книге, по какой-то причине он пропускает диаграммы. Есть ли эквивалент Worksheets которые применяются к отдельным диаграммам в Excel? Или может быть другой способ сделать это, о котором я не думал?

Благодаря! Дэвид

Я только что попробовал быстрый тест с этим кодом, и он напечатал листы Chart :

 Public Sub test() Dim oChart As Chart For Each oChart In ActiveWorkbook.Charts Debug.Print oChart.Name Next End Sub 

Это должно делать то, что вам нужно. FYI хорошее место для начала – это браузер объектов VBA, View -> Object Browser или F11 в редакторе Excel Visual Basic.

Надеюсь, это поможет.

  • Excel создает диаграмму из нескольких книг с фильтром между датами
  • Форматирование ярлыков данных диаграммы с помощью VBA
  • Excel VBA - макрос для «Формирование рядов данных - ширина пробела» в диаграмме?
  • Как проверить, есть ли таблица на листе excel
  • VBA - сохранить исходное форматирование при вставке диаграмм из Excel в PowerPoint
  • Установите массив в Chart.SeriesCollection (). Значения
  • Как фильтровать сводную диаграмму, когда комбинации значений равны нулю
  • Добавление разбросанных данных в круговую диаграмму через проблему VBA
  • Создание диаграммы Excel с помощью VBA - неправильный результат
  • Как организовать диаграммы на листе Excel с помощью VBA?
  • Как я могу использовать часть заданного диапазона в vba (excel), то есть определенные строки в диапазоне
  • Interesting Posts

    Значение и вариант типа «# N / A»?

    Почему файл Excel поврежден?

    С помощью Excel-DNA, как можно отличить неопределенный аргумент в вызове функции надстройки Excel от отсутствующего?

    Подсчитайте определенное значение, не считая повторяющихся дат

    Сохранение веб-страницы в формате PDF в определенном каталоге

    Excel изменить имя строки на имя столбца и наоборот

    Ошибка (эта таблица содержит ячейки, которые находятся за пределами ячеек, определенных в этой таблице) при чтении данных Excel с использованием OleDb в C #

    Добавить точки в текстовую строку, используя форматирование пользовательских ячеек – Microsoft Excel

    Как отладить плагин XLL Excel с выпущенной сторонней библиотекой?

    Закройте документ, который уже открыт

    Перенос данных на лист с использованием VBA

    Ошибка «Невозможно вставить объект» при добавлении элемента управления ActiveX, такого как Microsoft DataGrid на лист Excel

    Пределы памяти подпрограмм в VBA

    Excel: проверьте частичные совпадения столбца с отдельной ячейкой

    Разбор проблемы в функции COUNT формулы в xlwt

    Давайте будем гением компьютера.