Что нового

Сохранение названий вкладок Chrome - в эксель

perven1

Новичок
Сообщения
57
Репутация
0
Здравствуйте.
Помогите разобраться.

Имеется скрипт - выводящий в окне список всех вкладок в программе GoogleChrome.
Как заставить скрипт - сохранять названия этих вкладок - в файле 111.xls (лежащем в одной папке со скриптом) построчно ?
 

Вложения

  • 111.rar
    20.5 КБ · Просмотры: 6

gunter123

Продвинутый
Сообщения
159
Репутация
69
Код:
#include <Excel.au3>				; Подключить
#include <Array.au3>				; Подключить

...

$aTabs = StringSplit($sTabs, @CRLF, 2)
For $i = UBound($aTabs) - 1 To 0 Step -1    ; Удалим пустые строки
   If $aTabs[$i] = "" Then
	 _ArrayDelete($aTabs, $i)
   EndIf
Next

Local $oExcel = _Excel_Open()
$oExcel.visible=False
IF NOT FileExists(@ScriptDir & "\Список.xlsx") Then
   Local $oBook = _Excel_BookNew($oExcel)
Else
   Local $oBook = _Excel_BookOpen($oExcel, @ScriptDir & "\Список.xlsx")
EndIf

_Excel_RangeWrite($oBook, $oBook.Activesheet, $aTabs, "A1")
_Excel_BookSaveAs($oBook, @ScriptDir & "\Список.xlsx")

_Excel_Close($oExcel, True, True)
 
Автор
P

perven1

Новичок
Сообщения
57
Репутация
0
gunter123 , Этот скрипт почему-то закрывает все другие открытые файлы эксель.
 
Автор
P

perven1

Новичок
Сообщения
57
Репутация
0
gunter123 , вроде бы все работает.
Спасибо большое.
 
Верх