Hay ocasiones en las que Larry necesita absolutamente crear cuatro o más documentos en blanco nuevos. Se pregunta si hay una manera de crear cuatro nuevos documentos en blanco (sería bueno ingresar cuántos documentos en blanco se necesitan) a la vez.

Hay algunas formas de abordar este problema. Si todo lo que desea hacer es crear cuatro documentos nuevos, todos basados ​​en la plantilla Normal, la forma más fácil es simplemente presionar Ctrl + N cuatro veces. (En realidad, puede mantener presionada la tecla Ctrl y presionar N cuatro veces). El resultado son cuatro documentos en blanco, listos para usarse.

Si sus documentos deben basarse en una plantilla diferente a la plantilla Normal, entonces es mejor usar una macro. La siguiente macro pregunta al usuario cuántos documentos deben crearse y luego los crea basándose en la plantilla BusinessReport.

Sub NewDocuments()

Dim Answer As Variant     Dim iNewDocs As Integer     Dim J As Integer

Answer = InputBox("How many new documents?")

iNewDocs = CInt(Answer)

For J = 1 to iNewDocs         Documents.Add Template:="BusinessReport", NewTemplate:=False, _           DocumentType:=wdNewBlankDocument     Next J End Sub

La macro podría asignarse a una tecla de método abreviado o a un botón en una barra de herramientas, listo para crear sus documentos. También puede adoptar un enfoque ligeramente diferente con el mismo código. Cree un nuevo documento basado en la plantilla deseada (como la plantilla BusinessReport) y luego agregue esta macro a la plantilla:

Sub AutoOpen()

Dim Answer As Variant     Dim iNewDocs As Integer     Dim J As Integer

Answer = InputBox("How many more docs?", "Doc Count")

iNewDocs = CInt(Answer)

For J = 1 To iNewDocs         Documents.Add Template:="BusinessReport", NewTemplate:=False, _           DocumentType:=wdNewBlankDocument     Next End Sub

Guarde el documento con un nombre como «MultipleDocs.docm». La base de la macro es la misma que la anterior. La diferencia es el nombre que se le da a la macro. Dado que utiliza el nombre especial AutoOpen, cada vez que se abre posteriormente el documento MultipleDocs, la macro se ejecuta automáticamente y se le pregunta al usuario cuántos documentos adicionales debe crear.

_Nota: _

Si desea saber cómo usar las macros descritas en esta página (o en cualquier otra página de los sitios WordTips), he preparado una página especial que incluye información útil.

link: / wordribbon-WordTipsMacros [Haga clic aquí para abrir esa página especial en una nueva pestaña del navegador].

WordTips es su fuente de formación rentable en Microsoft Word.

(Microsoft Word es el software de procesamiento de texto más popular del mundo). Esta sugerencia (11237) se aplica a Microsoft Word 2007, 2010, 2013, 2016, 2019 y Word en Office 365. Puede encontrar una versión de esta sugerencia para interfaz de menú anterior de Word aquí:

link: / word-Creating_Multiple_Blank_Documents_in_One_Step [Creación de varios documentos en blanco en un solo paso].