О создании диалога методом CreateUnoDialog

[juceser]

Не совсем понял ответ, как не прописан -

Код Выделить Развернуть

Option Explicit

REM Глобальные переменные
Global oSheet As Object 'Лист Табулирование

[juceser]

Но до листа выполнение еще даже не дошло.
Выполнился только макрос выполнения открытия формы.
И по кнопке вычислить на этапе задания переменной все рубится.
Не дошли еще до листа.

[bigor]

Но до листа выполнение еще даже не дошло.

у меня при нажатии Вычислить ошибка на этой строке

[juceser]

Нет, у меня раньше - на строке -

xn = oNumericXnModel.Value

Можно ваш файл?

[juceser]

Как снимок здесь не понимаю вставить.

[sokol92]

Поскольку версии файла расползаются, предлагаю стандартную схему:

1. Прилагается файл.
2. Описываются действия, приводящих к проблеме.

Вставка рисунков (насколько я помню  ) производится обычным образом (так же, как вложений).

[juceser]

Нажимаем Табулирование на последнем листе.
Возникает форма. Нажимаем Вычислить - возникает ошибка.

Файл и ошибку прикладываю.

Версия программы -

Version: 25.2.1.2 (X86_64) / LibreOffice Community
Build ID: d3abf4aee5fd705e4a92bba33a32f40bc4e56f49
CPU threads: 12; OS: Windows 10 X86_64 (10.0 build 19045); UI render: Skia/Raster; VCL: win
Locale: ru-RU (ru_RU); UI: ru-RU

Calc: threadedРабота5.ods

ошибка

[juceser]

Вставил, скриншот, вероятно, отправил нестандартным образом, через ссылку на файлобменник.

[bigor]

Вычислить - возникает ошибка.

ваша кнопка, на мой взгляд, настроена на макрос в приложении, а не в документе. Если я ее перенастраиваю на макрос документа, то ошибка вылетает там где я ранее указал

[sokol92]

1. Измените шапку обработчика на

Sub OKClick(oEvent)

(параметр - ссылка на событие).

Переназначьте макрос обработки кнопки "Вычислить".

2. Ошибка возникает при обращении к переменной oSheet. Эта переменная нигде не присваивается (см. сообщения выше).

[juceser]

Да, верно, теперь ошибка возникла на том же месте, что у Вас.

[juceser]

Добавил, поменял ссылку, добавил задание переменной, опять в старом месте ошибку получил.

Задал переменную листа как oSheet = ThisComponent.Sheets(1)

ошибка

Работа5.ods

[juceser]

Теперь даже форма не появляется.

Стоп. Съехало назначение на кнопке на листе на запуск кнопки Вычислить.
Исправил.
Форма открылась, ошибки теперь нет при нажатии Вычислить.

Визуально на листе ничего не заполняется. Если снять галку с циклов, то ошибки тоже нет.

Буду дальше копать.

[juceser]

Последняя версия.

Работа5.ods

[bigor]

Последняя версия.

у вас опять кнопка вычислить запускаем макрос приложения. Макрос документа теперь вылетает на 148 строке, из-за, как писал выше,  oCheckForNextModel.State. Если ее закомментировать, то что-то даже считает на листе