Что нового

[Данные, строки] Запись переменной в Excel

prokazzza

Новичок
Сообщения
160
Репутация
2
Доброго времени суток, подскажите реализацию записи данных из переменной в Excel файл. К примеру:

Код:
While 1
   $sLine = FileReadLine($hFileOpen)
	  If @error = -1 Then ExitLoop
WEnd


Переменная в $sLine при цикле будет добавлять данные в Excel с переходом на следующую строку, т.е. к примеру столбец А, строка 1. Следующее значение он запишет в столбец А, строку 2 и т.д.

Мож кто делал, или пример подскажет, заранее благодарю!!
 
A

Alofa

Гость
Схема действий:
Код:
FileReadToArray() ; Читаем файл в массив
_Excel_RangeWrite() ; Из массива в таблицу Excel (смотри примеры этой функции [https://www.autoitscript.com/autoit3/docs/libfunctions/_Excel_RangeWrite.htm])
 

ra4o

AutoIT Гуру
Сообщения
1,165
Репутация
247
Возможно это и извращение, но мне, например для записи единичных значений в Excel гораздо удобнее использовать функцию со старой UDF 'Excel.au3'
Код:
Func _ExcelWriteCell($oExcel, $sValue, $sRangeOrRow, $iColumn = 1)
	If Not IsObj($oExcel) Then Return SetError(1, 0, 0)
	If Not StringRegExp($sRangeOrRow, "[A-Z,a-z]", 0) Then
		If $sRangeOrRow < 1 Then Return SetError(2, 0, 0)
		If $iColumn < 1 Then Return SetError(2, 1, 0)
		$oExcel.Activesheet.Cells($sRangeOrRow, $iColumn).Value = $sValue
		Return 1
	Else
		$oExcel.Activesheet.Range($sRangeOrRow).Value = $sValue
		Return 1
	EndIf
EndFunc   ;==>_ExcelWriteCell
 
Верх