Проверка на пустое значение и исключение

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Проверка на пустое значение и исключение (Макросы/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.

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

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

Ответить

and_evg

Дата: Среда, 08.06.2022, 06:21 | Сообщение № 2

Группа: Проверенные

Ранг: Обитатель

Сообщений: 465

Репутация: 79 ±

Замечаний: 0% ±

Excel 2007

И вам доброе утро.
Покажите файл

Ответить

Nic70y

Дата: Среда, 08.06.2022, 09:03 | Сообщение № 3

Группа: Друзья

Ранг: Экселист

Сообщений: 9005

Репутация: 2369 ±

Замечаний: 0% ±

Excel 2010

Цитата and_evg, 08.06.2022 в 06:21, в сообщении № 2 (

)

Покажите файл

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

ЮMoney 41001841029809

Ответить

китин

Дата: Среда, 08.06.2022, 09:12 | Сообщение № 4

Группа: Модераторы

Ранг: Экселист

Сообщений: 7029

Репутация: 1078 ±

Замечаний: 0% ±

Excel 2007;2010;2016

Цитата Nic70y, 08.06.2022 в 09:03, в сообщении № 3 (

)

а модераторы у нас злые.

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

Не судите очень строго:я пытаюсь научиться
ЯД 41001877306852

Ответить

китин

Дата: Среда, 08.06.2022, 09:12 | Сообщение № 5

Группа: Модераторы

Ранг: Экселист

Сообщений: 7029

Репутация: 1078 ±

Замечаний: 0% ±

Excel 2007;2010;2016

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

Не судите очень строго:я пытаюсь научиться
ЯД 41001877306852

Ответить

Проверка на пустое значение и исключение (Макросы/Sub)

Страница 1 из 1
1