Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Проверка на пустое значение и исключение - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Проверка на пустое значение и исключение (Макросы/Sub)
Проверка на пустое значение и исключение
markrobinsonreg Дата: Вторник, 07.06.2022, 18:20 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 1
Репутация: 0 ±
Замечаний: 20% ±

Есть задание по работе.

n1 = Cells(1,1) '1
n2 = Cells(1,2) ' 2
n3 = Cells(1,3)' 3
n4 = Cells(1,4) ' 4
n5 = Cells(1,5) ' 5
n6 = Cells(1,6) ' 6
n7 = Cells(1,7) ' 7
n8 = Cells(1,8) ' 8
n9 = Cells(1,9) ' 9
n10 = Cells(1,10) ' 10
n11 = Cells(1,11) ' 11
n12 = Cells(1,12) '12

s = n1 & "," & n2 & "," & n3 & "," & n4 & "," & n5 & n"," & 6 & "," & n7 & "," & n8 & "," & n9 & "," & n10 & "," & n11 & "," & n12 &

'Если одно из n будет пустое то будет типо такого 1,,3,4,5,,7,8,9,10,11,12 - не хотелось бы чтоб было так
'Хотелось бы чтобы пустые n не учитывались и было так: 1,3,4,5,7,10,11,12
'Поэтому я начал писать код для проверок на пустое не пустое. Если значение пустое оно не выводится в строку.
'Проверок слишком много получается,примерно 544 строк кода и 144 проверки т.к. вариантов развития события 12 и по экспоненте будет 144 if.

'Вопрос:
'Как мне упростить и уменьшить кол-во строк кода? Есть ли у кого нибудь решение,сталкивался кто с таким?

'Заранее спасибо за ответ!
 
Ответить
СообщениеЕсть задание по работе.

n1 = Cells(1,1) '1
n2 = Cells(1,2) ' 2
n3 = Cells(1,3)' 3
n4 = Cells(1,4) ' 4
n5 = Cells(1,5) ' 5
n6 = Cells(1,6) ' 6
n7 = Cells(1,7) ' 7
n8 = Cells(1,8) ' 8
n9 = Cells(1,9) ' 9
n10 = Cells(1,10) ' 10
n11 = Cells(1,11) ' 11
n12 = Cells(1,12) '12

s = n1 & "," & n2 & "," & n3 & "," & n4 & "," & n5 & n"," & 6 & "," & n7 & "," & n8 & "," & n9 & "," & n10 & "," & n11 & "," & n12 &

'Если одно из n будет пустое то будет типо такого 1,,3,4,5,,7,8,9,10,11,12 - не хотелось бы чтоб было так
'Хотелось бы чтобы пустые n не учитывались и было так: 1,3,4,5,7,10,11,12
'Поэтому я начал писать код для проверок на пустое не пустое. Если значение пустое оно не выводится в строку.
'Проверок слишком много получается,примерно 544 строк кода и 144 проверки т.к. вариантов развития события 12 и по экспоненте будет 144 if.

'Вопрос:
'Как мне упростить и уменьшить кол-во строк кода? Есть ли у кого нибудь решение,сталкивался кто с таким?

'Заранее спасибо за ответ!

Автор - markrobinsonreg
Дата добавления - 07.06.2022 в 18:20
and_evg Дата: Среда, 08.06.2022, 06:21 | Сообщение № 2
Группа: Проверенные
Ранг: Обитатель
Сообщений: 405
Репутация: 70 ±
Замечаний: 0% ±

Excel 2007
И вам доброе утро.
Покажите файл
 
Ответить
СообщениеИ вам доброе утро.
Покажите файл

Автор - and_evg
Дата добавления - 08.06.2022 в 06:21
Nic70y Дата: Среда, 08.06.2022, 09:03 | Сообщение № 3
Группа: Друзья
Ранг: Экселист
Сообщений: 7567
Репутация: 1809 ±
Замечаний: 0% ±

Excel 2010
Покажите файл
ну тут такое...
а вот код без тегов,
а модераторы у нас злые.
ответ уже есть.
жду оформления кода тегами.


ЮMoney 41001841029809
 
Ответить
Сообщение
Покажите файл
ну тут такое...
а вот код без тегов,
а модераторы у нас злые.
ответ уже есть.
жду оформления кода тегами.

Автор - Nic70y
Дата добавления - 08.06.2022 в 09:03
китин Дата: Среда, 08.06.2022, 09:12 | Сообщение № 4
Группа: Модераторы
Ранг: Экселист
Сообщений: 6853
Репутация: 1050 ±
Замечаний: 0% ±

Excel 2007;2010;2016
а модераторы у нас злые.

[offtop]неправдочка ваша. мы очень добрые. но тему закрыть можем просто влёт


Не судите очень строго:я пытаюсь научиться
ЯД 41001877306852
 
Ответить
Сообщение
а модераторы у нас злые.

[offtop]неправдочка ваша. мы очень добрые. но тему закрыть можем просто влёт

Автор - китин
Дата добавления - 08.06.2022 в 09:12
китин Дата: Среда, 08.06.2022, 09:12 | Сообщение № 5
Группа: Модераторы
Ранг: Экселист
Сообщений: 6853
Репутация: 1050 ±
Замечаний: 0% ±

Excel 2007;2010;2016
markrobinsonreg, - Прочитайте Правила форума
- Приложите файл с исходными данными и желаемым результатом (можно вручную) в формате Excel размером до 500 кб согласно п.3 Правил форума
- Оформите код тегами (в режиме правки поста выделите код и нажмите кнопку #, пояснялка здесь)
Помогающим просьба воздержаться от ответов в этой теме до исправления замечания


Не судите очень строго:я пытаюсь научиться
ЯД 41001877306852
 
Ответить
Сообщениеmarkrobinsonreg, - Прочитайте Правила форума
- Приложите файл с исходными данными и желаемым результатом (можно вручную) в формате Excel размером до 500 кб согласно п.3 Правил форума
- Оформите код тегами (в режиме правки поста выделите код и нажмите кнопку #, пояснялка здесь)
Помогающим просьба воздержаться от ответов в этой теме до исправления замечания

Автор - китин
Дата добавления - 08.06.2022 в 09:12
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Проверка на пустое значение и исключение (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2022 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!