Форум программистов, компьютерный форум, киберфорум
Наши страницы
VBA
Войти
Регистрация
Восстановить пароль
 
Omirbekov
0 / 0 / 0
Регистрация: 13.10.2017
Сообщений: 4
1

Run-time error 91. Object variable or with block variable not set

13.10.2017, 07:44. Просмотров 374. Ответов 6
Метки нет (Все метки)

Добрый день!
Я оказался на новом месте, в макросах не разбираюсь совсем.
Возникает такая ошибка при попытке запуска макроса в Excel 2010.
Может кто то подсказать в чем состоит ошибка, что нужно сделать, чтобы исправить.
Заранее благодарю!

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Public Sub GetSettings()
 
    Dim i As Long, j As Long, helpSheet As Object, numberOfDaysCollection As Collection, formulasSheet As Object
    Dim numberOfDays As Variant, mainSheet As Object, tmpKey As Variant, tmpFormula As String
    Dim settingsSheet As Object, holidaysSheet As Object, regEx As New RegExp, allMatches As Object
 
    Set sheetSettings = New Settings
    sheetSettings.changeLock = False
    
    
    Set mainSheet = ThisWorkbook.Sheets("Свод")
    With mainSheet
       sheetSettings.headerRow = .Columns(1).Find(What:="<=^", LookIn:=xlFormulas).Row (ТУТ ОШИБКА)
        sheetSettings.firstRow = sheetSettings.headerRow + 2
    
        For i = 1 To .Cells(sheetSettings.headerRow, .Columns.Count).End(xlToLeft).Column
            If .Cells(sheetSettings.headerRow, i).Value <> "" Then sheetSettings.mainColumns.Add .Cells(sheetSettings.headerRow, i).Value, GetColumnLetter(i)
    Next
    End With
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
13.10.2017, 07:44
Ответы с готовыми решениями:

Run time error 91: Object variable or With block variable not set
Здравствуйте, помогите пожалуйста исправить ошибку в макросе. Вот код: Sub...

Run time error 91: Object variable or With block variable not set (не могу найти ошибку)
Уважаемые форумчане! Пожалуйста посмотрите файл. Подскажите в чем ошибка. В...

ошибка "Run-time error '91': Object variable or With block variable not set"
приветствую! имеется документ на нескольких листах, заполняется по дням...

Ошибка Run-time error '91': Object varialble or With block variable not set
Добрый день. При скрытии одной из форм возникает данная ошибка. Дебаг...

Run-time error '91': Oject variable or with block variable not set
Всем доброго! Есть такая задача: В глобальном модуле Public myRange As...

6
Vlad999
2860 / 1761 / 527
Регистрация: 02.11.2012
Сообщений: 4,406
13.10.2017, 08:20 2
он не находит предложенный вариант.
чтобы не было ошибки обычно поиск делают так
Visual Basic
1
2
3
4
Dim Fn as Range
Set Fn = .Columns(1).Find(What:="<=^", LookIn:=xlFormulas)
If Not Fn Is Nothing Then
    sheetSettings.headerRow = Fn.Row
П.С. оформляйте код тегом, в окне сообщения кнопка VB или #
0
Omirbekov
0 / 0 / 0
Регистрация: 13.10.2017
Сообщений: 4
13.10.2017, 08:29  [ТС] 3
Благодарю за оперативный ответ, Влад!
Не работает. Или я не туда вставляю. Необходимо ли где то описать Fn как переменую?
0
Vlad999
2860 / 1761 / 527
Регистрация: 02.11.2012
Сообщений: 4,406
13.10.2017, 08:42 4
описание добавил в код но вы похоже скопировали его раньше. Если у вас есть строчка Option Explicit (самая первая строчка до кодов) то все переменные нужно объявлять, если нет то не обязательно.
файл пример показываем.
0
Omirbekov
0 / 0 / 0
Регистрация: 13.10.2017
Сообщений: 4
13.10.2017, 09:02  [ТС] 5
Благодарю за помощь, Влад!
0
Hugo121
6309 / 2403 / 411
Регистрация: 19.10.2012
Сообщений: 7,127
13.10.2017, 09:28 6
Цитата Сообщение от Omirbekov Посмотреть сообщение
Set sheetSettings = New Settings
- что за New Settings? Библиотека подключена? Я правда не в курсе какая нужна...
0
Omirbekov
0 / 0 / 0
Регистрация: 13.10.2017
Сообщений: 4
13.10.2017, 10:03  [ТС] 7
Не могу знать, пока далек от VBA
0
13.10.2017, 10:03
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
13.10.2017, 10:03

Неизвестная ошибка ExcellVBA ACCESS: Run-time error '91' Object varible or With block variable not set
Есть программа код ниже она обращается к данным в ACCESS выдает ошибку...

В момент закрытия формы выводится сообщение "Run-time error '91' Object variable or With-block not set"
Программа запускается - работает - выводит форму. Потом нажимаю крестик на...

Создание класса и ошибка 'object variable or with block variable not set'
Всем привет! Почему когда описываешь класс вот так: Dim a, b, c As...


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

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

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