excel - obcinanie groszy zamiast zaokrąglania

	B O A R D
	» Board » Zadaj pytanie » Archiwum » Szukaj » Stylizacja

M E N U

» Nowości

» Archiwum

» Recenzje / Testy

» Board

» Rejestracja

Szukaj @ TwojePC

	OBECNI NA TPC
	» coolio 04:55 » Martens 04:52 » NWN 04:42 » ngP 04:41 » selves 03:38 » Bonifacyz 03:06 » piszczyk 01:43 » Chavez 01:26 » Chrisu 01:25 » metacom 01:21 » BoloX 01:16 Dzisiaj przeczytano 36866 postów, wczoraj 25433 Szybkie ładowanie jest: włączone.

ccc

A R C H I W A L N A W I A D O M O Ś Ć

excel - obcinanie groszy zamiast zaokrąglania , DeK 14/11/04 14:51
jak zrobić żeby w komórce w której się wspisuje kwotę po wpisaniu 45,66 obcinał mi to 66gr a nie zaokrąglał do 46zł ?
Prawdopodobnie trzeba użyć LICZBA.CAŁK ale jak zrobić żeby funkcja zmieniała mi wpisane dane w tej samej komórce?
Chyba ze jest inne rozwiązanie z excela jestem noga

Skasowanie miejsc edziesiętnych we wlasciwosciach komórki nic nie daje bo wlasnie wtedy mi automatycznie zaokrągla.

Tak jak piszesz... , JE Jacaw 14/11/04 18:07
...trzeba się posłużyć jakąś funkcją np. liczba całkowita, jednak nie znam sposobu, aby to funkcjonowało w tej samej komórce. No, chyba, że jakieś makro, ale tu się już nie znam.
Socjalizm to ustrój, który
bohatersko walczy z problemami
nieznanymi w innych ustrojach
odp , Zajkos 15/11/04 09:16
makro przypisane do zdarzenia OnChange dla wybranego arkusza (WorkSheet) i zmiany w komorce A1.

Private Sub Worksheet_Change(ByVal Target As Range)

For i = 1 To Target.Areas.Count
With Target.Areas(i)
For j = Target.Areas(i).Row To Target.Areas(i).Row + Target.Areas(i).Rows.Count
For k = Target.Areas(i).Column To Target.Areas(i).Column + Target.Areas(i).Columns.Count

If k = 1 And j = 1 Then ' k to nr wiersza, j nr kolumny komorki ktora ma byc sprawdzana
If IsNumeric(Application.Cells(j, k)) Then
Application.Cells(j, k).Value = Int(Application.Cells(j, k))
End If
End If

Next k
Next j

End With
Next i
End Sub
1. dzięki , DeK 15/11/04 14:03
  :-)
2. Acha jeszcze jedna mała rzecz , DeK 18/11/04 01:16
  Jak zmodyfikować to makro żeby nie pojawiało się zero w komórce w której nic nie ma a do której odnośi się makro?
  Ogólnie wlasnie o to mi chodziło tylko to zero zawadza.
  
  pozdr.
najprościej to kilknąć dwa razy , jam1 15/11/04 14:16
na taka ikonke
,00
->.0
zmniejszaj dziesiętne
p4N 3Ghz +2GBRAM+6600GT
1. albo grosze zapisywac w innej kolumnie , jam1 15/11/04 14:24
  też fajne
  p4N 3Ghz +2GBRAM+6600GT