Как вывести все свойства файла Excel на лист?
В этой статье я представляю код VBA для вывода всех свойств активной книги на лист.
1. Нажмите клавиши Alt + F11, чтобы открыть окно Microsoft Visual Basic for Applications.
2. Нажмите Вставить > Модуль и вставьте приведенный ниже код в пустой модуль.
VBA: Вывести все свойства
Sub WBProperties()
'UpdatebyKutools20191031
Dim xWB As Workbook
Dim xF As Long
Dim xStr As String
Dim xWSh As Worksheet
On Error Resume Next
Application.DisplayAlerts = False
xStr = "Workbook Properties"
Set xWB = Application.ActiveWorkbook
Set xWSh = xWB.Worksheets.Item(xStr)
If Not xWSh Is Nothing Then
xWSh.Delete
End If
Set xWSh = xWB.Worksheets.Add
xWSh.Name = xStr
xWSh.Range("A1").Value = "Property"
xWSh.Range("B1").Value = "Value"
With xWB
For xF = 1 To .BuiltinDocumentProperties.Count
xWSh.Range("A65536").End(xlUp).Offset(1, 0).Value = _
.BuiltinDocumentProperties.Item(xF).Name
xWSh.Range("A65536").End(xlUp).Offset(0, 1).Value = _
.BuiltinDocumentProperties.Item(xF).Value
Next xF
End With
Application.DisplayAlerts = True
End Sub
3. Нажмите F5 для запуска кода. Будет создан новый лист с названием Workbook Properties перед активным листом, который содержит все свойства активной книги.
Отключение надстроек при запуске Excel
Возможно, вы установили несколько надстроек в ваш Microsoft Excel, но теперь вам нужно отключить определенную надстройку при запуске Excel. Как решить эту проблему? Метод, описанный в этой статье, может помочь вам.
Экспорт и сохранение каждого листа как отдельной новой книги в Excel
Предположим, вы хотите экспортировать и сохранить один или несколько листов как новую книгу, как вы будете это делать? Обычно вы можете копировать каждый лист и вставлять его в новую книгу. Но здесь мы предлагаем вам несколько удобных приемов для решения этой задачи:
Код VBA для вывода всех надстроек в Excel
В Excel вы можете добавить или вставить некоторые надстройки для лучшей обработки данных. Мы знаем, что можно перейти в окно Опции, чтобы просмотреть все надстройки, но есть ли способ вывести все надстройки на лист?
Лучшие инструменты для повышения производительности Office
Kutools для Excel решает большинство ваших проблем и увеличивает вашу продуктивность на 80%
- Супер строка формул (легкое редактирование нескольких строк текста и формул); Режим чтения (удобное чтение и редактирование большого количества ячеек); Вставка в отфильтрованный диапазон...
- Объединение ячеек/строк/столбцов с сохранением данных; Разделение содержимого ячеек; Объединение дублирующихся строк с подсчетом суммы/среднего значения... Предотвращение дублирования ячеек; Сравнение диапазонов...
- Выбор дублирующихся или уникальных строк; Выбор пустых строк (все ячейки пустые); Супер поиск и нечеткий поиск во многих книгах; Случайный выбор...
- Точное копирование нескольких ячеек без изменения ссылок на формулы; Автоматическое создание ссылок на несколько листов; Вставка маркеров, флажков и многое другое...
- Избранные и быстрая вставка формул, диапазонов, диаграмм и изображений; Шифрование ячеек с паролем; Создание списка рассылки и отправка электронных писем...
- Извлечение текста, добавление текста, удаление по позиции, удаление пробелов; Создание и печать статистики страниц; Преобразование между содержимым ячеек и комментариями...
- Супер фильтр (сохранение и применение схем фильтрации к другим листам); Расширенная сортировка по месяцу/неделе/дню, частоте и другим параметрам; Специальный фильтр по жирному шрифту, курсиву...
- Объединение книг и листов; Объединение таблиц на основе ключевых столбцов; Разделение данных на несколько листов; Пакетное преобразование xls, xlsx и PDF...
- Группировка сводной таблицы по номеру недели, дню недели и другим параметрам... Отображение разблокированных, заблокированных ячеек разными цветами; Выделение ячеек, содержащих формулы/имена...

- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Открывайте и создавайте несколько документов в новых вкладках одного окна, а не в новых окнах.
- Увеличивает вашу продуктивность на 50% и экономит сотни кликов мышью каждый день!
