|
Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Программирование и базы данных » VBA - Как выводить на печать отчет Crystal Reports |
|
VBA - Как выводить на печать отчет Crystal Reports
|
Пользователь Сообщения: 57 |
Добрый день
Я слепил в проекте отчет Crystal Reports ( Проект - Добавить форму Windows - Reporting - Crystal Reports) , с тем чтобы создать отчет и вставить в него данные из базы , проблем не было, по сути это просто конструктор. И вот сделал я его, появился у меня в проекте файлик CrystalReport1.rpt, а что дальше? Вопрос в том как его вывести на принтер, а еще лучше вначале в Excel . Этого просто ни где не описано, как издеваются. Где можно про это почитать? А вот если бы еще и пример кода увидеть, то вообще было бы круто. Заранее спасибо. |
|
Отправлено: 20:35, 22-04-2010 |
Ветеран Сообщения: 5624
|
Профиль | Отправить PM | Цитировать Цитата Большой Кол:
|
|
------- Отправлено: 00:36, 23-04-2010 | #2 |
Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети. Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля. |
Пользователь Сообщения: 57
|
Профиль | Отправить PM | Цитировать Спасибо, кусок кода бы не повредил.
|
Отправлено: 15:01, 23-04-2010 | #3 |
Ветеран Сообщения: 5624
|
Профиль | Отправить PM | Цитировать Выгрузка в Excel списка из DataGridView (ну или из любого списка при корректировании кода ) :
public void ExportToExcel(DataGridView grid) { ApplicationClass Excel = new ApplicationClass(); XlReferenceStyle RefStyle = Excel.ReferenceStyle; Excel.Visible = true; Workbook wb = null; String TemplatePath = System.Windows.Forms.Application.StartupPath + @"\Экспорт данных.xlt"; try { wb = Excel.Workbooks.Add(TemplatePath); // !!! } catch(System.Exception ex) { throw new Exception("Не удалось загрузить шаблон для экспорта " + TemplatePath + "\n" + ex.Message); } Worksheet ws = wb.Worksheets.get_Item(1) as Worksheet; for(int j = 0; j < grid.Columns.Count; ++j) { (ws.Cells[1, j + 1] as Range).Value2 = grid.Columns[j].HeaderText; for(int i = 0; i < grid.Rows.Count; ++i) { object Val = grid.Rows[i].Cells[j].Value; if(Val != null) (ws.Cells[i + 2, j + 1] as Range).Value2 = Val.ToString(); } } Excel.ReferenceStyle = RefStyle; ws.Columns.EntireColumn.AutoFit(); ReleaseExcel(Excel as Object); } private void ReleaseExcel(object excel) { // Уничтожение объекта Excel. Marshal.ReleaseComObject(excel); // Вызываем сборщик мусора для немедленной очистки памяти GC.GetTotalMemory(true); } |
------- Отправлено: 01:02, 26-04-2010 | #4 |
![]() |
Участник сейчас на форуме |
![]() |
Участник вне форума |
![]() |
Автор темы |
![]() |
Сообщение прикреплено |
| |||||
Название темы | Автор | Информация о форуме | Ответов | Последнее сообщение | |
Медиа - как выводить разный звук на аудиосистему и на наушники? | Irbis | Microsoft Windows 7 | 6 | 02-07-2010 11:38 | |
Разное - [решено] Проблемы с Sheduled Reports в GFI ReportCenter 3.5 | fat_cat | Другие серверные продукты | 1 | 28-04-2009 12:42 | |
Как я поиздевался над своей видюхой [фото отчет о разгоне NV6600] | Plutonium 239 | Разгон, охлаждение и моддинг | 11 | 28-12-2005 00:55 | |
PHP+MySQL. как выводить картинку | Guest | Вебмастеру | 1 | 26-01-2004 18:18 | |
Crystal Reports | Skiff | Программирование и базы данных | 1 | 21-08-2003 05:37 |
|