Wie gebe ich eine Word 2007-Tabelle Dollarbeträge ein?
Formatierung Text als Währung ist ein heikles Unterfangen in Microsoft Word 2007. Im Gegensatz zu Excel, Word nicht beschuppt Zahlenformatierung (außer in Formeln). Es gibt jedoch ein paar mögliche Ansätze zum Formatieren von numerischen Text als US-Dollar Werte.
Brute-Force
Geben Sie einfach genug, heraus die komplette Dollar-Betrag, mit dem Dollarzeichen, Kommas und zwei Ziffern nach dem Dezimalkomma. Wenn Sie nur gelegentlich kleine Tische mit nur wenigen Werten erstellen müssen, ist dies die einfachste, einfachste und schnellste Möglichkeit.
Erstellen eines Makros
Hier ist, wo es schwierig wird. Schreiben von Makros erfordert ein wenig Aufwand, aber nachdem das Makro erstellt haben, werden Sie in der Lage, schnell große Teile einer Tabelle durch Klicken auf eine Schaltfläche oder einen Hotkey zu formatieren.
Aktivieren Sie die Registerkarte "Entwicklertools", indem Sie auf die Office-Schaltfläche und klicken auf die Schaltfläche "Word-Optionen" am unteren Rand des Menüs. Im Abschnitt beliebt das Kontrollkästchen Sie als nächstes auf "Show Entwicklerregisterkarte in der Multifunktionsleiste" so gibt es ein Häkchen im Feld. Klicken Sie auf "OK".
Klicken Sie auf die Registerkarte Entwicklertools (zwischen Ansicht und Add-ins) in der Gruppe Code zum Öffnen des Fensters Makros Makros. Geben Sie "Format_Currency" für den Makronamen. Wählen Sie "Normal.dotm (globale Vorlage)" im Menü "Makros in" (Dies wird das Makro in jedem Dokument erstellen oder bearbeiten zur Verfügung). Klicken Sie auf "Erstellen". Visual Basic-Editor wird geöffnet. Ersetzen Sie den Text in den Editor, mit dem folgenden Code (endend mit "End Sub"):
Sub Format_Currency()'"Formatieren von Zahlen in ausgewählten Tabellenzellen als US-Währung.'Dim Tyrosin-als Word.CellTRange As Range DimWenn Selection.Type = WdSelectionIP oder Not Selection.Information(wdWithInTable) Then
MsgBox "Select numerical values in tables cells before running this macro.", , "Error"
Exit SubEndIfFür jede tCell In Selection.Cells
Set tRange = tCell.Range tRange.End = tRange.End - 1 With tRange If IsNumeric(tRange) Then .Text = FormatCurrency(Expression:=.Text) End If On Error GoTo Skip
Überspringen:
End With
Nächsten Tyrosin-EndSub
Speichern Sie und schließen Sie den Visual Basic-Editor. Wählen Sie in Word das Dropdown-Menü neben der Symbolleiste für den Schnellzugriff und wählen Sie "Weitere Befehle." Wählen Sie "Makros" im Menü "Befehle wählen Sie aus", wählen Sie das Makro Format_Currency und klicken Sie auf "Hinzufügen". Klicken Sie auf "OK". Um das Makro zu verwenden, wählen Sie die Werte, die Sie in Ihrer Tabelle formatieren möchten, und klicken Sie auf Symbolleiste für den Schnellzugriff Format_Currency.
Einfügen einer Excel-Tabelle
Haben Sie Excel, kann Einfügen einer Excel-Tabelle einfacher sein, und geben Ihnen die volle Leistungsfähigkeit von Excel-Formeln, Formatierung und andere Features.
Öffnen Sie im Menü Tabelle auf der Registerkarte Einfügen in der Gruppe Tabellen. Wählen Sie "Excel-Tabelle." Eine kleine Tabelle wird in Ihr Dokument eingefügt, und die Excel-Multifunktionsleiste erscheint anstelle der Multifunktionsleiste von Word. Geben Sie Ihre Werte in die Zellen der Tabelle. Markieren Sie die Zellen, die Sie als Währung formatieren möchten. Auf der Registerkarte Start Menü "Währung" Number Format in der Gruppe Zahlen. Klicken Sie außerhalb der Kalkulationstabelle zu schließen die Excel-Multifunktionsleiste und weiter zu Ihrem Dokument bearbeiten. Die Tabellenkalkulation wird als Tabelle ohne die Zeilen- und Spaltenbeschriftungen oder Bildlaufleisten angezeigt. Klicken Sie auf die Tabelle, und ziehen Sie der Ziehpunkte, um die Tabelle zu ändern. Doppelklicken Sie auf das Arbeitsblatt um es zu bearbeiten.