Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Access
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 29.05.2014, 16:22   #1
Vitalii197777
Пользователь
 
Регистрация: 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
Vitalii197777 вне форума Ответить с цитированием
Старый 30.05.2014, 17:31   #2
Myhaylo
Форумчанин
 
Регистрация: 19.07.2012
Сообщений: 520
По умолчанию

Как работать с Excel - см. http://programmersforum.ru/showthread.php?t=261671
Окупант, руки прочь от Украины!!! Слава Героям!
Myhaylo вне форума Ответить с цитированием
Старый 10.06.2014, 14:37   #3
Swatch
Форумчанин
 
Регистрация: 05.07.2009
Сообщений: 209
По умолчанию

А как Вы объявляете переменную арр?
Swatch вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
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