"AFRUND.LOFT" i WORD-TABEL?

Håber en eller anden har løsningen?

Jeg skal i en MS WORD (ved hjælp af genvejstast) tillægge 15% for hver markeret tal i en tabel, og afrunde resultat (uden decimaler) til nærmeste hele tal (altid rundet op!)

Jeg har lavet følgende Makro (knyttet til genvejstast)

1. Sub Makro1()
2. Dim Pris As Double
3. Dim Pris2 As Double 
4. Pris = Selection.Text 
5. 'Pris2 = Application.WorksheetFunction.RoundUp(Pris * 1.15, 0)       
6. Pris2 = Round(Pris * 1.15, 0)   
7. MsgBox (Pris2)
8. Selection.TypeText Text:=Pris2
9. End Sub

Linje 5. burde altid runde op, men virker ikke -->
Returnerer fejlen: "Method or data member not found"

Linje 6. virker! - men runder ikke altid op!!!

(Jeg har sat Tools referencen "Microsoft Excel 16.0 Object Library")