Muchas personas que están familiarizadas con WordPerfect luego encuentran la necesidad de aprender a usar Word. A veces, la transición no es del todo fluida, en gran parte porque las tareas no se realizan de la misma manera en Word que en WordPerfect.

Un ejemplo de ello es ajustar el ancho de las columnas de la tabla mediante el teclado. WordPerfect, que siempre ha sido un «teclado orientado»

programa, facilita los ajustes: basta con pulsar> o <para ampliar o estrechar la columna. Word, por otro lado, siempre ha estado más orientado al mouse y no tiene un comando de teclado equivalente para esta tarea.

Hay soluciones alternativas; por ejemplo, puede usar el teclado para escribir Alt + A, R, U, y luego presionar Tab un par de veces para llegar al campo de ancho de columna. El problema con esto, por supuesto, es que no es nada fácil (o intuitivo).

Si no le importa usar el mouse, puede mantener presionada la tecla Alt mientras arrastra el borde de una columna. La regla cambia para mostrar el ancho preciso de sus columnas a medida que mueve el borde. Muy bueno, pero sigue siendo un dolor de cabeza para aquellos que prefieren usar el teclado. (Tampoco es muy útil para aquellos que pueden no tener una resolución muy buena del mouse, o que no pueden mover el mouse distancias muy pequeñas).

Quizás la mejor solución sea hacer su propia emulación de la capacidad de WordPerfect. La siguiente macro puede hacer precisamente eso:

Sub StretchColumn()

Dim CurrentSize As Integer     Dim NextSize As Integer     Dim CurCol As Integer

'Get the current width (in points)

CurCol = Selection.Cells(1).ColumnIndex     CurrentSize = Selection.Tables(1).Columns(CurCol).Width

'Increase the current width by one point     NextSize = CurrentSize + 1     Selection.Columns(1).SetWidth _       ColumnWidth:=NextSize, _       Rulerstyle:=wdAdjustNone End Sub

Si asigna esta macro a una tecla de método abreviado (como se describe en otros números de WordTips), entonces puede aumentar el ancho de la columna de la tabla actual en un punto (1/72 de pulgada) cada vez que presione la tecla de método abreviado. Puede hacer un cambio simple en la macro para crear una versión que también disminuya el ancho de la columna:

Sub ShrinkColumn()

Dim CurrentSize As Integer     Dim NextSize As Integer     Dim CurCol As Integer

'Get the current width (in points)

CurCol = Selection.Cells(1).ColumnIndex     CurrentSize = Selection.Tables(1).Columns(CurCol).Width

'Decrease the current width by one point     NextSize = CurrentSize - 1     Selection.Columns(1).SetWidth _       ColumnWidth:=NextSize, _       Rulerstyle:=wdAdjustNone 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 (3912) se aplica a Microsoft Word 97, 2000, 2002 y 2003. Puede encontrar una versión de este consejo para la interfaz de cinta de Word (Word 2007 y más tarde) aquí:

link: / wordribbon-Adjusting_Column_Width_from_the_Keyboard [Ajustar el ancho de la columna desde el teclado].