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

4463

    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. Useita puukotettu Tampereella

      Mikäs homma tämä nyt taas on? "Useaa henkilöä on puukotettu Tampereen keskustassa kauppakeskus Ratinan lähistöllä." ht
      Tampere
      277
      5229
    2. Laitetaas nyt kirjaimet tänne

      kuka kaipaa ja ketä ?
      Ikävä
      59
      4769
    3. Kuka rääkkää eläimiä Puolangalla?

      Poliisi ampui toistakymmentä nälkiintynyttä eläintä Puolangalla Tilalta oli ollut karkuteillä lähes viisikymmentä nälkii
      Puolanka
      96
      3744
    4. Leipivaaran päällä on kuoleman hiljaista.

      Suru vai suuri helpotus...
      Puolanka
      51
      2760
    5. Pieni häivähdys sinusta

      Olet niin totinen
      Ikävä
      22
      2277
    6. Meneeköhän sulla

      oikeasti pinnan alla yhtä huonosti kuin mulla? Tai yhtä huonosti mutta jollain eri tyylillä? Ei olisi pitänyt jättää sua
      Ikävä
      46
      1883
    7. Koska näit kaivattusi viimeksi

      Milloin tapasit rakkaasi? Ja etenikö suhde yhtään?
      Ikävä
      118
      1800
    8. Lähetä terveisesi kaipaamallesi henkilölle

      Vauva-palstalta tuttua kaipaamista uudessa ympäristössä. Kaipuu jatkukoon 💘
      Ikävä
      99
      1536
    9. Tekiskö nainen mieli tavata...

      Viikonloppuna ja...?
      Ikävä
      71
      1115
    10. PS uusimman gallupin rakettimainen nousija

      https://yle.fi/a/74-20170641 Aivan ylivoimaisesti suurin kannatuksen nousu PS:lle. Nousu on alkanut ja jatkuu 2 vuoden
      Maailman menoa
      153
      1094
    Aihe