| NibelungXXX |
30-06-2013 14:48 2176784 |
работа с excel через батник
подскажите, как задать переменной значение в батнике, и записать его в excel?
например в батнике есть переменные:
имя
фамилия
надо чтобы имя записалось в 1.1 ячейку, а фамилия в 1,2 ячейку
|
VBScript это может делать, вот пример
Код:
Dim oXL
Set oXL = WScript.CreateObject("Excel.Application")
oXL.Visible = false 'скрыть Excel
oXL.WorkBooks.Add("C:\test.xlsx") 'добавить существующую книгу - описание колонок
' ищем первую не заполненную строку
' левая верхняя ячейка имеет координаты 1,1 в MS Office и 0,0 в Open Office
Row = 1 ' с какой строки начинаем поиск
Col = 1 ' какую колонку проверять
Do While oXL.Cells(Row, Col).Value > 0 ' проверяем ячейку строки
Row = Row + 1
Loop
a = oXL.Cells(Row, 1).Value ' читать значение ячейки 1 в строке Row
oXL.Cells(Row, 1).Value = "Имя" ' записать строковые данные в ячейку 2 в строке Row
oXL.Cells(Row, 2).Value = "Фамилия" ' записать числовые данные в ячейку 3 в строке Row
' выделение ячеек и форматирование выделенных
oXL.ActiveSheet.Range("A3:A100").Select
oXL.Selection.NumberFormat = "#,##0.00"
oXL.Visible = true ' показать Excel
'oXL.WorkBooks.Close
|
| NibelungXXX |
30-06-2013 19:45 2176956 |
спасибо
|
Время: 07:40.
© OSzone.net 2001-
