Форум программистов, компьютерный форум, киберфорум
Наши страницы

VBA

Войти
Регистрация
Восстановить пароль
 
Zvuk9
0 / 0 / 0
Регистрация: 07.01.2016
Сообщений: 49
#1

Заполнение ячеек - VBA

13.06.2017, 17:30. Просмотров 115. Ответов 1
Метки нет (Все метки)

Отлавливаю ошибку и нужно реализовать такую последовательность:если хоть одна ячейка заполнена,то не выводим MsgBox,а если не заполнена не одна,то выводим:
Visual Basic
1
2
3
4
5
6
7
8
Private Sub Worksheet_Change(ByVal Target As Range)
Dim a As Long, chislo As Long, i As Long, del As String
On Error GoTo Message
'тело процедуры
Exit Sub
Message:
MsgBox "Введите число!", vbOKOnly + vbExclamation, "Ошибка!"
End Sub
Когда я ввожу значение в любую ячейку,то после ввода и обработки его все равно выводится MsgBox,а мне надо только,чтобы выводилось,когда ячейки все пустые.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
13.06.2017, 17:30
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Заполнение ячеек (VBA):

Заполнение ячеек - VBA
Здравия, форум! Нужна помощь в экселе, я в бейсике полный ноль, так что заранее извините. Вобщем нужен макрос, который будет заполнять...

Заполнение диапазона ячеек - VBA
Еще вопрос. Запросите у пользователя диапазон ячеек и заполните его случайными символами. Программа должна запускаться по нажатии на...

Заполнение ячеек из массива - VBA
Доброго времени суток! Помогите разобраться. Я понимаю код корявый, но надо взять значения из диапазона, равные значениям в ComboBox,...

Заполнение диапазона ячеек - VBA
Запросите у пользователя диапазон ячеек и заполните его случайными цифрами от 0 до 50. Программа должна запускаться по нажатии на кнопку,...

Нужно автоматизировать заполнение ячеек - VBA
Прошу помощи в написании макроса. Имеется два столбца A,B В этих столбцах имеются данные 405 10 - -...

Заполнение ячеек по нажатию на кнопку - VBA
Здравствуйте! Помогите, пожалуйста, исправить мой код.. Эта функция вызывается при нажатии на кнопку. И должна на лист "Чеки" заполнить...

1
nodirstein
25 / 25 / 8
Регистрация: 12.04.2015
Сообщений: 75
14.06.2017, 08:50 #2
Цитата Сообщение от Zvuk9 Посмотреть сообщение
Когда я ввожу значение в любую ячейку,то после ввода и обработки его все равно выводится MsgBox,а мне надо только,чтобы выводилось,когда ячейки все пустые.
Может так?

Visual Basic
1
2
3
4
5
6
7
8
Private Sub Worksheet_Change(ByVal Target As Range)
    Dim a As Long, chislo As Long, i As Long, del As String
    If Target.Value = "" Then GoTo Message
        'тело процедуры
        Exit Sub
Message:
    MsgBox "Введите число!", vbOKOnly + vbExclamation, "Ошибка!"
End Sub
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
14.06.2017, 08:50
Привет! Вот еще темы с ответами:

Автоматическое заполнение ячеек матрицы - VBA
Помогите написать код программы, чтобы при нажатии на кнопку автоматически выбиралась размерность матрицы (от 2x2 до 9x9), а также...

Заполнение ячеек по нескольким условиям - VBA
Приветствую! Возникла необходимость решения одной, думаю достаточно неординарной, задачи. Сам как не пробовал, так ни к чему не пришел. ...

Заполнение ячеек случайными числами - VBA
Поскажите пожалуйсто, каким самым простым способом можно забить ячейки случайными числами? К примеру, заполнить 50 ячеек (А1:Е10).

Заполнение заданого количества ячеек - VBA
Ребятушки, Ich brauche Hilfe, как говорят немцы) Нужно мне чтобы прога брала число из колонки G и копировала его в столько ячеек...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.