Avatar billede ExcelJ95 Seniormester
04. april 2019 - 14:24 Der er 4 kommentarer

Afgør om et tal er helt eller ej VBA

Hej.

Jeg har brug for hjælp til, at skive kode som kan afgøre om resultatet af en udregning giver et helt tal eller ej i VBA.

Jeg forestiller mig noget i retninger af:

if N / 3 = WHOLENUMBER then
bla bla


Jeg kan bare ikke finde ud at at få defineret et helt tal

Nogen med gode råd?
pft.
04. april 2019 - 14:36 #1
'F.eks. hvis konvertering til integer giver det samme som N/3 så er det et heltal
If N/3 = int(N/3) then

'Du kan også lege med typer
If TypeName(N/3) = "Integer" Then
Avatar billede store-morten Ekspert
04. april 2019 - 22:17 #2
Prøv:
Sub HelTal()
Dim Test

N = 3

Beregning = N / 3
Test = Round(N / 3, 0) / 1 = N / 3

If Test = True Then
MsgBox "Resultatet " & Beregning & " = Heltal"
Else
MsgBox "Resultatet " & Beregning & " = Decimaltal"
End If

End Sub
04. april 2019 - 22:38 #3
store-morten, der er bestemt flere måder... INT og ROUND gør iøvrigt det samme, smider decimalerne væk.... - div med 1 er iøvrigt overflødig
INT eller TypeName er nu stadig mine favoritter... skulle jeg selv kode :-)
Avatar billede RogerWilco Seniormester
05. april 2019 - 21:45 #4
En simpel måde:

If N Mod 3 = 0 Then
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

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