Форум программистов, компьютерный форум, киберфорум
Наши страницы
C#: Базы данных, ADO.NET
Войти
Регистрация
Восстановить пароль
 
sizkl
0 / 0 / 0
Регистрация: 26.12.2016
Сообщений: 14
1

Вывод image в Excel

26.12.2016, 19:08. Просмотров 207. Ответов 0
Метки нет (Все метки)

Есть база есть екселевский файл, что надо выводит, все кроме картинки в клетке пишет вот это "System.Drawing.Bitmap" подскажите что не так(.
Вот код:
C#
1
2
3
4
5
6
7
8
9
10
11
12
13
private void btnBadge_Click(object sender, EventArgs e)
        {
            
            Excel.Application excel = new Excel.Application();            
            fileExcel = excel.Workbooks.Open("C:/Users/Konstantin/Documents/bedge1.xlsx");
            workSheet = fileExcel.ActiveSheet as Excel.Worksheet;
            Driver obj = driverBindingSource.Current as Driver;
            Phone obl = phoneBindingSource.Current as Phone;
            workSheet.Range["B2"].Value = "Ф.И.О" + " " + obj.SurName + " " + obj.Name + " " + obj.MiddleName;
            workSheet.Range["B3"].Value = "Тел." + " " + obl.PhoneNumber;
            workSheet.Range["B5"].Value = obj.Picture;
            excel.Visible = true;
        }
Добавлено через 2 часа 44 минуты
Спасибо всем решение нашел сам)) если кому интересно будет:
C#
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
private void btnBadge_Click(object sender, EventArgs e)
        {
            
            Excel.Application excel = new Excel.Application();            
            fileExcel = excel.Workbooks.Open("C:/Users/Konstantin/Documents/bedge1.xlsx");
            workSheet = fileExcel.ActiveSheet as Excel.Worksheet;
            Driver obj = driverBindingSource.Current as Driver;
            Phone obl = phoneBindingSource.Current as Phone;
            workSheet.Range["B2"].Value = "Ф.И.О" + " " + obj.SurName + " " + obj.Name + " " + obj.MiddleName;
            workSheet.Range["B3"].Value = "Тел." + " " + obl.PhoneNumber;
            // workSheet.Range["B5"].Value = obj.Picture; а на это место пишем следующее
            dynamic rg = null;
            
            rg = workSheet.get_Range("B" + 5, "B" + 5);
            float il, it, iw, ih;
            float ExcelPixel = 0.746835443f;
            Image im = Image.FromFile(obj.FileName);
            il = (float)(double)rg.Left;
            it = (float)(double)rg.Top;
 
            iw = ExcelPixel * im.Width;
            ih = ExcelPixel * im.Height;
 
            if (im.Height < 50)
                rg.RowHeight = ExcelPixel * im.Height;
            else
                rg.RowHeight = 50;
 
            workSheet.Shapes.AddPicture(obj.FileName, Office.MsoTriState.msoFalse, Office.MsoTriState.msoTrue, il, it, iw, ih);
            excel.Visible = true;
        }
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
26.12.2016, 19:08
Ответы с готовыми решениями:

Вывод информации в Excel
Сделал вывод информации в Excel. Время от времени по непонятным мне причинам выскакивает ошибка,...

Вывод из DataGridView в Excel
Помогите сделать кнопку экспорта данных из dataGridView в Excel , код экспорта взял из своей же...

Форматированный вывод в MS excel
Вывел информацию из datagriview в эксель при помощи цикла: for (int i = 0; i &lt;...

Ошибка "data types IMAGE and IMAGE are incompatible in the equal to operator" при обновлении картинки
Получаю текущую аватарку клиента @OldImage (Image тип в базе данных), храню Image в byty массиве,...

Вывод данных и DatagridView в Excel
Здравствуйте, уважаемые знатоки! Вот рабочий код, который выводит из DatagridView в Excel....

0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
26.12.2016, 19:08

Вывод таблицы в Excel файл
У меня есть таблица которая получается путем вывода из базы данных sql server Записываю ее в дата...

Вывод результата выборки Select SQL в Excel
Доброго времени суток! Подскажите, варианты решений в такой ситуации: Есть программа которая...

Клиент-сервер, вывод в Excel из базы данных SQL
Здравствуйте формучане! У меня возникла проблема, прошу Вашей помощи. Дали задание на практику,...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.
Рейтинг@Mail.ru