Форум программистов, компьютерный форум, киберфорум
Наши страницы
MS Access
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.75/4: Рейтинг темы: голосов - 4, средняя оценка - 4.75
eu
2 / 2 / 0
Регистрация: 22.01.2015
Сообщений: 29
#1

Запуск Excel из Access происходит строго периодически - через раз происходит сбой

09.09.2015, 10:20. Просмотров 803. Ответов 2
Метки нет (Все метки)

запуск Excell из Access происходит строго периодически - через раз. происходит сбой. После сбоя прложение выполняется нормально, затем опять сбой. при сбое жалобы на провал метода Cells( в Access). Подскажите причину
Visual Basic
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
32
33
34
35
Public Sub GruopRes()
    Dim I%, J%, N%, M%
    Dim XL As New Excel.Application
    Dim Book1
        
        XL.Visible = True
        Set Book1 = XL.Workbooks.Add
 
        Set CRS = CDB.OpenRecordset("ãðóïïГ*", dbOpenDynaset)
        
        N = 4
        M = 0
        
        With CRS
            .MoveFirst
            Do
               For I = 0 To 42
                  XL.Range(Cells(4 + M, I + 3), Cells(4 + M, I + 3)).Value = .Fields(7 + I)
               Next
               
               XL.Cells(N + M, 46).Value = .Fields(0)
               XL.Cells(N + M, 47).Value = .Fields(0)
               XL.Cells(N + M, 48).Value = .Fields(0)
               XL.Cells(N + M, 49).Value = .Fields(0)
               XL.Cells(N + M, 50).Value = .Fields(0)
               XL.Cells(N + M, 51).Value = .Fields(0)
               .MoveNext
               M = M + 1
            Loop While .EOF = False
           
           
        End With
        CRS.Close
        Set XL = Nothing
End Sub
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
09.09.2015, 10:20
Ответы с готовыми решениями:

Запуск Excel 2010 происходит через Excel 2003
Всем привет! У меня есть кнопка, при нажатии на которую открывается...

Периодически происходит самопроизвольный запуск браузера (Opera) и открывается страница с рекламой
Здравствуйте, появилась проблема. Периодически происходит самопроизвольный...

Периодически происходит самопроизвольный запуск браузера и открывается страница с разной рекламой
Здравствуйте, помогите пожалуйста. Периодически происходит самопроизвольный...

Обработка сигнала происходит через раз
Доброго времени суток. У меня есть приложение, в котором пользователь создаёт...

Добавление метабокса (происходит сбой)
Всем привет! Подскажите, пожалуйста, как добавить второй метабокс? Один уже...

2
mobile
Эксперт MS Access
22638 / 12940 / 2662
Регистрация: 28.04.2012
Сообщений: 14,171
09.09.2015, 10:39 #2
Лучший ответ Сообщение было отмечено eu как решение

Решение

Есть причина для екселевских жалоб. В строке 18 у целлзов не указан апликейшен и если открыто более одной книги, то ексель будет в полной растерянности. Да и при одной открытой недоумение обеспечено. Надо задать целлзам предка
Visual Basic
1
XL.Range(XL.Cells(4 + M, I + 3), XL.Cells(4 + M, I + 3)).Value = .Fields(7 + I)
1
eu
2 / 2 / 0
Регистрация: 22.01.2015
Сообщений: 29
09.09.2015, 12:17  [ТС] #3
Спасибо! пошло
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
09.09.2015, 12:17

При запуске ОС windows 7 происходит сбой системы
здравствуйте, помогите пожалуйста, при запуске ОС windows 7 происходит сбой...

Не устанавливается AutoCAD: в процессе установки происходит сбой
При установке AutoCAD 2012 ( или AutoCAD 2011) устанавливается Microsoft Visual...

Периодически происходит разрыв соединения с интернетом
Периодически происходит разрыв соединения с интернетом/ в сети 4 компа, 1...


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

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

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