powered by simpleCommunicator - 2.0.54     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Не выполняется функция ...
25 сообщений из 30, страница 1 из 2
Не выполняется функция ...
    #37404883
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Приехали, мой друг Экспликит на месте, функция на месте, почему её не выполняет, код идёт дальше, может только по чётным, или перегрузить комп

Код: plaintext
1.
2.
3.
Dim Строка_таблицы_Word As String

    'выполнить функцию с именем ...
    Range_со_строки_или_ячейки_таблицы_Word Строка_таблицы_Word
...
Рейтинг: 0 / 0
Не выполняется функция ...
    #37404893
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ципихович Эндрю,

напоминаю, у тебя есть еще один друг - F8
...
Рейтинг: 0 / 0
Не выполняется функция ...
    #37404897
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Shocker.Pro, Эф8, это же пошагово, так я при помощи него и делаю, а без него я бы ни в жизнь не поверил, подумал-бы что что-то другое
...
Рейтинг: 0 / 0
Не выполняется функция ...
    #37404900
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
чудес не бывает
...
Рейтинг: 0 / 0
Не выполняется функция ...
    #37404909
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Shocker.Pro, ладно подчищу, выложу, удивляйтесь
...
Рейтинг: 0 / 0
Не выполняется функция ...
    #37405175
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
вот файл, там кнопка Сохранить документ под именем
Нажимая на неё появляется форма, там надо снять 2 чексбокса, например верхих н нажать тоже верхнюю кнопку сохранить и будет сообщение из которого понятно что функция не выполнена
...
Рейтинг: 0 / 0
Не выполняется функция ...
    #37405184
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ципихович Эндрю,

Проблема в том, что ты выгружаешь форму из памяти, а потом пытаешься из нее какие-то функции вызывать
...
Рейтинг: 0 / 0
Не выполняется функция ...
    #37405186
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Shocker.Pro, понял, спасибо
...
Рейтинг: 0 / 0
Не выполняется функция ...
    #37405187
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
догадаться, не видя всей конструкции, конечно, непросто.

просто нормальному человеку не придет в голову делать сначала Unload Me, а потом пытаться продолжать как ни в чем не бывало.
...
Рейтинг: 0 / 0
Не выполняется функция ...
    #37405192
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
а если выгружать форму позже она висит, не красиво, как сделать, чтобы кнопку нажали на форме и её выгрузить,но работать дальше??
...
Рейтинг: 0 / 0
Не выполняется функция ...
    #37405193
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Либо выгрузить, либо работать дальше!

Если мешает на экране, можешь сделать ее невидимой.
...
Рейтинг: 0 / 0
Не выполняется функция ...
    #37405209
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Shocker.Pro,
что сделать, чтобы передать с параметрами или она:Глобальная_переменная
была видна везде
???

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
Private Sub CommandButton1_Click()

'отключаем обновление - дёргание экрана при выполнении кода
    Application.ScreenUpdating = False

    If Me.CheckBox1.Value = True Then
    Глобальная_переменная =  1 
    ElseIf Me.CheckBox2.Value = True Then
    Глобальная_переменная =  2 
    End If

 'выгрузить, то есть скрыть и выгрузить из памяти  открытую форму
    Unload Me
    
    Application.Run "ThisDocument.Script"
       
    'отменяем отключение дёргания экрана при выполнении кода
    Application.ScreenUpdating = True

End Sub

если не получится, тогда придёт на помощь Вордовская Variables
...
Рейтинг: 0 / 0
Не выполняется функция ...
    #37405213
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
главное один раз пошло делать макрос в ТизДокумент и всё, упустил удачу
...
Рейтинг: 0 / 0
Не выполняется функция ...
    #37405217
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
сначала объясни, а зачем тебе вообще Application.Run? процедура в том же документе находится, разве нет?
...
Рейтинг: 0 / 0
Не выполняется функция ...
    #37405221
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Shocker.Pro, даже если я её делаю скрытой первой строкой кода она висит
и видима, хотя видно что дальше что то делается
Смысл формы, только собрать инфу от пользователя и отвалить, узнать колич. выбраных чекбоксов
Зачем Рун, потому что пробую по всякому
Форма и процедура в одном документе
...
Рейтинг: 0 / 0
Не выполняется функция ...
    #37405238
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Через Run проблема с передачей параметров, не раз уже обсуждалось, но это нужно только для того, чтобы вызвать процедуру из другого документа. А если все происходит в одном документе - то просто вызывай по имени, соответственно, и с параметрами процедур проблем не будет.
...
Рейтинг: 0 / 0
Не выполняется функция ...
    #37405258
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
чего-то не жуётся
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
Private Sub CommandButton1_Click()

'отключаем обновление - дёргание экрана при выполнении кода
    Application.ScreenUpdating = False

    If Me.CheckBox1.Value = True And Me.CheckBox2.Value = True Then
        Глобальная_переменная =  3 
    ElseIf Me.CheckBox1.Value = True Then
        Глобальная_переменная =  1 
    ElseIf Me.CheckBox2.Value = True Then
        Глобальная_переменная =  2 
    End If

    'выгрузить, то есть скрыть и выгрузить из памяти  открытую форму
    Unload Me
    
    Sub_Глобальная_переменная Глобальная_переменная
    
    'отменяем отключение дёргания экрана при выполнении кода
    Application.ScreenUpdating = True

End Sub

Что так, что добавлял Call Sub_Глобальная_переменная Глобальная_переменная
...
Рейтинг: 0 / 0
Не выполняется функция ...
    #37405274
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
покажи объявление процедуры, а также скажи, где она находится
...
Рейтинг: 0 / 0
Не выполняется функция ...
    #37405276
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ципихович Эндрюдаже если я её делаю скрытой первой строкой кода она висит
и видима, хотя видно что дальше что то делается
Код: plaintext
1.
'отключаем обновление - дёргание экрана при выполнении кода
    Application.ScreenUpdating = False
...
Рейтинг: 0 / 0
Не выполняется функция ...
    #37405279
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Shocker.Pro, процедура находится в файле, а достучаться до неё хочу с формы в этом же файле
Код: plaintext
1.
2.
3.
4.
5.
Sub Sub_Глобальная_переменная(Глобальная_переменная)

    Beep

  End Sub
...
Рейтинг: 0 / 0
Не выполняется функция ...
    #37405281
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Shocker.ProЦипихович Эндрюдаже если я её делаю скрытой первой строкой кода она висит
и видима, хотя видно что дальше что то делается
Код: plaintext
1.
'отключаем обновление - дёргание экрана при выполнении кода
    Application.ScreenUpdating = False


время не стоит на месте, ну пусть 2 я, какая разница
...
Рейтинг: 0 / 0
Не выполняется функция ...
    #37405285
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ципихович ЭндрюShocker.Pro, процедура находится в файле
Понятно, что не в тапке... Предположим, что в модуле.
Код: plaintext
1.
2.
3.
4.
5.
Public Sub Sub_Глобальная_переменная(Глобальная_переменная)

    Beep

  End Sub

Впрочем, это опять первые страницы учебника, а ты за за года никак не разберешься в областях видимости
...
Рейтинг: 0 / 0
Не выполняется функция ...
    #37405287
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ципихович ЭндрюShocker.Proпропущено...

Код: plaintext
1.
'отключаем обновление - дёргание экрана при выполнении кода
    Application.ScreenUpdating = False


время не стоит на месте, ну пусть 2 я, какая разница
вот ты тупишь. Я тебе указываю, что форма не исчезает с экрана, потому что ты запретил обновление экрана. Иди спать, уже второй идиотизм в одном топике
...
Рейтинг: 0 / 0
Не выполняется функция ...
    #37405291
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Shocker.Pro,

код кнопки на форме
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
Private Sub CommandButton1_Click()

'отключаем обновление - дёргание экрана при выполнении кода
    Application.ScreenUpdating = False

    If Me.CheckBox1.Value = True And Me.CheckBox2.Value = True Then
        Глобальная_переменная =  3 
    ElseIf Me.CheckBox1.Value = True Then
        Глобальная_переменная =  1 
    ElseIf Me.CheckBox2.Value = True Then
        Глобальная_переменная =  2 
    End If

    'выгрузить, то есть скрыть и выгрузить из памяти  открытую форму
    Unload Me
    
    Sub_Глобальная_переменная Глобальная_переменная
    
    'отменяем отключение дёргания экрана при выполнении кода
    Application.ScreenUpdating = True

End Sub

код в документе, в том же где и форма
Код: plaintext
1.
2.
3.
4.
Public Sub Sub_Глобальная_переменная(Глобальная_переменная)

    Beep

  End Sub
получаю на строке Sub_Глобальная_переменная Глобальная_переменная - функция не определена
...
Рейтинг: 0 / 0
Не выполняется функция ...
    #37405304
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ципихович Эндрюкод в документепросто в документе, на листе что ли?
...
Рейтинг: 0 / 0
25 сообщений из 30, страница 1 из 2
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Не выполняется функция ...
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]