Что нового

Автоматическое удаление столбцов в Excel

deniskaa2014

Новичок
Сообщения
1
Репутация
0
Всем доброго дня! Мужики , нужна ваша помощь . Нужен скрип для автоматического удаления столбцов Excel .
Что должна делать программа указал на видео ( до 1-40). Как это все реализовать не знаю. Прошу вашей помощи. Спасибо
P.S.yadi.sk/d/kAhm-r09uA6ud ( видео )
 

ra4o

AutoIT Гуру
Сообщения
1,165
Репутация
247
В библиотеке "Excel.au3" есть функция , которая удалит лишние колонки
Код:
_Excel_RangeDelete ( $oWorksheet, $vRange )

Например так :
Код:
#include 'Excel.au3'

$Path = FileOpenDialog('Выбор файла', @ScriptDir, "Файлы Excel(*.xls;*.xlsx)", 1)
If Not @error Then
	$oExcel = _Excel_Open(False)
	$oWorkbook = _Excel_BookOpen($oExcel, $Path)

	;Здесь укажите диапазин колонок для удаления
	$range = 'E:H'
	;-------------------------------------------

	_Excel_RangeDelete($oWorkbook.ActiveSheet, $range)
	_Excel_BookClose($oWorkbook)
	_Excel_Close($oExcel)
EndIf
 
Верх