Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.67/9: Рейтинг темы: голосов - 9, средняя оценка - 4.67
18 / 20 / 2
Регистрация: 04.03.2017
Сообщений: 199

Ошибка 424 при написании макроса Excel

28.07.2018, 10:38. Показов 1962. Ответов 14
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Доброго времени суток, форумчане! Столкнулся с такой проблемой, хочу написать кнопку для открытия формы, но макрос не читается. Выскакивает ошибка 424, то есть как будто VBA её (форму) не может найти. Помогите пожалуйства
Вложения
Тип файла: xlsx Лист Microsoft Excel.xlsx (21.0 Кб, 8 просмотров)
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
28.07.2018, 10:38
Ответы с готовыми решениями:

Ошибка 424 в процедуре макроса
В макросе есть повторяющиеся действия, форматирование страницы, добавление подписей с учетом что на последней странице должна быть минимум...

Ошибка при запуске макроса в MS Excel 2007 "Subscript out of range"
Ошибка такая: Subscript out of range Наверняка ошибка в коде: Sub Las() Dim middle(1 To 10) As Single Dim mas(1 To 10, 1 To 2) As...

Ошибка 424 при работе с БД. Исправить код
Dim db As Database Set db = CurrentDb Dim rstSells As DAO.Recordset Dim rstPhone As DAO.Recordset Dim rstCheck As DAO.Recordset ...

14
18 / 20 / 2
Регистрация: 04.03.2017
Сообщений: 199
28.07.2018, 10:46  [ТС]
не то вложение вставил. Вот то-->
Вложения
Тип файла: rar Лист.rar (17.2 Кб, 8 просмотров)
0
oh my god
 Аватар для fever brain
1456 / 796 / 161
Регистрация: 05.01.2016
Сообщений: 2,307
Записей в блоге: 8
28.07.2018, 10:47
Лучший ответ Сообщение было отмечено ГарриНаФеррари как решение

Решение

У вас почемуто ничего не работает, проверьте всю установку и клаву тоже проверьте, если это работает только у вас
значит нужно переподключить компоненты
1
18 / 20 / 2
Регистрация: 04.03.2017
Сообщений: 199
28.07.2018, 11:00  [ТС]
fever brain, скажите пожалуйста, а как проверить всю установку? просто переустановить?
0
oh my god
 Аватар для fever brain
1456 / 796 / 161
Регистрация: 05.01.2016
Сообщений: 2,307
Записей в блоге: 8
28.07.2018, 11:05
Лучший ответ Сообщение было отмечено ГарриНаФеррари как решение

Решение

Цитата Сообщение от ГарриНаФеррари Посмотреть сообщение
просто переустановить?
Не надо ))
у меня еще не были зареганны ваши устройства, пойду смотреть позже отпишусь обещаю
1
18 / 20 / 2
Регистрация: 04.03.2017
Сообщений: 199
28.07.2018, 11:16  [ТС]
fever brain, Очень надеюсь на Вас)) Нужно за выходные разобраться в VBA Excel (я раньше для Access его использовал), а тут такое..((
0
 Аватар для Alex77755
11525 / 3812 / 683
Регистрация: 13.02.2009
Сообщений: 11,229
28.07.2018, 11:23
Лучший ответ Сообщение было отмечено ГарриНаФеррари как решение

Решение

ГарриНаФеррари, не соответствует имя формы
MyFirstForm <> MyFirtsForm
скопируй имя формы

Добавлено через 1 минуту
и процедура не та назначена кнопке
1
18 / 20 / 2
Регистрация: 04.03.2017
Сообщений: 199
28.07.2018, 11:30  [ТС]
Alex77755, Скажите пожалуйста, а почему такая ерунда получается?? Я раньше VBA только для Access использовать, там даже реестр автоматически менялся, а тут такая лажа((

Добавлено через 41 секунду
Alex77755, по поводу процедуры, это да, мой косячок))
0
 Аватар для Alex77755
11525 / 3812 / 683
Регистрация: 13.02.2009
Сообщений: 11,229
28.07.2018, 11:36
Лучший ответ Сообщение было отмечено ГарриНаФеррари как решение

Решение

реестр не менялся! Регистр
набери My и нажми Ctr+пробел и бейсик закончит слово правильно или предложит варианты если есть

Добавлено через 2 минуты
А в процедуре не мешало бы добавить проверку на заполненность исходных полей. И что в полях числа
Что бы не вылетали ошибки
1
18 / 20 / 2
Регистрация: 04.03.2017
Сообщений: 199
28.07.2018, 11:37  [ТС]
Alex77755, я то голову ломаю, почему он автоматом не подставляет)) а можно что бы ctrl+пробел автоматически нажималось?
0
Модератор
Эксперт MS Access
 Аватар для shanemac51
12231 / 5078 / 814
Регистрация: 07.08.2010
Сообщений: 14,934
Записей в блоге: 4
28.07.2018, 13:22
чем отличаются строки --найдите отличие

Visual Basic
1
2
3
4
5
Public Sub Start_Forms()
    
''    MyFirstForm.Show
      MyFirtsForm.Show
End Sub
1
oh my god
 Аватар для fever brain
1456 / 796 / 161
Регистрация: 05.01.2016
Сообщений: 2,307
Записей в блоге: 8
28.07.2018, 13:52
рэмом отличаются

Добавлено через 2 минуты
Visual Basic
1
2
3
Sub qwe()
    Rem porno_club
End Sub
0
 Аватар для Alex77755
11525 / 3812 / 683
Регистрация: 13.02.2009
Сообщений: 11,229
28.07.2018, 22:32
чем отличаются строки...
От перестановки букв в слове смысл не меняется.

По рзелульаттам илссеовадний одонго анлигйсокго унвиертисета, не иеемт занчнения, в кокам пряокде рсапожолены бкувы в солве. Галвоне, чотбы преавя и пслоендяя бквуы блыи на мсете. Осатьлыне бкувы мгоут селдовтаь в плоонм бсепоряке, все-рвано ткест чтаитсея без побрелм
0
15155 / 6428 / 1731
Регистрация: 24.09.2011
Сообщений: 9,999
28.07.2018, 22:51
Цитата Сообщение от Alex77755 Посмотреть сообщение
По рзелульаттам илссеовадний одонго анлигйсокго унвиертисета, не иеемт занчнения, в кокам пряокде рсапожолены бкувы в солве
Процитирую себя с другого форума.
Не совсем так. Я написал макрос в Ворде, который перемешивает буквы в словых выделенного текста, оставляя первую и последнюю букву на месте, и попробовал читать разные тексты после обработки. Важно не пробежать глазами текст до обработки, иначе глаз выхватывает смысл текста!
В коротких словах, до 6-7 букв, действительно, порядок не важен. Но более длинные слова уже приходится отгадывать. А если текст из неблизкой области (например философский текст для меня ), то смысл становится непонятен.
В приведенном примере, кстати, в длинных словах порядок букв все же не совсем случаен, большинство букв находятся на +/-2 позиции от исходной.
Вот этот текст после добросовестного перемешивания
По ретьтуаалззм ивеслодинасй огондо акойглнгсио утееснивитра, не имеет зеничаня, в коакм покрдяе рселожнпоаы бкувы в своле. Гованле, чобты прваея и песолдяня бкувы были на мстее. оынтсьлае бквуы моугт сатоевдль в пнлоом бкдсряепое, все-рвнао тескт часитетя без пбрлоем. Пчрониий эогто яялсевтя то, что мы не четиам кудажю букву по оеьнолдттси, а все своло цлекоим.
А вот другие тексты - попробуйте прочитать.
Кликните здесь для просмотра всего текста
Пврдаа, на стеве очень млао лдюей сотль сбаылх и ньеыерлитшенх, что у них нет дригух жлаиней, кморе тех, кроотые им пдювспыеират стсарти. У боивнштльса же есть орлыенеенпде сндужеия, кормытои они рювтувуссдокотя в рдяе своих пктооуспв. И хотя нркеедо эти сиднжуея ложны и даже оаннвсоы на нроетоыкх сттсярах, прджее пиибшодвех и оьсиовлбитшх влою, окадно, пьксоколу при остувтсити стсаетрй, орпееидишвлх эти суджинея, воля плаооржедт содвлаеть им, их мнжоо раатссиатвмрь как ее ссвебтоонне оиужре и сттиачь, что дшуи бвюыат беоле сиьмынли или боеле смлбаыи в зиоситсвмаи от того, нсаклькоо твредо они мгуот сдтвоеаль этим сияженудм и сирясьволтптоя ноывм стртасям пжоирооолпгтнвоо хертаарка. Однако есть бшьалоя рцниаза мжеду ринешямеи, вктюмщеаиыи из каогко-ниудбь лножгоо мнения, и ршиемеяни, ооснаннвыми ткльоо на паноизни иинтсы, пмооту что, елси сдотвелаь плонседим, мжноо быть уневыренм в том, что нгдикоа не птдиерся слаеотжь или раасиаквстья, а если сеаовлдть певырм, то вдгеса повятсляея соенлиаже и ркнсяаиае, кдога в них оанювируабжт зднлажбеуие.
Это серовненшо фоатчасстниеке пнеадсиетвлре, бдуто човелек сомг витыьвсзося над соивм жынтовим стосниоеям тьолко бадоалгря педрнивоию, стдовесйию "счевркеечсхвелоих" стсещув, богов, дуохв, гниеев, аоенглв. Раетсуезмя, чееовлк стал тем, что он етсь, не сметоаостьянло и не исениюлткльчо ткьоло через смогао сбея; ему блыа нунжа для этгоо пкредоджа диургх сщтусев. Но эти свещсута не были смырохрепврниди, врмажаебмоыои сзиянмдоаи, но были дтиеенымйьвстли, еетвтенмсынси сащумвтеси; не были стмеасувщи, сяитщмои над чеолковем, а блыи ему пнчндеиоы; в соамм длее, вщобое все то, что паедевидоржт чевоекла в его сньаленозотй и пзиьвнроолой дтеоьтснялеи (ведь обчыно ткиае дела тлоько и нзсвыютаая члечкеисмеови дмаели), вяискй балогй дар и пнорридый заодтак ниоаптлсысюся не свыше, а возиюкнат сизну, слваватюися не с выост, а патосорюджя из гибулн пиоррды.
Вложения
Тип файла: doc ShuffleLetters.doc (41.0 Кб, 4 просмотров)
1
 Аватар для Alex77755
11525 / 3812 / 683
Регистрация: 13.02.2009
Сообщений: 11,229
29.07.2018, 07:50
Всё-таки это мнение не одного человека:
По рзелульаттам илссеовадний одонго анлигйсокго унвиертисета
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
29.07.2018, 07:50
Помогаю со студенческими работами здесь

Ошибка 424 при поиске значения на листе
Доброго дня всем. Непойму что не так с кодом. Private Sub Knopka10_Click() ' Месячный_отчет Макрос Const ИмяЛиста1 As String...

424 ошибка в макросе при запуске VBS-скрипта
Добрый день! просьба помочь. В Outlook создал Макрос, который должен запускать test.vbs. Но выдает ошибку. ...

Ошибка 424 object required при заполнении ListBox
Начала вылезать ошибка вот в этом куске: Private Sub UserForm_Activate() ListBox1.AddItem &quot;Индекс группы&quot; ...

При написании функции в ячейке Excel из Access возникает #ИМЯ?
Бодрого времени суток уважаемые форумчане. Возник следующий вопрос: экспортирую некоторую таблицу из Access в Excel, далее в последнем...

Падает Excel при запуске макроса
Доброго времени суток, уважаемые гуру. Застрял на одном проекте. Пишу прогу на работу для себя. Всё близилось к финалу и... уже неделю...


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

Или воспользуйтесь поиском по форуму:
15
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами
8Observer8 20.02.2026
Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .
Конвертировать закладки radiotray-ng в m3u-плейлист
damix 19.02.2026
Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .
Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI
Eddy_Em 18.02.2026
Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru