|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
29.05.2014, 16:22 | #1 |
Пользователь
Регистрация: 28.08.2013
Сообщений: 59
|
Ошибка
Помогите пожалуйста разобраться, это отчет в Excel,на access2003 работает а 2007 нет,Подскажите в чем проблема?
Private Sub Кнопка31_Click() On Error GoTo errHandler Me.Dirty = False I = 1 Set app = New Excel.Application-выдает ошибку USER-DEFINED TYPE NOT DEFINED app.Visible = True Excel.Workbooks.Open (Replace(CurrentDb.Name, "Отчет", "") & "Отчет.xlt") Do While IsNull(Me.Наименование) = False DoCmd.GoToRecord acDataForm, Me.Name, acGoTo, I Select Case I Case Is < 36 Excel.Workbooks(1).Worksheets("Пере дняя сторона").Cells(15 + I, 3).Value = Me.Наименование Case Is >= 36 Excel.Workbooks(1).Worksheets("Обра тная сторона").Cells(2 + I - 35, 3).Value = Me.Наименование End Select I = I + 1 Loop errExit: Exit Sub errHandler: If Err.Number = 2046 Then Resume Next End If End Sub |
30.05.2014, 17:31 | #2 |
Форумчанин
Регистрация: 19.07.2012
Сообщений: 520
|
Как работать с Excel - см. http://programmersforum.ru/showthread.php?t=261671
Окупант, руки прочь от Украины!!! Слава Героям!
|
10.06.2014, 14:37 | #3 |
Форумчанин
Регистрация: 05.07.2009
Сообщений: 209
|
А как Вы объявляете переменную арр?
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Nero - ошибка драйвера DMA. ошибка CRC | NecRoMat | Софт | 5 | 09.05.2012 01:29 |
Где ошибка в этом исходном коде на языке Си? Или ошибка в Excel? | ArchiCurtis | Помощь студентам | 2 | 07.04.2012 14:16 |
Ошибка run-time Error 1004 общая ошибка ODBC | kaval88 | Microsoft Office Excel | 0 | 27.02.2011 20:20 |
Ошибка в коде, ошибка в css или это проблема с совместимостью с браузерами? | ankris | HTML и CSS | 5 | 23.11.2010 16:58 |
...Ошибка 101 (net::ERR_CONNECTION_RESET): Неизвестная ошибка... | infrared | Помощь студентам | 0 | 16.04.2009 17:44 |