administrador de plantillas en forma de lista

Hola Chiri :-)

Funciona perfectamente, pero vamos más allá, no habría posibilidad de
cambiarlo en el
registro de windows o en propio registro de word???

es curioso, porque yo creo haber visto otros ordenadores y se abre ese
cuadro de diálogo como lista o detalles, no como iconos grandes ¡ATENCIÓN!
esto último quizá son imaginaciones mías

gracias [ aqui monigote de esos de mesenger o mails colorao ] :-P !!

Pues he estado mirando y no he visto yo que se pueda cambiar de registro
:-( o no se yo hacerlo :-P , porque creo que eso viene por defecto en el
word, ya que me parece que son macro que ya vienen incluidas en el
programa ya que si por ejemplo ponemos lo siguiente »

Abre un documento de word nuevo y vete al editor de visual basic con
[ALt +F11 ] y pon por ejemplo en un [ modulo nuevo ] la siguiente macro »

'[]

Sub FileNew()

MsgBox "hola, como estas hoy?"

End Sub

'[]


y ahora cierra el editor y te vas al Menu Archivo » y click en Nuevo »

pues bien veras que ya no se abre por defecto el panel de tareas nuevo
documento donde esta [ Mi PC ] para poder abrir las plantillas, en lugar
de eso te aparecera el siguiente mensaje »

MsgBox "hola, como estas hoy?"

Luego para quitar el mensaje y volver a tener por defecto libre el boton
[ Nuevo ] del menu archivo bastaria con eliminar dicha macro o bien
cambiarle el nombre por por ejemplo » Sub File_mis_plantillas() pasando
a ser un procedimiento normal y corriente como una macro nueva :-)


Eso sucede porque word tiene macros ya creadas con nombres de
procedimientos que son exclusivos como en este caso » Sub FileNew()

Si hubieramos puesto »

Sub ArchivoNuevo()

igual hubiera funcionado porque tenemos el office en español pero si
tuvieramos el office en otro idioma distinto al español e ingles pues
esos procedimientos no serian validos cada Word tiene sus macros
incluidas por defecto en su idioma predifinido ademas que el ingles
funciona en todos ya que VBA esta basado en el idioma Ingles.

Tambien podria ponerse esto en la plantilla normal.dot »

'[]

Sub FileNew()

SendKeys "%2"
Dialogs(wdDialogFileNew).Show

End Sub

'[]

Y asi abres directo a tus plantillas y en lista :-) pero esto a gustos
del consumidor jejeje ! :-P


ya nos comentas... :-) !!

Saludos
Monica