Выбрать дату в календареВыбрать дату в календаре

Страницы: 1
Как привязать форму с календарем для ввода в другие формы?
 
Юрий М, но проблема в том, что если удалить любой из листов то, когда перебирается оператор If Then чтобы понять в какую форму записать дату выдается ошибка. Но я сейчас ее уже решил, блогодаря совету Дмитрия(The_Prist) Щербакова.  Повесил проверку на наличие нужных листов в книге. Спасибо! Сам бы еще очень долго думал
Как привязать форму с календарем для ввода в другие формы?
 
Юрий М,в реальности не так, значит плохой пример я сделал, формы разные, назначение разное, а форма-календарь для них одна
Как привязать форму с календарем для ввода в другие формы?
 
На одном листе есть одна пользовательская форма с кучей элементов, которая решает свою задачу и к ней прикручена форма-календарик, на втором листе другая пользовательская форма, которая решает другую задачу и к ней тоже прикручена эта же форма-календарик, потому что там тоже надо вводить дату и так далее
Как привязать форму с календарем для ввода в другие формы?
 
vikttur,есть более трех форм и в каждом есть ввод даты, такого разве не может быть ?)))
Как привязать форму с календарем для ввода в другие формы?
 
Слепил пример, но он работает при удалении листа а в моем файле не работает и выдает ошибку когда перебирает If Then c которым связан удаленный лист, а свой пример не могу загрузить в связи с ограничением по размеру файла(((
Как привязать форму с календарем для ввода в другие формы?
 
vikttur,  записал дату в глобальную переменную, но проблема в том, когда перебирается оператор If Then чтобы понять в какую форму записать дату, то выдается ошибка, если один из листов к которому привязана одна из форм удалена. Не уж то для каждой пользовательской формы делать свою форму-календарь?
Как привязать форму с календарем для ввода в другие формы?
 
Dima S, а кодом не поможете, хотя бы дать направление))
Как привязать форму с календарем для ввода в другие формы?
 
Есть книга с листами, пользовательскими формами. На многих формах есть текстбоксы для ввода даты. К ним я прикрутил форму с календарем. Как сделать чтобы дата из формы-календаря заносилась в нужную форму. Повесил на кнопку ОК календаря такой макрос, но при удаленных листах макрос выдает ошибку.
Код
Private Sub Cmd_Select_Click()
    'Команда - закончить выбор даты и закрыть форму
    If Форма_АВК_МТР.Visible = True Then
        Форма_АВК_МТР.tbx_дата = Форма_Выбор_даты_АВК.TextBox_Дата
    End If
    If Форма_АВК_ВСН.Visible = True Then
        Форма_АВК_ВСН.tbx_date = Форма_Выбор_даты_АВК.TextBox_Дата
    End If
    If ActiveSheet.Name = учет_мат.Name Then
        ActiveCell = Форма_Выбор_даты_АВК.TextBox_Дата
    End If
    If Форма_проверка_электродов.Visible = True Then
        Форма_проверка_электродов.tbx_дата_эл = Форма_Выбор_даты_АВК.TextBox_Дата
    End If
    If ActiveSheet.Name = уч_труб.Name Then
        ActiveCell = Форма_Выбор_даты_АВК.TextBox_Дата
    End If
    Unload Me
End Sub
Как убрать подчеркивание с последнего символа перед переносом но новую строку в ячейке?
 
БМВ, спасибо, все сделал, как ты сказал, вопрос закрыт
Как убрать подчеркивание с последнего символа перед переносом но новую строку в ячейке?
 
Здравствуйте, уважаемые форумчане! Подскажите в каком направлении двигаться. Есть объединенная ячейка с включенным переносом по словам. В тексте ячейки есть подчеркнутые слова. Как убрать подчеркивание с последнего символа в строке? Подчеркнутый пробел в конце строки не смотрится. Пытался использовать InStr функцию для поиска символа переноса, но функция не находит символы переноса. Как быть?  
Страницы: 1
Наверх