Rambler's Top100
Форум: MS ACCESSVBVBA MS OfficeMS SQL server
Новые сообщения: 0000

Форум: VBA MS Office

Программирования для MS Office кроме ACCESS

Обновить визитку
Участники «Online»
Все участники

 
 

Доброго времени суток, Посетитель!

вид форума:
Линейный форум Структурный форум

тема: ПОМОГИТЕ С Созданием USERFORM в VBA в Excel, не руками.
 
 автор: Alex_2006   (01.02.2007 в 11:33)   личное сообщение
 
 

Убедительная просьба сам столкнулся с этим в первый раз. Обычно создавал вручную в vba excel.
Но на этот раз нужно создать USERFORM1 при помощи макроса ,т.е. модулем или как нибудь ещё, но не вручную инсерт USERFORM.
В конечном итоге после запуска макроса форма должна сама создаться потом запуститься и дальше я сам подторкну свой код.
Только не спрашивайте зачем это , т.к. одним письмом не ответить.

  Ответить  
 
 автор: pashulka   (01.02.2007 в 14:59)   личное сообщение
 
 


Private Sub AddUserForm()

With ThisWorkbook.VBProject.VBComponents.Add(3)
     .Properties("Width") = 200
     .Properties("Height") = 100
     With .Designer.Controls.Add("Forms.Label.1")
          .SpecialEffect = 3
          .Caption = "Ваша форма"
          .TextAlign = 2
          .Top = 30
          .Left = 60
     End With
     VBA.UserForms.Add(.Name).Show
End With

End Sub


P.S. Начиная с MS Excel XP - Серсис/Макрос/Безопасность/Надежные источники/установить флажок Доверять доступ к Visual Basic Project

  Ответить  
 
 автор: Alex_2006   (05.02.2007 в 09:33)   личное сообщение
 
 

Спасибо!!!!!!!!!!!!!!!11

  Ответить  
HiProg.com - Технологии программирования
Rambler's Top100 TopList