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

Страницы: 1
Перенос листов в новую книгу и дальнейшее ее сохранение
 
есть книга "Старая.xls" в ней несколько листов и форма с кнопкой, по нажатию на которую все и будет происходить. Выбор нужного листа для переноса происходит по условию. ВАЖНО все параметры переносимого листа должны сохраниться, объеденение ячеек, шириша высота строки и т.д. После переноса в новую книгу происходит ее сохранение по адресу С:/мои документы... с названием которое находиться в "Старая.xls".userform1.textbox1.
and , or и др. логические словечки
 
как можно легко и просто записать следующее:  
if a <> 0 and b <> 0 and c <> 0 and ... then
значения переменных в форму заявления (на листе Excel)
 
есть бланк заявления, необходимо, чтобы данные сохраненные в переменных подставлялись в этот бланк.
Ошибка при использовании Private Sub Worksheet_Calculate()
 
Данные на форму отображаются автоматически при использовании    
Private Sub Worksheet_Calculate(), но если открыть какой нить другой файл Excel, иногда вылетает ошибка с указанием на первую по счету строку кода. Например такую        
uf_калк_каско.Label65.Caption = IIf(Sheets("расчет").Range("B9") <> 0, Format(Range("B9"), "# ### ##0.00"), "х")  
 
Private Sub Worksheet_Calculate()  
uf_калк_каско.Label65.Caption = IIf(Sheets("расчет").Range("B9") <> 0, Format(Range("B9"), "# ### ##0.00"), "х")  
 
Как поправить?
Вызов значений переменных из другой формы
 
Подскажите пжл как можно вызвать значения записанные в форме 2 на форму 1. Пример6 есть 2 формы на 1 форме есть кнопки добавить, изменить. по кнопке добавить открывается форма с боксани, после заполнения их и нажатия кнопки сохранить на 2 форме, все значения присваиваются переменным и формы выгружается. при нажатии на форме 1, кнопки изменить необходимо чтобы открылась форма 2 с сополненными боксами (значения те которые были записаны при предыдущем сохранении).
Выделение слова цветом и толщиной шрифта в MsgBox
 
есть такое сообщение:  
MsgBox "Расчет тарифа не возможен, т.к. поле <<СРОК СТРАХОВАНИЯ>> не заполненно", Title:="Внимание!!!"  
 
как <<СРОК СТРАХОВАНИЯ>> выделить жирным шрифтом и красным цветом?
циклическое объединение ячеек
 
есть 1000 строк, необходимо объединить эти строки по 3 строки. как можно это сделать?
переход по боксам при помощи tab
 
на форме есть 4 бокса, кажды из них находиться в рамке. как заставить курсор перемещаться по этим боксам последовательно. бокс в рамке1, бокс в рамке 2 и т.д.
группировка OptionButton
 
как можно сгруппировать?  
есть 2 строки, 2 вопроса и четыре ответа:  
 
вопрос  ответ  ответ  
вопрос1 ответ1 ответ1  
 
нужно чтобы срупировать OptionButton первой строки и потом второй.
функция поиска куска текска в ячейке
 
как можно найти слово в ячейке? например: =если(А1 содержит слово "привет";1;0)
Кнопка "отмена"
 
Можно ли сделать так, чтобы при нажатии на кнопку с надписью отмена, происходило тоже самое что и при нажатии на крестик (форма закрывалась, а последние изменения не сохранялись).
Grid в UserForm
 
Есть ли возможность на форму установить Grid или что то похожее. Пытался найти ответ на форум,но так ничего и не нашел.
Запись значения в переменную
 
есть кусок кода  
Private Sub ComboBox2_Change()  
On Error Resume Next  
If (Left(TextBox5, 3) = 104 Or Left(TextBox5, 3) = 114) And ComboBox4 <> "Пролонгацией" Then  
Sheets("Запись").Range("D1") = ComboBox2.List(ComboBox2.ListIndex, 1)  
ElseIf (Left(TextBox5, 3) = 104 Or Left(TextBox5, 3) = 114) And ComboBox4 = "Пролонгацией" Then  
Sheets("Запись").Range("D1") = ComboBox2.List(ComboBox2.ListIndex, 3)  
End If  
End Sub  
 
как сделать так, чтобы не использовать ячейку, а вместо нее значение можно было бы записать в виде какой нить переменной. вдальнейшем эти переменные будет скадываться и вычитаться.
Арифметические действия в VBA
 
Подскижите пжл где можно почитать про Арифметические действия в VBA. Интересует *,/,+,-.  
Или если можно, то несколько примеров этих действий.
Фукция =ПСТР в VBA
 
Как можно из текста 123456 (находиться в текстбоксе1) взять первые 4 симвала, чтобы использовать их в дальнейшем. например: если первые 4 симвала текстбокса1 = 1234, то привет, если 2345, то пока и т.д.
Связанный выпадающий список
 
Необходимо чтобы при выборе значения в комбобоксе, автоматически подставлялось значение из листа в текстбокс. Пример во вложении.
Пропажа UserForm'ы
 
Дописывал в код некоторые строки, ничего особенного. Запустил проект и на тебе, говорит что нет проекта. Куда делся не пойму. Помогите пжл кто сталкивался с подобным.
"Глюк" при вызове календаря по нажатию кнопки
 
Нажимаю кнопку для вызова календаря, а его нет там где должен быть. В примере это под кнопкой. Если понажимать на свободном месте, то календарь прорисуется. Как исправить это? Про вашей помощи, помогите пжл.
Запись значения текстбокса в ячейки на определенном листе
 
Есть форма с которой инфа записывается на определенный лист, зависит от 2 текстбоксов в которых даты. если обе даты декабрь, то на лист декабрь. если даты разные, то приоритет у даты более поздней. например клиент обратился 20.12.2010, а заплатил деньги только 23.01.2011, то инфу нужно записать в январь. инфа записывается в следующую пустую ячейку. например если А1,В1,С1... заняты, то в А2,В2,С2...  
 
Если есть подобные примеры, укажите пжл, я сам поразбираюсь
Страницы: 1
Наверх