19.03.2020, 18:05 | #1 (permalink) |
Member
Регистрация: 01.02.2008
Сообщений: 300
Сказал(а) спасибо: 0
Поблагодарили 1 раз в 1 сообщении
Репутация: 252
|
VBA - Goto на номер строки
По работе хочу небольшой макрос на экселе написать Можете подсказать почему "GoTo myRange" не идет на нужную строку и выдает "Label not defined". Спасибо! Sub Macro1() Dim myRange As Integer Dim myArray As Variant For myRange = 1 To 16 GoTo myRange 20 функция next i Goto 40 1 myArray = Array("10115160", "10115170", "10115171", "10115172") GoTo 20 2 myArray = Array("10201010", "10201030", "10201050") GoTo 20 3 myArray = Array("10201090") GoTo 20 4 myArray = Array("20113040", "20113060", "20113070", "20129030") GoTo 20 итд до 16... 40 End Sub |
19.03.2020, 18:05 | |
Helpmaster
Member
Регистрация: 08.03.2016
Сообщений: 0
|
Почитайте, возможно найдете нужный ответ Строки Строки GOTO - блокировщик экрана Вконтакте. Введите номер Вашего телефона. Номер телефона: +7 |
19.03.2020, 23:07 | #4 (permalink) | |
VIP user
Регистрация: 15.01.2014
Сообщений: 1,828
Сказал(а) спасибо: 242
Поблагодарили 15 раз(а) в 11 сообщениях
Репутация: 26010
|
Мне кажется, что нет.:
Цитата:
|
|
20.03.2020, 12:18 | #5 (permalink) |
Member
Регистрация: 01.02.2008
Сообщений: 300
Сказал(а) спасибо: 0
Поблагодарили 1 раз в 1 сообщении
Репутация: 252
|
Я тоже не нашел почему, пришлось поменять код, коротко внизу. Пришлось вынуть основную функцию как отдельный саб, и выполнять ее каждый раз при новом значении переменного. работает.
Если будут новости по Goto интересно будет знать. Спасибо! sub мой_макрос myArray = Array("10115160", "10115170", "10115171", "10115172") call функция(myArray) myArray = Array("10201010", "10201030", "10201050") call функция(myArray) myArray = Array("10201090") call функция(myArray) итд... end sub sub функция(array1) функция end sub |
Ads | |
Member
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
|
22.03.2020, 21:45 | #6 (permalink) |
support
Регистрация: 19.08.2007
Адрес: Зея
Сообщений: 15,797
Записей в дневнике: 71
Сказал(а) спасибо: 166
Поблагодарили 203 раз(а) в 86 сообщениях
Репутация: 75760
|
Имя массива не может служить меткой для оператора безусловного перехода.
__________________
Убить всех человеков! |
22.03.2020, 21:46 | #7 (permalink) |
Хозяин Медной Горы
Регистрация: 01.08.2011
Адрес: Армавир
Сообщений: 12,159
Записей в дневнике: 8
Сказал(а) спасибо: 751
Поблагодарили 88 раз(а) в 27 сообщениях
Репутация: 57416
|
Блин, Алекс ты второй Сахаров
|
Ads | |
Member
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
|
|
|