Viele Leute, die später mit WordPerfect vertraut sind, müssen lernen, wie man Word verwendet. Manchmal ist der Übergang nicht ganz reibungslos, zum großen Teil, weil Aufgaben in Word nicht auf die gleiche Weise ausgeführt werden wie in WordPerfect.

Ein typisches Beispiel ist das Anpassen der Breite von Tabellenspalten mithilfe der Tastatur. WordPerfect, das schon immer „tastaturorientiert“ war

Programm, macht die Einstellungen einfach: Drücken Sie einfach> oder <, um die Spalte zu erweitern oder zu verengen. Word hingegen war immer mausorientierter und verfügt über keinen entsprechenden Tastaturbefehl für diese Aufgabe.

Es gibt Problemumgehungen. Sie können beispielsweise über die Tastatur Alt + A, R, U eingeben und dann mehrmals die Tabulatortaste drücken, um zum Feld für die Spaltenbreite zu gelangen. Das Problem dabei ist natürlich, dass es nicht annähernd einfach (oder intuitiv) ist.

Wenn es Ihnen nichts ausmacht, die Maus zu verwenden, können Sie die Alt-Taste gedrückt halten, während Sie einen Spaltenrand ziehen. Das Lineal ändert sich, um die genaue Breite Ihrer Spalten anzuzeigen, wenn Sie den Rahmen verschieben. Sehr cool, aber immer noch ein Schmerz für diejenigen, die lieber nur die Tastatur benutzen möchten. (Es ist auch nicht besonders hilfreich für diejenigen, die möglicherweise keine sehr gute Mausauflösung haben oder die Maus nicht über sehr kleine Entfernungen bewegen können.)

Die vielleicht beste Lösung besteht darin, die WordPerfect-Funktion selbst zu emulieren. Das folgende Makro kann genau das:

Sub StretchColumn()

Dim iCol As Integer     Dim sCurrent As Single

If Selection.Information(wdWithInTable) Then         If Selection.Columns.Count = 1 Then             iCol = Selection.Cells(1).ColumnIndex             sCurrent = Selection.Tables(1).Columns(iCol).Width             Selection.Tables(1).Columns(iCol).SetWidth _               ColumnWidth:=sCurrent + 1, RulerStyle:=wdAdjustNone         Else             MsgBox ("More than one column selected")

End If     Else         MsgBox ("Insertion point not within a table")

End If End Sub

Wenn Sie dieses Makro einer Tastenkombination zuweisen (wie in anderen Ausgaben von WordTips beschrieben), können Sie die Breite der aktuellen Tabellenspalte bei jedem Drücken der Tastenkombination um einen Punkt (1/72 Zoll) erhöhen. Sie können das Makro einfach ändern, um eine Version zu erstellen, die auch die Spaltenbreite verringert:

Sub ShrinkColumn()

Dim iCol As Integer     Dim sCurrent As Single     Dim sNext As Single

If Selection.Information(wdWithInTable) Then         If Selection.Columns.Count = 1 Then             iCol = Selection.Cells(1).ColumnIndex             sCurrent = Selection.Tables(1).Columns(iCol).Width             sNext = sCurrent - 1             If sNext < 1 Then sNext = 1             Selection.Tables(1).Columns(iCol).SetWidth _               ColumnWidth:=sNext, RulerStyle:=wdAdjustNone         Else             MsgBox ("More than one column selected")

End If     Else         MsgBox ("Insertion point not within a table")

End If End Sub

_Hinweis: _

Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der WordTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.

Klicken Sie hier, um diese spezielle Seite in einem neuen Browser-Tab zu öffnen.

WordTips ist Ihre Quelle für kostengünstige Microsoft Word-Schulungen.

(Microsoft Word ist die weltweit beliebteste Textverarbeitungssoftware.) Dieser Tipp (13369) gilt für Microsoft Word 2007, 2010, 2013, 2016, 2019 und Word in Office 365. Eine Version dieses Tipps finden Sie für ältere Menüoberfläche von Word hier:

Anpassen der Spaltenbreite über die Tastatur.