Помощник
Здравствуйте, гость ( Вход | Регистрация )
|
|
3:05:2008, 09:40
|
|
Новенький ![]() Группа: Программист Сообщений: 14 Регистрация: 5:01:2008 Пользователь №: 14 606 Репутация: 0
|
В поле табличного документа загружаю файл Excel.
Делее нужно выбирать нужные ячейки из нужных колонок в поле табличного документа. Это возможно - обратиться к определенной ячейки? Например как в Excel: ExcelЯчейка = ExcelЛист.Cells(Строка, Колонка); Заранее спасибо. |
|
Сообщение
#1
|
|
![]() |
|
|
3:05:2008, 11:13
|
|
Новенький ![]() Группа: Программист Сообщений: 46 Регистрация: 18:02:2007 Пользователь №: 9 305 Репутация: 0
|
Вот пример кода, который считывает из файла Excel данные и заполняет табличную часть некоего документа
ExcelApp = CreateObject("Excel.Application"); WorkBooks = ExcelApp.WorkBooks; WorkBook = WorkBooks.Open(ИмяФайла); Lists = WorkBook.Sheets.Count(); for k = 1 to Lists do Name = WorkBook.Sheets(k).Name(); ShList.AddValue(TrimAll(Name),TrimAll(Name)); enddo; if ShList.ChooseValue(S,"выберите лист таблицы ""Excel""",N,,) = 0 then DoMessageBox("Не выбран лист таблицы ""Excel"" !"); Goto ~Exit; else ShList.GetValue(N,NL); endif; Sheet = WorkBook.WorkSheets(); WorkBook.Sheets(TrimAll(NL)).Activate(); Counter = 0; First = 5; Last = 9999; Doc = CreateObject("Document.ВидДокумента"); for k = First to Last do Counter = Counter + 1; Status("Обработано строк "+Counter); XCell = ExcelApp.Cells(k,1).Value; if EmptyValue(XCell) = 1 then k = 9999; Break endif; Doc.NewLine(); // а потом, к примеру, так Doc.Количество = ExcelApp.Cells(k,2).Value; Doc.Сумма = ExcelApp.Cells(k,3).Value; enddo; Doc.write(); ~Exit : ExcelApp.ActiveWorkbook.Close(); ExcelApp.Quit() Сообщение отредактировал vbs - 3:05:2008, 11:23 |
|
Сообщение
#2
|
|
|
|
3:05:2008, 11:22
|
|
Новенький ![]() Группа: Программист Сообщений: 6 Регистрация: 2:05:2008 Пользователь №: 16 998 Специализация: Програмист Репутация: 0
|
Спр= СоздатьОбект("Excel.Application");//Ну тут все понятно
РабКника= Excel.Workbooks; //Тут тож РабКника.Open(ИмяФайла,0,1); //ИмяФайла- католог+ имя файла Cell= Excel.Cells(y,x); //В Cell передаем "указатель" на у,х ячейку Возврат Cell.Value; //и возврашяем куданить ее значение. |
|
Сообщение
#3
|
|
|
|
5:05:2008, 12:28
|
|
Новенький ![]() Группа: Программист Сообщений: 4 Регистрация: 6:12:2007 Из: Р.Д., г. Махачкала Пользователь №: 14 080 Специализация: Информатик экономист Репутация: 0
|
В документе если тебе нужна определенная строка то для этого нужна команда ПолучитьСтрокуПоНомеру("НомерСтроки"); а далее просто выбераешь нужный столбец
Да если надо по анологии Excel тогда УстановитьЗначение(<?>,,); Синтаксис: УстановитьЗначение(<Строка>,<Колонка>,<Знач>) Назначение: Установить значение ячейки таблицы значений. Параметры: <Строка> - номер строки. <Колонка> - номер или идентификатор колонки. <Знач> - устанавливаемое значение в ячейке таблицы. |
|
Сообщение
#4
|
|
|
|
5:05:2008, 14:53
|
|
Новенький ![]() Группа: Программист Сообщений: 86 Регистрация: 19:05:2007 Пользователь №: 10 950 Специализация: Программист 1С Репутация: 2
|
Саид, а как ты здесь оказался, неужто стреляли ?
|
|
Сообщение
#5
|
|
|
|
7:05:2008, 15:58
|
|
Новенький ![]() Группа: Программист Сообщений: 14 Регистрация: 5:01:2008 Пользователь №: 14 606 Репутация: 0
|
Я наверное не правильно поставил вопрос.
Платформа 8.1. Пешение вопроса: Ячейка = ЭлементыФормы.ТабДок.Область("R"+Строка+"C"+Колонка); Все равно всем спасибо за внимание. |
|
Сообщение
#6
|
|
![]() |
|
Текстовая версия | Сейчас: 16:05:2008 - 17:23 |