Anpassen der Spaltenbreite über die Tastatur (Microsoft Word)
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 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
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 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
_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.
WordTips ist Ihre Quelle für kostengünstige Microsoft Word-Schulungen.
(Microsoft Word ist die weltweit beliebteste Textverarbeitungssoftware.) Dieser Tipp (3912) gilt für Microsoft Word 97, 2000, 2002 und 2003. Sie finden eine Version dieses Tipps für die Multifunktionsleistenschnittstelle von Word (Word 2007) und später) hier: