Loopback
|
 Posted: Thu Dec 17, 2009 11:22 Post subject: |
 |
|
| Andrey_A wrote: | Loopback пожалуйста напиши весь скрипт код заново
Задача: Со второго листа записать в файл один столбец В
(куда бы я не вставлял вышеописанную строчку ничего не получается) |
Кажется нашел проблему. Индексы при обращении к листу лучше не использовать, т.к. при попытке активации скрытого листа вываливается ошибка. Лучше использовать имя листа.
| Code: |
#include <Excel.au3>
$sFile = @ScriptDir & "\filename.xls"
; Откроем книгу
$oInFile = _ExcelBookOpen($sFile, 0, True)
; Активируем лист
_ExcelSheetActivate($oInFile, "<имя листа>")
; Прочитаеи колонку B, строки читаем все
$aData = _ExcelReadSheetToArray($oInFile, 1, 2, 0, 1)
; MsgBox(0, "Error code:", "Error: " & @error & " Extended: " & @extended) ; TEST
; Закроем книгу
_ExcelBookClose($oInFile, 0)
; Откроем выходной файл для записи - с очисткой
$hFile = FileOpen("output.txt", 2)
; Запишем данные
For $i=1 To $aData[0][0]
FileWriteLine($hFile, $aData[$i][1])
Next
FileClose($hFile)
|
| Andrey_A wrote: | | Кстати Я работал на Висте скрипт Xls_in_txt.au3 работал,перешёл на Xp стал выдавать ошибку |
Странно, судя по всему, функции ExcelReadSheetToArray не удается прочитать данные. Попробуй раскомментировать строчку в скрипте выше, помеченную TEST, и посмотреть, какая ошибка выдается. Кстати, а офис на этой машине точно установлен? |
|
Rules
Search
FAQ
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
