Ошибка при работе с Excel

@akrufar · Регистрация: 19.05.2016

Студворк — интернет-сервис помощи студентам

Определяю количество занятых ячеек (ячеек с информацией) в столбце файл-Excel, точнее номер последнего занятого столбца. При выполнении следующей команды:

C++
1
2
3
4
5
   //Активация последней известной ячейки
   v_Var_Sheet.OlePropertyGet("Cells").OlePropertyGet("SpecialCells", 11).OleProcedure("Activate");
 
   //Узнать номер последнего известного столбца
   int i_ColLast = v_Var_Excel.OlePropertyGet("ActiveCell").OlePropertyGet("Column");

возникает ошибка при выполнении первой строки, если лист в Excel защищен. На незащищенном листе все нормально. Что делаю не так? может есть другой метод?

@vxg · 21.05.2016, 20:20

Сообщение от akrufar

Что делаю не так?

то что вы делаете дает ли эксель сделать руками? дает ли он это сделать в макросе на вба? если нет - очевидно это нельзя сделать.

@akrufar · 21.05.2016, 20:23 **[ТС]**

Да, дает. Проверял. Код:
ActiveCell.SpecialCells(xlLastCell).Sele ct

Пробовал вместо Activate писать Select. Тоже не помогло

@vxg · 21.05.2016, 20:32

akrufar, руками дает а в вба нет? может вы в вба пишите не то что делаете руками? через запись макроса пробовали?

@akrufar · 21.05.2016, 20:37 **[ТС]**

Сообщение от vxg

akrufar, руками дает а в вба нет? может вы в вба пишите не то что делаете руками? через запись макроса пробовали?

Да, через макросы дает. И руками тоже дает (ctrl+end). Все получается. А через Си не дает

Код VBA как раз из макроса скопировал (ActiveCell.SpecialCells(xlLastCell).Sel ect)

@vxg · 21.05.2016, 20:45

Сообщение от akrufar

Код VBA как раз из макроса скопировал

ничуть ваш код на этот код не похож. по идее там

C++
1
v_Var_Excel.OlePropertyGet("ActiveCell").OleFunction("SpecialCells", xlLastCell /*надо глядеть какое это число*/).OleProcedure/*а может функция надо глядеть*/("Select")

@akrufar · 21.05.2016, 20:50 **[ТС]**

xlLastCell = 11. OleProcedure("Select") пробовал, разницы нет.

@vxg · 21.05.2016, 20:52

Сообщение от akrufar

разницы нет

а как с первым куском? у вас там не активцелл а просто целлс

@akrufar · 21.05.2016, 20:58 **[ТС]**

Сообщение от vxg

а как с первым куском? у вас там не активцелл а просто целлс

Тогда билдер ругается и говорит EOleSysError with message "Неизвестное имя" и указывает на эту строку

@vxg · 21.05.2016, 21:06

akrufar, очевидно вы не у того объекта её запрашиваете - вот во второй строке он же не ругается?

@akrufar · 21.05.2016, 21:11 **[ТС]**

Разобрался, надо немного исправить код на такой:

C++
1
2
v_Var_Excel.OlePropertyGet("ActiveCell").OlePropertyGet("SpecialCells", 11).
      OleProcedure("Select");

Тогда все запускается, но с защищенным листом все также, не работает:
EOleSysError with message "Ошибка"

Добавлено через 2 минуты
А еще вот на этой строке стопорится и стрелку показывает при выводе этой ошибки:

C++
1
return OlePropertyGet(name, static_cast<TAutoArgsBase*>(&args));

@vxg · 21.05.2016, 21:33

akrufar, если работает в вба то работает и тут иного сложно представить спешиалцелл это точно свойство-массив или функция?

@akrufar · 21.05.2016, 21:38 **[ТС]**

Сообщение от vxg

akrufar, если работает в вба то работает и тут иного сложно представить

Самое интересное, что оно работает на простых листах, но не на защищенных.

Сообщение от vxg

спешиалцелл это точно свойство-массив или функция?

Вот этот вопрос я не понял. В VBA я не силен. Начинающий. Вычитал, что ActiveCell возвращает диапазон ячеек. А судя по тому как макрос работает SpecialCells с 11 кодом выдает только одну ячейку.

@vxg · 21.05.2016, 21:52

akrufar, нажмите в вба ф2 полазайте по его объектам. Если вызовы одинаковые то действие кода вба должно быть таким же как на C++ - там чудес нет и скрытых тайн

@akrufar · 22.05.2016, 15:48 **[ТС]**

А можете данный код запустить у себя на машине? Используя файл с защищенным листом. может опять проблема на стороне моей среды разработки?

@vxg · 22.05.2016, 21:18

akrufar, у меня макрос вба при попытке исполнить ваш код на защищённом листе говорит что этого на таких листах делать нельзя

@akrufar · 23.05.2016, 08:09 **[ТС]**

Сообщение от vxg

akrufar, у меня макрос вба при попытке исполнить ваш код на защищённом листе говорит что этого на таких листах делать нельзя

Странно. У меня свободно исполняет.
А есть тогда другой метод вычислить последнюю занятую строку и столбец в Excel на защищенном листе?

@vxg · 23.05.2016, 09:48

Сообщение от akrufar

А есть тогда другой метод вычислить последнюю занятую строку и столбец в Excel на защищенном листе?

к своему огорчению за вас нашел этот метод в первой же строке поиска в гугл

Visual Basic
1
Cells(Rows.Count, 1).End(xlUp).Row

@akrufar · 23.05.2016, 10:01 **[ТС]**

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

@vxg · 23.05.2016, 10:21

Сообщение от akrufar

Недостаток в том, что надо явно указывать номер столбца

логика подсказывает что вы должны его знать или у вас документ неустановленной формы который распознает нейросеть)? тогда перебирайте все ячейки на листе) по ссылке прямо сказано что тот способ который вы применяли ранее не работает на защищенных листах

Новые блоги и статьи Все статьи Все блоги /
Символические и жёсткие ссылки в Linux. algri14 15.03.2026 Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это дополнительная запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая. . .	[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ФедосеевПавел 14.03.2026 Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .	делаю науч статью по влиянию грибов на сукцессию anaschu 13.03.2026 прикрепляю статью	SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .	Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .	Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .	Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .

@akrufar 91 / 3 / 2 Регистрация: 19.05.2016 Сообщений: 38
	21.05.2016, 20:23 [ТС]
	Да, дает. Проверял. Код: ActiveCell.SpecialCells(xlLastCell).Sele ct Пробовал вместо Activate писать Select. Тоже не помогло 0

@vxg Модератор 3409 / 2180 / 354 Регистрация: 13.01.2012 Сообщений: 8,461
	21.05.2016, 20:32
	akrufar, руками дает а в вба нет? может вы в вба пишите не то что делаете руками? через запись макроса пробовали? 0

@akrufar 91 / 3 / 2 Регистрация: 19.05.2016 Сообщений: 38
	21.05.2016, 20:50 [ТС]
	xlLastCell = 11. OleProcedure("Select") пробовал, разницы нет. 0

@vxg Модератор 3409 / 2180 / 354 Регистрация: 13.01.2012 Сообщений: 8,461
	21.05.2016, 21:06
	akrufar, очевидно вы не у того объекта её запрашиваете - вот во второй строке он же не ругается? 0

@vxg Модератор 3409 / 2180 / 354 Регистрация: 13.01.2012 Сообщений: 8,461
	21.05.2016, 21:33
	akrufar, если работает в вба то работает и тут иного сложно представить спешиалцелл это точно свойство-массив или функция? 0

@vxg Модератор 3409 / 2180 / 354 Регистрация: 13.01.2012 Сообщений: 8,461
	21.05.2016, 21:52
	akrufar, нажмите в вба ф2 полазайте по его объектам. Если вызовы одинаковые то действие кода вба должно быть таким же как на C++ - там чудес нет и скрытых тайн 0

@akrufar 91 / 3 / 2 Регистрация: 19.05.2016 Сообщений: 38
	22.05.2016, 15:48 [ТС]
	А можете данный код запустить у себя на машине? Используя файл с защищенным листом. может опять проблема на стороне моей среды разработки? 0

@vxg Модератор 3409 / 2180 / 354 Регистрация: 13.01.2012 Сообщений: 8,461
	22.05.2016, 21:18
	akrufar, у меня макрос вба при попытке исполнить ваш код на защищённом листе говорит что этого на таких листах делать нельзя 0

@akrufar 91 / 3 / 2 Регистрация: 19.05.2016 Сообщений: 38
	23.05.2016, 10:01 [ТС]
	Недостаток в том, что надо явно указывать номер столбца, придется перебирать каждый отдельно. Так что не подходит. попробую другие методы 0