Autor: |
Rick
Lalliss |
Traductor: |
Daniel
Quintero Rojas |
Fecha: |
febrero
del 2000 |
Fuente: |
Visual
Basic Programmer's Journal (http://www.vbpj.com) |
Descripción: |
Crear
un Add-In para cerrar todas las ventanas de código o diseño
que esten abiertas dentro del IDE de Visual Basic |
Generalmente
cuando se hace una búsqueda o un reemplazo dentro de Visual Basic, se
suelen abrir varias ventanas. En un proyecto grande, suele ser algo tedioso
cerrar ventana por ventana. Aquí hay un simple y rápido Add-In que puedes
crear para que cierre todas las ventanas por tí.
Empieza
un proyecto nuevo del tipo Add-In y pega este código en la forma
frmAddIn que se creó:
Private Sub Form_Load()
Dim w As Window
For Each w In VBInstance.Windows
' Cerrar ventanas de código o de diseño
' que estén visibles
If (w.Type = vbext_wt_CodeWindow Or _
w.Type = vbext_wt_Designer) And w.Visible Then
w.Close
End If
Next w
Unload Me
End Sub
|
Haz doble
click en la clase Connect para desplegar sus propiedades y cambia su nombre
y descripción. También busca dentro de todo el proyecto y reemplaza el
texto "My AddIn" por el que tu hayas decidido ponerle.
Después
de haber creado la DLL, puedes añadir el Add-In desde el manejador de
Add-Ins y cerrar todas las ventanas prácticamente en nada de tiempo.
|