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

4443

    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. Mies vinkkinä sulle

      Jos pyytäisit kahville tai ihan mihin vaan, niin lähtisin varmasti välittämättä muista
      Ikävä
      101
      8033
    2. Oletko katkera kun

      Et saanut kaivattuasi
      Ikävä
      107
      5647
    3. Mitä haluat sanoa tällä hetkellä

      Hänelle 🫶 ⬇️
      Ikävä
      279
      4993
    4. Haluun sua niin paljon

      ❤️🥰🥹 Miehelle
      Ikävä
      49
      4933
    5. Vietetään yö yhdessä

      Rakastellaan koko yö
      Ikävä
      76
      3707
    6. Mitä palveluita mies..

      Haluaisit tilata minulta? -N
      Ikävä
      54
      2940
    7. Oletko tyytyväinen viime tapaamiseemme?

      Vai toivoitko sen menevän toisella tavalla? Miten?
      Ikävä
      64
      2667
    8. Olet oikeasti ollut

      Niin tärkeä mulle ja kaikki meidän väliltä on pilattu ei yksistään sinun toiminnalla vaan minun myös.
      Ikävä
      22
      2498
    9. Kuuluu raksutus tänne asti kun mietit

      Pelkäätkö että särjen sydämesi vai mikä on? En mä niin tekisi mies koskaan 😘
      Ikävä
      29
      2432
    10. Nyt se sit loppuu

      Et ei enää nähdä ja yhteyttä pidetä.
      Ikävä
      42
      2358
    Aihe