При незаполнении TextBox (название ФИО) поставил MsgBox "Без заполнения ФИО программа не работает!"
Код
Private Sub ФИО_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If ФИО.Text = "" Then
MsgBox "Без заполнения ФИО программа не работает"
Unload UserForm1
End If
End Sub
Проблема - MsgBox появляется второй раз Какое свойство/способ/хитрость нужно?
Нужно разбить текст яч.G12 Я сделал это поиском здесь сайте и под требование, но как-то коряво, топорно макросами Кто-то может иным, хорошим, способом?, формулой?, UDF? Там нужно заменить точку в числах, удалить скобки и разбить на части
В яч. A1 число, например 123,45. Рядом надо его у виде "всего 123,45" Пробую через формулу "всего "&ТЕКСТ(A1; 0), показывает только целые - 123 Какой формат числа поставить вместо "0", чтоб отобразило "всего 123,45"?
Чтобы поймать ошибку, ставлю точки остановки. Запуск формы, но при переходе на другие элементы формы появляется выше упомянутое сообщение без остановок на выставленных точках
В файле при нажатии кнопки CommandButton1 и вводе значения в TextBox1 в ListBox1 отображаются найденные значения При выбор одного из них происходит выбор (Select) этого значения на листе А надо тоже, но чтобы в ListBox открывалось два значения, из столбцов С и В (или наоборот). Мои изыскания не привели к желаемому Буду благодарен а помощь
В процессе выполнения работы/задачи создал для помощи ешё один файл с листом (Д). Задание решил, но с двумя файлами. Хотел на их основе создать один. Пробовал переместить нужный лист (Д) так: открыл два файла, отключил в них сервис/параметры/вычисления/вручную. переименовал тот что удалить (У), удалил, а лист (Д), переименовал как удалённый (У) Связь с удапённым файлом сохранилась, полно #ССЫЛКА
В ячейке набор данных (пролёты между опорами ЛЭП, где деревья), разделённых запятой Функция пользователя (UDF) Substring в яч.D-BL разбивает на блоки. Одиночные пролёты считает ф-ла (в столбце BM) Но есть сплошные пролёты, обозначенные знаком ":" например "17:26", "12:14" . Как получить (26-17) + (14-12) =11