Здравствуйте. Есть данные, рядом с которыми расположены поля с флажками. Если поставить флажок, то в жёлтом поле появится данные. В жёлтом поле к каждому флажку привязано то или иное слово.
Как сделать так, чтобы в жёлтом поле появлялись данные в том порядке, в котором были выбранны флажки и шли по порядку. от 1 до ......
Спасибо.
Здравствуйте. Есть данные, рядом с которыми расположены поля с флажками. Если поставить флажок, то в жёлтом поле появится данные. В жёлтом поле к каждому флажку привязано то или иное слово.
Как сделать так, чтобы в жёлтом поле появлялись данные в том порядке, в котором были выбранны флажки и шли по порядку. от 1 до ......
Зачем там флажки... Попробуйте, в модуль листа: [vba]
Код
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Intersect(Target, [b:B]) Is Nothing Then Exit Sub Cells(Rows.Count, 5).End(xlUp)(2).Value = Target Cancel = True End Sub
[/vba]По двойному клику вставляются значения.
Зачем там флажки... Попробуйте, в модуль листа: [vba]
Код
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Intersect(Target, [b:B]) Is Nothing Then Exit Sub Cells(Rows.Count, 5).End(xlUp)(2).Value = Target Cancel = True End Sub
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Intersect(Target, [b:B]) Is Nothing Then Exit Sub Cells(Rows.Count, 5).End(xlUp)(2).Value = Target MsgBox prompt:="Данные успешно внесены", _ Title:="Внесение данных" Cancel = True End Sub
[/vba]
msgbox вам в помощь [vba]
Код
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Intersect(Target, [b:B]) Is Nothing Then Exit Sub Cells(Rows.Count, 5).End(xlUp)(2).Value = Target MsgBox prompt:="Данные успешно внесены", _ Title:="Внесение данных" Cancel = True End Sub
А если значения на другом листе? И много значений? Как быть уверенным, что два клика сработало?
Вариант с "флажками" (но не с Checkbox'ами - рисовать их двестивосемьдесятсемь штук - лениво). Достаточно одной таблэтки выделить (или ДаблКликуть) ячейку с столбике с "галочками".
А если значения на другом листе? И много значений? Как быть уверенным, что два клика сработало?
Вариант с "флажками" (но не с Checkbox'ами - рисовать их двестивосемьдесятсемь штук - лениво). Достаточно одной таблэтки выделить (или ДаблКликуть) ячейку с столбике с "галочками".SM
Вход
Регистрация
Напомнить пароль
Автосумма
Часто используемые
ВПР
ЕСЛИ
СУММЕСЛИ
Финансовые
Логические
Текстовые
Даты и времени 
Ссылки и массивы 
Математические
Другие функции
Проверка свойств и значений
Баз данных
Математические
Обработки массивов
Обработки строк
Преобразования типов данных 
Загрузки данных
Работы с файлами
Обработки системных параметров
Обработки цвета
Работы с датами и временем
Преобразования в системы счисления
Финансовые
