Добавить одновременно несколько строк из MSFlexGrid в лист XL

@ASSEI · Регистрация: 18.10.2012

Студворк — интернет-сервис помощи студентам

Доброго дня ребята! подскажите как из MSFlexGrid добавить одновременно несколько строк в лист XL. заранее всем спасибо!

@UBUNTU · 11.07.2017, 17:23

ASSEI, Методом выбора из бд будет логичнее. но вообще у каждой строчки есть свой id и caption.

@ASSEI · 12.07.2017, 09:13 **[ТС]**

все конечно понятно спасибо , хотелось бы на примере посмотреть, во вложении пример, : задача заключается в том что бы кнопкой "добавить строку" (не одну) в MSFlexGrid и потом кнопкой "записать" все строки записать в книгу xl где имеется шаблон.

@UBUNTU · 13.07.2017, 19:00

Экспорт таблиц из access в excel и наоборот вот поиск на форуме.

ASSEI,

Code
1
2
3
4
5
6
  XL.Worksheets("TH").Range("A10").Value = MSTH.TextMatrix(1, 0) 
    XL.Worksheets("TH").Range("B10").Value = MSTH.TextMatrix(1, 1) 
      XL.Worksheets("TH").Range("C10").Value = MSTH.TextMatrix(1, 2)
        XL.Worksheets("TH").Range("D10").Value = MSTH.TextMatrix(1, 3)
          XL.Worksheets("TH").Range("E10").Value = MSTH.TextMatrix(1, 4) 
            XL.Worksheets("TH").Range("F10").Value = MSTH.TextMatrix(1, 5)

вы в коде у себя напутали, тут MSTH.TextMatrix(1, 5) у вас идет MSTH.TextMatrix(0, 5) ну в общем вы поняли.

@ASSEI · 14.07.2017, 10:29 **[ТС]**

не совсем вы меня поняли суть вопроса! записать в одну строку это понятно и у меня все правильно этим блоком я записываю заголовок в шапку название колонок MSTH.TextMatrix(0, 5), а вот само название из строк по одной понятно но у меня же строки добавляются и не одна и она добавляется в низ

@UBUNTU · 14.07.2017, 11:27

ASSEI, Тогда еще проще, вам нужно сделать SQL запрос или методом цикла, через количество строк в таблице к примеру:

Visual Basic
1
2
3
4
For i = 1 To Количество строк в таблице (его можно узнать кодом)
'тут код на вставку строк с учетом значения i (ГДЕ i + 1 то есть постоянно делаем + 1 шаг двигаясь вниз)
'то есть XL.Worksheets("TH").Range("F" & i).Value = MSTH.TextMatrix(1, i)
Next i

Вот от этого отталкивайтесь, но учтите, что использования цикла будет замедлять работу программы, чем больше строк тем хуже. Как вариант копирования всего запроса из RecordSet в таблицу, есть опять таки примеры.

@UBUNTU · 18.07.2017, 16:09

Передача данных из Visual Basic в Microsoft Excel

@ASSEI · 18.07.2017, 16:33 **[ТС]**

Спасибо что не забываете, но это маленько не то что хотелось бы увидеть в конечном итоге, все то что есть по данной ссылке у меня в проекте реализовано, не сделан один "каверзный момент", думаю всему свое время. Спасибо!

Новые блоги и статьи Все статьи Все блоги /
Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .	Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL3_image 8Observer8 27.01.2026 Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .	Влияние грибов на сукцессию anaschu 26.01.2026 Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .
Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android 8Observer8 26.01.2026 Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .	Установка Android SDK, NDK, JDK, CMake и т.д. 8Observer8 25.01.2026 Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .	Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf 8Observer8 25.01.2026 Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .	Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly 8Observer8 24.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .

@ASSEI 0 / 1 / 3 Регистрация: 18.10.2012 Сообщений: 662

	Добавить одновременно несколько строк из MSFlexGrid в лист XL 11.07.2017, 15:59. Показов 863. Ответов 7 Метки нет (Все метки) Доброго дня ребята! подскажите как из MSFlexGrid добавить одновременно несколько строк в лист XL. заранее всем спасибо! 0

@UBUNTU 352 / 213 / 42 Регистрация: 04.02.2015 Сообщений: 1,344
	11.07.2017, 17:23
	ASSEI, Методом выбора из бд будет логичнее. но вообще у каждой строчки есть свой id и caption. 0

@ASSEI 0 / 1 / 3 Регистрация: 18.10.2012 Сообщений: 662
	14.07.2017, 10:29 [ТС]
	не совсем вы меня поняли суть вопроса! записать в одну строку это понятно и у меня все правильно этим блоком я записываю заголовок в шапку название колонок MSTH.TextMatrix(0, 5), а вот само название из строк по одной понятно но у меня же строки добавляются и не одна и она добавляется в низ 0

@UBUNTU 352 / 213 / 42 Регистрация: 04.02.2015 Сообщений: 1,344
	18.07.2017, 16:09
	Передача данных из Visual Basic в Microsoft Excel 0

@ASSEI 0 / 1 / 3 Регистрация: 18.10.2012 Сообщений: 662
	18.07.2017, 16:33 [ТС]
	Спасибо что не забываете, но это маленько не то что хотелось бы увидеть в конечном итоге, все то что есть по данной ссылке у меня в проекте реализовано, не сделан один "каверзный момент", думаю всему свое время. Спасибо! 0