En un entorno multiusuario, a menudo es deseable configurar Word para que pueda volver fácilmente a una condición prístina y predeterminada. Por ejemplo, en laboratorios de computación o centros de capacitación, es posible que desee que Word vuelva a sus valores predeterminados antes de que ingrese el siguiente grupo de personas y realice sus propios cambios de configuración.

Desafortunadamente, no hay ningún interruptor que pueda activar para evitar cambios o para que todo vuelva a la normalidad. (Probablemente no querrá evitar los cambios de todos modos, especialmente si está enseñando a las personas cómo personalizar Word). El enfoque más cercano es usar el modificador de línea de comandos / a para iniciar Word. Según el sistema de ayuda en línea, este modificador hace que Word «impida que los complementos y las plantillas globales (incluida la plantilla Normal) se carguen automáticamente». También «evita que los archivos de configuración se lean o modifiquen». Si desea utilizar este interruptor, simplemente siga estos pasos:

  1. Con el navegador del escritorio (Windows, no Word), muestre la carpeta que contiene el acceso directo utilizado para iniciar Word.

  2. Haga clic derecho en el icono de acceso directo. Esto muestra un menú contextual para el acceso directo.

  3. Seleccione la opción Propiedades en el menú contextual. Esto muestra el cuadro de diálogo Propiedades del acceso directo.

  4. Haga clic en la pestaña Acceso directo. (Ver figura 1)

  5. Al final del campo Destino, agregue lo siguiente: / a (Si hay comillas alrededor del texto en el campo Destino, asegúrese de colocar / a fuera de las comillas. Además, asegúrese de que haya un espacio antes del barra oblicua.)

  6. Haga clic en Aceptar.

Tenga en cuenta que este enfoque significa que nunca podrá modificar Word y que los cambios se «mantengan». Si necesita que la configuración comience desde una condición no predeterminada, entonces el mejor enfoque es usar una macro AutoExec para restablecer todas las opciones configurables de Word a sus valores predeterminados. La macro exacta a usar sería diferente, según la versión de Word que esté usando. Sin embargo, el enfoque a utilizar para crear la macro puede ser muy consistente. Todo lo que necesitas hacer es seguir estos pasos generales:

  1. Haga una lista (en papel) de todas las opciones que desea restablecer.

Simplemente enumere los cuadros de diálogo y las pestañas en las que aparecen esas opciones.

  1. Inicie la grabadora de macros.

  2. Visite cada cuadro de diálogo y pestaña que enumeró en el paso 1.

  3. Cambie un elemento en cada cuadro de diálogo o pestaña. (Simplemente puede marcar y desmarcar una casilla de verificación, si lo desea).

  4. Apague la grabadora de macros.

  5. Edite la macro para realizar los cambios de ajuste necesarios. (Por ejemplo, en la macro de muestra que aparece más adelante en este consejo, el ajuste fino implicaba mover las opciones y colocarlas en orden alfabético).

  6. Denomine la macro AutoExec.

Debe tener en cuenta que la longitud de la macro puede ser bastante larga, dependiendo de la cantidad de cuadros de diálogo y pestañas que visite. La siguiente macro, por ejemplo, es un ejemplo de un «establecido por defecto»

macro que se creó para su uso en Word 2000. (Esta macro se incluye solo con fines ilustrativos; su macro será diferente, según el orden en que visite los cuadros de diálogo y lo que desee incluir en la macro).

Sub MyOptions()



RecentFiles.Maximum = 9     Languages(wdEnglishUS).SpellingDictionaryType = wdSpelling     Languages(wdEnglishUS).DefaultWritingStyle = "Formal"



With ActiveDocument         .ActiveWritingStyle(wdEnglishUS) = "Formal"

.ClickAndTypeParagraphStyle = "Normal"

.Compatibility(wdAlignTablesRowByRow) = False         .Compatibility(wdAutospaceLikeWW7) = False         .Compatibility(wdConvMailMergeEsc) = False         .Compatibility(wdDontAdjustLineHeightInTable) = True         .Compatibility(wdDontBalanceSingleByteDoubleByteWidth) = True         .Compatibility(wdDontULTrailSpace) = True         .Compatibility(wdDontUseHTMLParagraphAutoSpacing) = False         .Compatibility(wdExactOnTop) = False         .Compatibility(wdExpandShiftReturn) = True         .Compatibility(wdFootnoteLayoutLikeWW8) = False         .Compatibility(wdForgetLastTabAlignment) = False         .Compatibility(wdLayoutRawTableWidth) = False         .Compatibility(wdLayoutTableRowsApart) = False         .Compatibility(wdLeaveBackslashAlone) = True         .Compatibility(wdLineWrapLikeWord6) = False         .Compatibility(wdMWSmallCaps) = False         .Compatibility(wdNoColumnBalance) = False         .Compatibility(wdNoExtraLineSpacing) = False         .Compatibility(wdNoLeading) = False         .Compatibility(wdNoSpaceForUL) = True         .Compatibility(wdNoSpaceRaiseLower) = False         .Compatibility(wdNoTabHangIndent) = False         .Compatibility(wdOrigWordTableRules) = False         .Compatibility(wdPrintBodyTextBeforeHeader) = False         .Compatibility(wdPrintColBlack) = False         .Compatibility(wdShapeLayoutLikeWW8) = False         .Compatibility(wdShowBreaksInFrames) = False         .Compatibility(wdSpacingInWholePoints) = False         .Compatibility(wdSubFontBySize) = False         .Compatibility(wdSuppressBottomSpacing) = True         .Compatibility(wdSuppressSpBfAfterPgBrk) = True         .Compatibility(wdSuppressTopSpacing) = True         .Compatibility(wdSuppressTopSpacingMac5) = False         .Compatibility(wdSwapBordersFacingPages) = False         .Compatibility(wdTransparentMetafiles) = False         .Compatibility(wdTruncateFontHeight) = False         .Compatibility(wdUsePrinterMetrics) = False         .Compatibility(wdWPJustification) = False         .Compatibility(wdWPSpaceWidth) = False         .Compatibility(wdWrapTrailSpaces) = False         .Compatibility(wdWW6BorderRules) = False         .EmbedTrueTypeFonts = False         .OptimizeForWord97 = False         .Password = ""

.PrintFormsData = False         .PrintPostScriptOverText = False         .ReadOnlyRecommended = False         .SaveFormsData = False         .SaveSubsetFonts = False         .ShowGrammaticalErrors = True         .ShowSpellingErrors = True         .WritePassword = ""

End With

With ActiveWindow         .DisplayHorizontalScrollBar = True         .DisplayLeftScrollBar = False         .DisplayRightRuler = False         .DisplayScreenTips = True         .DisplayVerticalScrollBar = True         .StyleAreaWidth = InchesToPoints(0)

With .View             .Draft = False             .FieldShading = wdFieldShadingAlways             .ShowAll = False             .ShowAnimation = True             .ShowBookmarks = True             .ShowDrawings = True             .ShowFieldCodes = False             .ShowHiddenText = False             .ShowHighlight = True             .ShowHyphens = False             .ShowObjectAnchors = False             .ShowParagraphs = False             .ShowPicturePlaceHolders = False             .ShowSpaces = False             .ShowTabs = False             .ShowTextBoundaries = False             .WrapToWindow = False         End With     End With

With Application     .DisplayRecentFiles = True     .DisplayStatusBar = True     .DefaultSaveFormat = ""

.UserName = "User Name"

.UserInitials = "User Initials"

.UserAddress = "User Name" & Chr(13) & Chr(10) & _         "Street Address" & Chr(13) & Chr(10) & "City, State zip"

End With

With CustomDictionaries         .ClearAll         .Add("C:\WINDOWS\Application Data\Microsoft\Proof\CUSTOM.DIC"). _             LanguageSpecific = False         .ActiveCustomDictionary = CustomDictionaries.Item( _             "C:\WINDOWS\Application Data\Microsoft\Proof\CUSTOM.DIC")

End With

With Options         .AllowAccentedUppercase = False         .AllowClickAndTypeMouse = False         .AllowCombinedAuxiliaryForms = True         .AllowCompoundNounProcessing = True         .AllowDragAndDrop = True         .AllowFastSave = False         .AllowPixelUnits = False         .AnimateScreenMovements = False         .ApplyFarEastFontsToAscii = False         .AutoKeyboardSwitching = False         .AutoWordSelection = False         .BackgroundSave = True         .BlueScreen = False         .CheckGrammarAsYouType = False         .CheckGrammarWithSpelling = False         .CheckSpellingAsYouType = False         .ConfirmConversions = False         .CreateBackup = False         .DefaultFilePath(Path:=wdDocumentsPath) = "C:\My Documents"

.DefaultTray = "Use printer settings"

.DeletedTextColor = wdBlue         .DeletedTextMark = wdDeletedTextMarkStrikeThrough         .EnableMisusedWordsDictionary = True         .EnableSound = False         .IgnoreInternetAndFileAddresses = True         .IgnoreMixedDigits = False         .IgnoreUppercase = False         .InsertedTextColor = wdRed         .InsertedTextMark = wdInsertedTextMarkUnderline         .INSKeyForPaste = False         .InterpretHighAnsi = wdHighAnsiIsHighAnsi         .MapPaperSize = True         .MeasurementUnit = wdInches         .OptimizeForWord97byDefault = False         .Overtype = False         .Pagination = True         .PictureEditor = "Microsoft Word"

.PrintBackground = False         .PrintComments = False         .PrintDraft = False         .PrintDrawingObjects = True         .PrintFieldCodes = False         .PrintHiddenText = False         .PrintProperties = False         .PrintReverse = False         .ReplaceSelection = True         .RevisedLinesColor = wdViolet         .RevisedLinesMark = wdRevisedLinesMarkOutsideBorder         .RevisedPropertiesColor = wdGreen         .RevisedPropertiesMark = wdRevisedPropertiesMarkNone         .RTFInClipboard = True         .SaveInterval = 10         .SaveNormalPrompt = True         .SavePropertiesPrompt = True         .SendMailAttach = True         .ShortMenuNames = False         .ShowReadabilityStatistics = False         .SmartCutPaste = True         .SuggestFromMainDictionaryOnly = False         .SuggestSpellingCorrections = True         .TabIndentKey = False         .UpdateFieldsAtPrint = True         .UpdateLinksAtOpen = True         .UpdateLinksAtPrint = True         .VirusProtection = False         .WPDocNavKeys = False         .WPHelp = False     End With

End Sub

_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). Este consejo (642) se aplica a Microsoft Word 97, 2000, 2002 y 2003.