gekopieerde selectie omzetten naar een variable

[ReilingJ]

Hallo,
dit forum bracht me naar http://users.pandora.be/ingrid/excel/index.htm. Hier staat een stukje programmakode voor het omzetten van getallen naar tekst m.b.v. een macro.
Deze kode wil ik toepassen in een Word-sjabloon met VBA-kode maar dan zonder macro. In mijn programma maak ik een kopie van een getal uit een tabel. De gekopieerde waarde wil ik verderop in het document automatisch om zetten in tekst.

Probleem voor mij is dat ik niet weet hoe ik de gekopieerde selectie om moet zetten in een variable.
De code ziet er als volgt uit:

Dim getal As decimal

Selection.GoTo What:=wdGoToBookmark, Name:="BmBrutoVerpacht"
    With ActiveDocument.Bookmarks
    End With
  Selection.MoveUp Unit:=wdLine, Count:=3
    Selection.MoveRight Unit:=wdCell
    Selection.Copy
    Selection.GoTo What:=wdGoToBookmark, Name:="BmBrutoVerpacht"
    With ActiveDocument.Bookmarks
        .DefaultSorting = wdSortByName
        .ShowHidden = False
    End With  
Selection.PasteAndFormat (wdPasteDefault)
‘vervolgens wil ik de gekopieerde waarde in een variabele “getal” zetten ’
Getal=selection.paste

Wie weet wat ik op de laatste regel moet zetten?

Jan.

 

[Jan van Asseldonk]

ben iets minder thuis in vba bij Word, maar het meest logische lijkt mij

Getal=selection.value

niet getest.

 

[ReilingJ]

Jan
bedankt voor je antwoord, maar helaas, het werkt niet
groet Jan.