Поле табличного документа

Тема в разделе "1C и всё что с ней связано", создана пользователем PsyTech, 3 май 2008.

Статус темы:
Закрыта.
  1. PsyTech

    PsyTech Гость

    В поле табличного документа загружаю файл Excel.
    Делее нужно выбирать нужные ячейки из нужных колонок в поле табличного документа. Это возможно - обратиться к определенной ячейки?
    Например как в Excel: ExcelЯчейка = ExcelЛист.Cells(Строка, Колонка);

    Заранее спасибо.
     
  2. vbs

    vbs Well-Known Member

    Регистрация:
    18 фев 2007
    Сообщения:
    1.708
    Симпатии:
    3
    Вот пример кода, который считывает из файла 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()
     
  3. Allexei

    Allexei Well-Known Member

    Регистрация:
    2 май 2008
    Сообщения:
    322
    Симпатии:
    0
    Спр= СоздатьОбект("Excel.Application");//Ну тут все понятно
    РабКника= Excel.Workbooks; //Тут тож
    РабКника.Open(ИмяФайла,0,1); //ИмяФайла- католог+ имя файла
    Cell= Excel.Cells(y,x); //В Cell передаем "указатель" на у,х ячейку
    Возврат Cell.Value; //и возврашяем куданить ее значение.
     
  4. Гость

    В документе если тебе нужна определенная строка то для этого нужна команда ПолучитьСтрокуПоНомеру("НомерСтроки"); а далее просто выбераешь нужный столбец

    Да если надо по анологии Excel тогда
    УстановитьЗначение(<?>,,);
    Синтаксис:
    УстановитьЗначение(<Строка>,<Колонка>,<Знач>)
    Назначение:
    Установить значение ячейки таблицы значений.
    Параметры:
    <Строка> - номер строки.
    <Колонка> - номер или идентификатор колонки.
    <Знач> - устанавливаемое значение в ячейке таблицы.
     
  5. Isabela

    Isabela Гость

    Саид, а как ты здесь оказался, неужто стреляли ? :)
     
  6. PsyTech

    PsyTech Гость

    Я наверное не правильно поставил вопрос.
    Платформа 8.1.
    Пешение вопроса:
    Ячейка = ЭлементыФормы.ТабДок.Область("R"+Строка+"C"+Колонка);
    Все равно всем спасибо за внимание.
     
Загрузка...
Статус темы:
Закрыта.

Поделиться этой страницей