Como?

29/07/2004 - 00:54 por ATanus | Informe spam
Estimados colegas.

Estoy desarrollando un programa que interactua con excel
(VBA) pero, ne he podido habilitar los botones de
maximizar y minimizar, de mis formularios.

Esposible esto mediante codigo?

De antemano gracias.
 

Leer las respuestas

#1 Benito
30/07/2004 - 09:11 | Informe spam
Hola.

Directamente el objeto USERFORM no tiene esta propiedad.
Sin embargo, he encontrado un ejemplo que funciona en el
siguiente link:

www.aquanet.co.il/vip/othnay/UserFormMinMax.xls


En él hay un módulo de clase que puedes copiar (llamado
CFormChanger)

Además dentro de tu userform debes enganchar el siguiente
código:


Option Explicit
Dim oFormChanger As New CFormChanger

Private Sub UserForm_Activate()

Set oFormChanger.Form = Me
oFormChanger.ShowCaption = True
oFormChanger.ShowSysMenu = True
oFormChanger.ShowCloseBtn = True
oFormChanger.ShowMaximizeBtn = True
oFormChanger.ShowMinimizeBtn = True
oFormChanger.ShowTaskBarIcon = True
oFormChanger.Modal = False

End Sub


Saludos,


Benito Merino
Barcelona

Preguntas similares