Luvun pyöristys ylöspäin

Katikulta

Miten Excelissä voi pyöristää luvun ylöspäin lähimpään seuraavaan kokonaislukuun, kyse on makrolla tapahtuvasta toiminnosta ja lähtöluku on single- tyyppinen luku jonka haluan pyöristää ylöspäin seuraavaan kokonaislukuun.

Kati

5

4472

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • Oleppas hjyvä

      CEILING
      Show All
      Hide All
      Returns number rounded up, away from zero, to the nearest multiple of significance. For example, if you want to avoid using pennies in your prices and your product is priced at $4.42, use the formula =CEILING(4.42,0.05) to round prices up to the nearest nickel.

      Syntax

      CEILING(number,significance)

      Number is the value you want to round.

      Significance is the multiple to which you want to round.

      Remarks

      If either argument is nonnumeric, CEILING returns the #VALUE! error value.
      Regardless of the sign of number, a value is rounded up when adjusted away from zero. If number is an exact multiple of significance, no rounding occurs.
      If number and significance have different signs, CEILING returns the #NUM! error value.

      • Katikulta

        En saa toimimaan VBA-koodissa, antaa seuraavan virheilmoituksen: "Sub-, Function- tai Property-toimintosarjaa ei ole määritetty (Virhe 35)"


      • Katikulta kirjoitti:

        En saa toimimaan VBA-koodissa, antaa seuraavan virheilmoituksen: "Sub-, Function- tai Property-toimintosarjaa ei ole määritetty (Virhe 35)"

        vaan näin esim.
        luku=Application.WorksheetFunction.Ceiling(Range("A1"), 1)

        yksi mahdollinen voisi olla Round Application.WorksheetFunction.Round

        VBAssa Round ja Int voisi tulla kysymykseen


      • Katikulta
        kunde kirjoitti:

        vaan näin esim.
        luku=Application.WorksheetFunction.Ceiling(Range("A1"), 1)

        yksi mahdollinen voisi olla Round Application.WorksheetFunction.Round

        VBAssa Round ja Int voisi tulla kysymykseen

        Ratkaisin asian Int-komennolla ja lisäämällä katkaistuun lukuun ykkösen. Nyt saan tuloksena ylöspäin seuraavaan kokonaislukuun pyöristetyn luvun, joka toimii oikein mainiosti.


      • Katikulta kirjoitti:

        Ratkaisin asian Int-komennolla ja lisäämällä katkaistuun lukuun ykkösen. Nyt saan tuloksena ylöspäin seuraavaan kokonaislukuun pyöristetyn luvun, joka toimii oikein mainiosti.

        toimii erilailla VBA ja Excel

        The Round() funktio Excelissä käyttää aritmeettistä pyöristystä, mikä pyöristää .5 ylöspäin kun taas VBA käyttää Bankerin pyöristystä, joka pyöristää ylös tai alas riipuen lähimmästä parillisesta luvusta.
        Siis tulokset
        3,5 excel 4 ja VBA 4
        4,5 Excel 5 ja VBA 4

        tolla voi testata
        Sub koe()
        Range("B1") = Round(Range("A1"), 0)
        Range("B2") = Application.WorksheetFunction.Round(Range("A1"), 0)
        End Sub


    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Luetuimmat keskustelut

    1. IL - Kansanedustaja tehnyt ITSEMURHAN eduskuntatalossa!!

      "IL:n tiedot: Kansanedustaja tehnyt itsemurhan Eduskuntatalossa Iltalehden tietojen mukaan kansanedustaja on tehnyt its
      Maailman menoa
      412
      9066
    2. Eemeli Peltonen teki itsemurhan eduskuntatalossa

      Kevyet mullat sitten vaan. Ei mulla muuta.
      Maailman menoa
      188
      3652
    3. Kuka pistetty kylmäksi

      Ketähän joutunu puukkohipan uhriksi? Tietääkö kukkaan?
      Kajaani
      20
      2113
    4. Mietin että

      Onko tarinallamme vielä luvussa tilaa kohtaamiselle vai jääkö se tähän.
      Ikävä
      83
      1302
    5. Postilaatikoista

      Tuntuu kaikki tietävän tekijän/tekijät, mutta miksi nimiä ei julkaista???
      Kihniö
      27
      1115
    6. Sylikkäin.

      Sylikkäin, suudellen. Milloin haluaisit näin nainen tehdä ? Vain häntä ajatellen 😘. Tietenkin jos häntä asia kiinnosta
      Ikävä
      66
      1102
    7. Oletko samaa mieltä

      Että on parempi olla erillään?
      Ikävä
      75
      1100
    8. Eemeli Peltosen viimeinen postaus Facebookissa!

      "Olen ollut kevätistuntokauden viimeisillä viikoilla paljon poissa eduskuntatyöstä. Sain toukokuussa hyvää hoitoa HUSiss
      Maailman menoa
      79
      1075
    9. Nainen arvaa kuka

      En ikävä kyllä elä enää pitkään
      Ikävä
      55
      1033
    10. Sano nyt kiertääkö

      Huhut meistä tai jostain muusta?
      Ikävä
      66
      982
    Aihe