Страницы: 1
RSS
формат даты с указанием дня недели в TextBox на UserForm
 
Господа, помогите с таким вопросом.    
 
в ячейке содержится дата. в формате  ДД-МММ-ГГГГ" "-" "ДДД.  
что дает, например, 24-авг-2011 - пн.  
 
вывожу эту дату в textbox на форму, предположим из ячейки А1.  
Добиться формата просто даты могу через формат ниже.    
Me.TextBox1 = Format(Cells(1, 1), "dd.mm.yyyy")  
 
А вот добиться воспроизведения даты с днем недели не получается.    
 
Подскажите, как это сделать?
 
Можно и не форматировать:  
Me.TextBox1 = [A1].Text
 
Но, если хочется с форматированием, то:  
Me.TextBox1 = Format([A1], "dd-mmm-yyyy - ddd")
 
Ага ))) Заработало ))  
Спасибо, Юрий.
 
таки не все с этими форматами.    
 
теперь нужен обратный процесс:  
в textbox есть дата.    
Нужно, чтобы в ячейке она появилась в формате dd-mmm-yyyy - ddd  
 
проблемс в том, что при передаче данных из textbox в ячейку, ячейка принимает нужный формат после "двойного клика" в ней. типа, ее активации.    
во вложении - если двойной клик по А2 сделать, нужный формат появится. Если не сделать - нет никакого нужного формата.    
 
Суть вопроса, собственно в том, как избежать этого двойного клика и получить нужный формат?
 
Cells(2, 1) = CDate(.TextBox1)
Страницы: 1
Читают тему
Наверх