Witamy na forum PC Format Zapraszamy do REJESTRACJI


Użytkownicy przeglądający ten wątek: 1 gości

[VBA Excel] Zaokrąglanie liczby w górę

#1
[VBA Excel] Zaokrąglanie liczby w górę
Witam,

Mam mały problem, a mianowicie chcę zaokrąglić liczbę w górę, ale co 0,5 czyli jeśli mamy 1,34 to chce uzyskać 1,5 - bądź jeśli jakaś liczba równa jest 1,51 to zaokrąglić w górę do 2. Tworząc formułę bez problemu uzyskam taki efekt, natomiast wprowadzając kod do makra już mi to nie wychodzi.

Próbowałem dwoma sposobami:


Kod:
1. Range("A1").Value = Round(1.34, 1) - ale to zaokrągla tylko do liczby miejsc po przecinku

2. Range("A1")Value = Application.WorksheetFunction.RoundUp(1.34, 0.5) - ale tutaj zaokrąglało mi do pełnych liczb np do 1,4

Nie wiem jak to zrobić, albo robię jakiś błąd. Proszę o pomoc Wesoły
ZADRZYJ Z NAJLEPSZYM, UMRZESZ JAK RESZTA.
 System operacyjny: windows_ten Przeglądarka: firefox
#2
RE: [VBA Excel] Zaokrąglanie liczby w górę
Kod:
Option Explicit

Sub zaokr_do_pol()
Dim i As Integer

For i = 1 To 10
    Cells(i, 2).Value = WorksheetFunction.RoundUp(Cells(i, 1).Value * 2, 0) / 2
Next i

End Sub
Nie pomagam na PW (ew. odpłatnie). 
I osobom z roszczeniowym podejściem. I osobom niedbającym o poprawność językową.
Jak podawać logi
Jeśli nie odpowiadam w danym wątku przez >3 dni - proszę o przypomnienie na PW z linkiem do wątku w treści.




 System operacyjny: windows_seven Przeglądarka: firefox
#3
RE: [VBA Excel] Zaokrąglanie liczby w górę
Dzięki za pomoc Wesoły
ZADRZYJ Z NAJLEPSZYM, UMRZESZ JAK RESZTA.
 System operacyjny: windows_ten Przeglądarka: firefox
Programy: Polecane / Nowe / Inne




Podobne wątki ([VBA Excel] Zaokrąglanie liczby w górę)
Wątek: Autor Odpowiedzi: Wyświetleń: Ostatni post
  [VBA Excel] Wyszukiwanie wartości w kolumnie Pioro 2 16693 22.06.2020, 18:27
Ostatni post: Pioro
  Visual Basic Excel l.całkowitą przedstawić w postaci szesnastkowej fugaz 4 19356 18.06.2019, 21:36
Ostatni post: fugaz
  VBA excel dmjs 6 17555 17.04.2019, 10:20
Ostatni post: ptrick

Skocz do: