удалить столбец в Excel

Я использую этот VBScript для удаления столбца A в Excel:

Set objExcel = CreateObject("Excel.Application") Set wy = xl.Workbooks.Open("D:\XX\Historical_data_extract.xlsx") objExcel.Visible = True objWorkbook.Worksheets("Sheet1").Range("A:A").Delete objWorkbook.Save objWorkbook..Close 

Скрипт просто открывает файл, но не удаляет что-нибудь. Почему это так?

Также как я могу удалить несколько столбцов A и J?

Попробуйте изменить код на

 Set objexcel = CreateObject("Excel.Application") Set wy = objexcel.Workbooks.Open("D:\XX\Historical_data_extract.xlsx") objexcel.Visible = True wy.Worksheets("Sheet1").Range("A:A").EntireColumn.Delete wy.Save wy.Close 

Ваш код пытался удалить диапазон в другой книге, чем открытая книга.

Столбцы E и G могут быть удалены

 wy.Worksheets("Sheet1").Range("G:G").EntireColumn.Delete wy.Worksheets("Sheet1").Range("E:E").EntireColumn.Delete wy.Worksheets("Sheet1").Range("A:A").EntireColumn.Delete 

Ничего не удаляется, потому что рабочая книга открывается в переменную wy , но вы пытаетесь удалить столбец из книги в переменной objWorkbook . Который вы не инициализировали.

Вы удаляете другой столбец, указывая другой столбец вместо A:A Помните, что удаление столбца уменьшает индекс всех столбцов справа от удаленного столбца ( B становится A , C становится B и т. Д.), Поэтому я предлагаю удалить их в обратном порядке.

 wy.Worksheets("Sheet1").Range("J:J").Delete wy.Worksheets("Sheet1").Range("A:A").Delete 
  • Перевод сценария VBS на VBA и выполнение через Excel
  • Вывод гистограммы с помощью VBScript
  • LIsting всех текстовых файлов в папке и записи информации на лист excel
  • Закрыть Открыть экземпляр Excel
  • Обход безопасности Outlook при отправке электронной почты через макрос Excel
  • Автоматизация массового копирования / вставки
  • Добавить новый лист в Excel (vbscript)
  • Как передать имя пользователя и пароль во внешний файл в Excel Data Connection
  • Сценарий работает в режиме отладки, но не в нормальном режиме - Код ошибки: 429 (компонент ActiveX не может создать объект)
  • не может удалять пустые строки из xlsx с помощью vbscript
  • Почему VBScript запускается из% userprofile% \ Documents при запуске из Excel VBA
  • Interesting Posts
    Давайте будем гением компьютера.