Währungsbetrag nach Word übergeben

[Harsefeld]

Hallo

Ich arbeite noch mit Word/Access 2003.

Hierbei habe ich in dieser Datenbank nur Berichte benutzt. Nunmehr möchte ich anstelle eines Berichtes ein Worddokument ansteuern.
Das Ganze sieht wie folgt aus:

Private Sub Befehl50_Click()
Dim objWord As Word.Application

Set objWord = CreateObject("Word.Application")

With objWord
.Visible = True

.Documents.Open ("Rechneraddresse") 'das zu öffnende Worddokument

.activedocument.Bookmarks("Geld").Select
.Selection.Text = Me!Geldbetrag

Alles klappt auch, aber anstelle einer Zahl mit 2 Nachkommastellen wirft mir Word nur die nackte Zahl aus (also 20 bei 20,00 bzw. 20,5 bei 20,50 ). Wie muss ich es ändern dass eine Zahl mit 2 Nachkommastellen ausgeworfen wird? In Access läuft die Zahl als Währung.

[DF6GL]

Hallo,


z. B.:

.Selection.Text = Format( Me!Geldbetrag,"0.00")

[Harsefeld]

Wunderbar. Hat geklappt.