Вывод данных и DatagridView в Excel

@Барсег · Регистрация: 15.12.2014

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

Здравствуйте, уважаемые знатоки!

Вот рабочий код, который выводит из DatagridView в Excel. Выводит всё, что есть в гриде.

Возможно ли сделать так, что бы вывод в Excel осуществлялся по одной выбранной в DatagridView записи?

Выбрал в гриде запись, вывел в эксель. выбрал вторую запись и т.д.

C#

        private void button3_Click(object sender, EventArgs e)
        {
            Excel.Application ExcelApp = new Microsoft.Office.Interop.Excel.Application();
            Excel.Workbook ExcelWorkBook;
            Excel.Worksheet ExcelWorkSheet;
            ExcelWorkBook = ExcelApp.Workbooks.Add(System.Reflection.Missing.Value);
            ExcelWorkSheet = (Excel.Worksheet)ExcelWorkBook.Worksheets.get_Item(1);
            ExcelWorkSheet.Cells[1, 7] = "Квитанция";
 
            for (int i = 2; i < dgv_main.Columns.Count + 1; i++)
            {
                ExcelWorkSheet.Cells[3, i] = dgv_main.Columns[i-1].HeaderText;
            }
            for (int i = 1; i < dgv_main.Rows.Count; i++)
            {
                for (int j = 1; j < dgv_main.Columns.Count; j++)
                {
                    ExcelWorkSheet.Cells[i + 3, j + 0] = dgv_main.Rows[i].Cells[j].Value.ToString();
                }
            }
 
            ExcelApp.Visible = true;
        }

@chumich · 06.02.2015, 22:10

Выведите этот процесс на отдельную кнопку:

C#

        private void button3_Click(object sender, EventArgs e)
        {
            Excel.Application ExcelApp = new Microsoft.Office.Interop.Excel.Application();
            Excel.Workbook ExcelWorkBook;
            Excel.Worksheet ExcelWorkSheet;
            ExcelWorkBook = ExcelApp.Workbooks.Add(System.Reflection.Missing.Value);
            ExcelWorkSheet = (Excel.Worksheet)ExcelWorkBook.Worksheets.get_Item(1);
            ExcelWorkSheet.Cells[1, 7] = "Квитанция";
 
            for (int i = 2; i < dgv_main.Columns.Count + 1; i++)
            {
                ExcelWorkSheet.Cells[3, i] = dgv_main.Columns[i-1].HeaderText;
            }
        }
        int k = 4;
        private void button4_Click(object sender, EventArgs e)
        {
            for (int j = 1; j < dgv_main.Columns.Count; j++)
            {
                 ExcelWorkSheet.Cells[k, j + 0] = dgv_main.CurrentRow.Cells[j].Value.ToString();
             }
         k = k + 1;
         }

Выделяйте строку и жмите кнопку.

@Барсег · 06.02.2015, 22:28 **[ТС]**

chumich, огромное Вам спасибо!

@Felagund · 09.02.2015, 21:57

Сообщение от Барсег

Excel.Application ExcelApp = new Microsoft.Office.Interop.Excel.Application();
Excel.Workbook ExcelWorkBook;
Excel.Worksheet ExcelWorkSheet;

А какое использовалось пространство имён для этого?
Пробовал

C#

1	using Microsoft.Office.Interop.Excel;

Но чёт не канает

@chumich · 09.02.2015, 22:10

Сообщение от Felagund

Но чёт не канает

Почему? Interop и используется. Только надо предварительно сделать в референсах ссылку на библиотеку.

@Felagund · 09.02.2015, 22:15

Сообщение от chumich

Почему? Interop и используется. Только надо предварительно сделать в референсах ссылку на библиотеку.

Ссылку сделал, иначе бы юзинг не смог добавить, однако, Excel в строке Excel.Workbook ExcelWorkBook; и других подобных строках компилятор всё равно подчёркивает и говорит что пропущена ссылка на сборку или директива using.

@chumich · 09.02.2015, 22:25

Не видя проекта, не могу точно сказать в чем у вас дело. Выложите - посмотрю. Могу еще дать хорошую ссылку - сверьтесь с тем, что там написано: всё ли у вас так.
http://wladm.narod.ru/C_Sharp/comexcel.html#0

@Felagund · 09.02.2015, 22:42

Думал может дело в том, что мой проект написан в Express версии, но создал пустой проект на полной и проблема та же. Прикладываю пустой проект с проблемной строкой.
test2.7z

@Барсег · 09.02.2015, 22:47 **[ТС]**

Если кто может сказать, как динамически нарисовать сетку в экселе?

Всем большое спасибо.

ExcelWorkSheet.Cells.get_Range("A3", "P4").Borders.LineStyle = Excel.XlLineStyle.xlContinuous;

как определить, выделить всё что я вывел из грида и нарисовать таблицу?

Добавлено через 2 минуты

Сообщение от Felagund

А какое использовалось пространство имён для этого?
Пробовал

C#

1	using Microsoft.Office.Interop.Excel;

Но чёт не канает

using Microsoft.Office.Interop;
using Excel = Microsoft.Office.Interop.Excel;

Могу весь проект скинуть, мне не жалко

Но опытный программист посмотрит, будет смеяться

Я уже сам вижу, что можно писать иначе, а не как я...

@chumich · 09.02.2015, 22:51

Сообщение от Барсег

как определить, выделить всё что я вывел из грида и нарисовать таблицу

Гляньте по той же ссылке, выше. Там много приемов работы с Excel, в том числе и рисование таблиц, по-моему.

Добавлено через 3 минуты
Felagund, точно, Барсег прав, что-то я сразу не обратил внимание

:

using Excel = Microsoft.Office.Interop.Excel;

@Барсег · 09.02.2015, 22:53 **[ТС]**

Сообщение от chumich

Гляньте по той же ссылке, выше. Там много приемов работы с Excel, в том числе и рисование таблиц, по-моему.

Добавлено через 3 минуты
Felagund, точно, Барсег прав, что-то я сразу не обратил внимание

:

Спасибо Вам, я читал, но там тоже как у меня диапазон заранее известен.

@chumich · 09.02.2015, 22:57

Сообщение от Барсег

но там тоже как у меня диапазон заранее известен.

А вам нужно в зависимости от того, что выводится каждый раз по разному?

@Felagund · 09.02.2015, 22:58

Спасибо, теперь всё норм.

@Барсег · 09.02.2015, 22:59 **[ТС]**

Сообщение от chumich

А вам нужно в зависимости от того, что выводится каждый раз по разному?

Именно так.

@chumich · 09.02.2015, 23:17

Могу предложить два варианта:
1. Если известна первая ячейка (левая верхняя угловая), куда выводится таблица и кроме таблицы данных на листе нет, то используя код:

C#

1
2

LastRow = ThisWorkbook.ActiveSheet.Cells.Find(What:="*", SearchDirection:=xlPrevious, SearchOrder:=xlByRows).Row;
LastCol = ThisWorkbook.ActiveSheet.Cells.Find(What:="*", SearchDirection:=xlPrevious, SearchOrder:=xlByColumns).Coloumn;

находите номер последних строчки и столбца таблицы, выделяете программно получившийся диапазон и рисуете (это, я так понял вы умеете). Код, правда, из VBA переделан, но думаю, что должен работать. В крайнем случае по всплывающим подсказкам можно его поправить или по ссылке посмотреть - там должно быть что-то аналогичное.
2. Если есть другие данные, то можно по первой строчке пустить цикл перебора значений с условием: при нахождении пустой ячейки - вывести № столбца (это будет граница диапазона). И тоже самое сделать по первому столбцу для определения последней заполненной строчки таблицы. Ну, а дальше - как в первом варианте.

@Барсег 3 / 3 / 0 Регистрация: 15.12.2014 Сообщений: 28
	09.02.2015, 22:53 [ТС]	11
	Сообщение от chumich Гляньте по той же ссылке, выше. Там много приемов работы с Excel, в том числе и рисование таблиц, по-моему. Добавлено через 3 минуты Felagund, точно, Барсег прав, что-то я сразу не обратил внимание : Спасибо Вам, я читал, но там тоже как у меня диапазон заранее известен. 0

@Felagund 3 / 3 / 1 Регистрация: 23.09.2014 Сообщений: 53
	09.02.2015, 22:58	13
	Спасибо, теперь всё норм. 0

@Барсег 3 / 3 / 0 Регистрация: 15.12.2014 Сообщений: 28
	06.02.2015, 22:28 [ТС]	3
	chumich, огромное Вам спасибо! 0

@chumich 2080 / 1238 / 464 Регистрация: 20.12.2014 Сообщений: 3,237
	09.02.2015, 22:10	5
	Сообщение от Felagund Но чёт не канает Почему? Interop и используется. Только надо предварительно сделать в референсах ссылку на библиотеку. 0

@Felagund 3 / 3 / 1 Регистрация: 23.09.2014 Сообщений: 53
	09.02.2015, 22:15	6
	Сообщение от chumich Почему? Interop и используется. Только надо предварительно сделать в референсах ссылку на библиотеку. Ссылку сделал, иначе бы юзинг не смог добавить, однако, Excel в строке Excel.Workbook ExcelWorkBook; и других подобных строках компилятор всё равно подчёркивает и говорит что пропущена ссылка на сборку или директива using. 0

@chumich 2080 / 1238 / 464 Регистрация: 20.12.2014 Сообщений: 3,237
	09.02.2015, 22:25	7
	Не видя проекта, не могу точно сказать в чем у вас дело. Выложите - посмотрю. Могу еще дать хорошую ссылку - сверьтесь с тем, что там написано: всё ли у вас так. http://wladm.narod.ru/C_Sharp/comexcel.html#0 1

@Felagund 3 / 3 / 1 Регистрация: 23.09.2014 Сообщений: 53
	09.02.2015, 22:42	8
	Думал может дело в том, что мой проект написан в Express версии, но создал пустой проект на полной и проблема та же. Прикладываю пустой проект с проблемной строкой. test2.7z 1

@chumich 2080 / 1238 / 464 Регистрация: 20.12.2014 Сообщений: 3,237
	09.02.2015, 22:51	10
	Сообщение от Барсег как определить, выделить всё что я вывел из грида и нарисовать таблицу Гляньте по той же ссылке, выше. Там много приемов работы с Excel, в том числе и рисование таблиц, по-моему. Добавлено через 3 минуты Felagund, точно, Барсег прав, что-то я сразу не обратил внимание : using Excel = Microsoft.Office.Interop.Excel; 0

@chumich 2080 / 1238 / 464 Регистрация: 20.12.2014 Сообщений: 3,237
	09.02.2015, 22:57	12
	Сообщение от Барсег но там тоже как у меня диапазон заранее известен. А вам нужно в зависимости от того, что выводится каждый раз по разному? 0

@Барсег 3 / 3 / 0 Регистрация: 15.12.2014 Сообщений: 28
	09.02.2015, 22:59 [ТС]	14
	Сообщение от chumich А вам нужно в зависимости от того, что выводится каждый раз по разному? Именно так. 0

	09.02.2015, 23:17

Вывод данных и DatagridView в Excel

Решение