Avatar billede enriko Nybegynder
23. februar 2011 - 17:43 Der er 2 kommentarer og
1 løsning

Word 2003, VBA, Difference af to tal

Hejsa.

Jeg har et tabel i word 2003 hvor jeg taster 2 forskellige tal , lad os kalde dem A og B, og så skal jeg finde differencen af de to tal.
Tallene kan varierer, men dog er vi ned på omkring -5 altid, nogen gang er A større end B , andre gange omvendt.


Det jeg godt kunne tænke mig er , at differencerne ser sådan ud på min tabel  for det nedenstående eksampler.

eks 1:
Tallet A: -5.23
Tallet B: -5.22
Diff: -0.01

eks 2:
Tallet A: -5.22
Tallet B: -5.23
Diff: 0.01


mine variabler :
Public dc8 As Double
Public dc9 As Double
Public dc10 As Double


dc8 = InputBox("Line Out L", "Line Output L", "-5.2")
dc9 = InputBox("Line Out R", "Line Output L", "-5.2")
dc10 = dc9 - dc8




ActiveDocument.Tables(2).Cell(5, 8).Select
Selection.TypeText Text:=dc8
Selection.TypeParagraph
Selection.TypeParagraph
Selection.TypeText Text:=dc9

ActiveDocument.Tables(2).Cell(6, 8).Select
Selection.TypeParagraph
Selection.TypeText Text:=dc10


Hvis mine variabler er deklareret som double så ser differencen sådan ud : 1.00000000000007E-02

Hvis det er integer , så er A og B et helt tal. (rundet op)


Tak på forhånd
Avatar billede tjens Nybegynder
23. februar 2011 - 20:00 #1
Prøv med double variable og så tilføj Format():

Selection.TypeText Text:=Format(dc10,"###0.00")
Avatar billede enriko Nybegynder
23. februar 2011 - 21:29 #2
Jeg har lige prøvet i word 2007 , det virker bare , fremragende.

Tak for det :)

Hvis du smider et svar så er pointene på vej til dig
Avatar billede tjens Nybegynder
23. februar 2011 - 22:16 #3
Svar
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester



IT-JOB

Netcompany A/S

Test Specialist

Capgemini Danmark A/S

Network Architect

Cognizant Technology Solutions Denmark ApS

Kinaxis Sr. Solution Consultant

Pharma Nord

PHP backend-udvikler