vbamania.pl
login:
hasło:
 
  *Rejestracja *Zapomniane hasło
 Dziś jest sobota, 18 maja 2024 roku.
Ustaw jako stronę startową Ulubione Napisz
PowrótPowrót do serwisu  RegulaminRegulamin rssRSS

  tytuł wątku:
Wątki dyskusji

Dodawanie minut, godzin w Excel


otwartyotwarty rozpoczął: badip postów: 8



napisał: badip
postów: 6


umieszczony:
18 września 2007
10:35

  
Zamiana formatu minutowego (do 60) na liczbe (do 100)
int(A1) + ( A1 - int(A1) )*5/3
PS. Np 2,15 czyli 2 godziny i 15 minut, po zamianie otrzymamy 2,25

Zsumowanie:
int(sum()) + (sum() - int(sum()))*3/5

Przyklad:

Sumuje (do 60) komorki A3:C3:

=INT(SUM((INT(A3) + (A3 - INT(A3))*5/3)+INT(B3) + (B3 - INT(B3))*5/3+INT(C3) + (C3 - INT(C3))*5/3))+(SUM((INT(A3) + (A3 - INT(A3))*5/3)+INT(B3) + (B3 - INT(B3))*5/3+INT(C3) + (C3 - INT(C3))*5/3)-INT(SUM((INT(A3) + (A3 - INT(A3))*5/3)+INT(B3) + (B3 - INT(B3))*5/3+INT(C3) + (C3 - INT(C3))*5/3)))*3/5

pozdrawiam :)
B.
napisał: badip
postów: 6


umieszczony:
18 września 2007
09:05

  
Jeszcze jedno pytanie...

Potrzebuje wykonac sumowanie w minutach (do 60 tak jak to wczesniej T. napisal,) jednak mam do zsumowania zakres komorek A1:H1..
PS. Mam angielska wersje Excela.

dzieki !
B.
napisał: badip
postów: 6


umieszczony:
10 września 2007
20:26

  
Dzieki Trebor!
Rewelacja :)

pozdrowienia,
B.
napisał: badip
postów: 6


umieszczony:
10 września 2007
20:24

  
Najlepiej to zrobic tak:
np.
5,25 (5h25m)

5 + 0,25 zatem znalezc komende, która oddziela liczbe i ulamek,
nastepnie ulamek pomnozyc razy 5/3 (zamiana na dziesietne)
Dodac liczby
I pomnozyc ulamek wyniku razy 3/5...

Jak wyciagnac liczbe po przecinku ?

pozdrowienia,
B
napisał: Trebor
postów: 1209


umieszczony:
10 września 2007
20:21

  
Spróbuj tak dla zakresu godzin A1:B10
Sub godziny()
Dim godzina As Integer
Dim minuta As Double
Dim wiersz As Long
For wiersz = 1 To 10
godzina = Int(Cells(wiersz, 1)) + Int(Cells(wiersz, 2)) 'wstępnie pełne godziny
minuta = (Cells(wiersz, 1) - Int(Cells(wiersz, 1))) + (Cells(wiersz, 2) - Int(Cells(wiersz, 2))) 'wstępnie minuty
Cells(wiersz, 3) = godzina + Int(minuta / 0.6) + (minuta * 100 Mod 60) / 100
Next wiersz
End Sub

napisał: badip
postów: 6


umieszczony:
10 września 2007
19:16

  
Juz wyjasniam...

format: godzina,minuta..

5,45 to 5 godzin i 45 minut.. dodajac 0,22 (22 minuty) chce otrzymac 6,07 (6 godzin i 7 minut).

niestety musze uzyc kodu VBA bo program wykonuje petle itp.. takze formula odpada a widze, ze dobrze prawie wykombinowales !!

Takze probuje wciaz z kodem.....

pozdrawiam,
B
napisał: Trebor
postów: 1209


umieszczony:
10 września 2007
19:07

  
Spróbuj taką formułę
=LICZBA.CAŁK(A1)+LICZBA.CAŁK(B1)+LICZBA.CAŁK((PODSTAW(A1;LICZBA.CAŁK(A1)&",";"")+PODSTAW(B1;LICZBA.CAŁK(B1)&",";""))/60)+WARTOŚĆ("0,"&MOD(PODSTAW(A1;LICZBA.CAŁK(A1)&",";"")+PODSTAW(B1;LICZBA.CAŁK(B1)&",";"");60))



Chociaż niezupełnie rozumiem co masz na myśli pisząc format godzina,minuta

Pozdrawiam
napisał: badip
postów: 6


umieszczony:
10 września 2007
07:52

  
Witajcie !!

Sprawa jest nietrywialna ..

Potrzebuje zaimplementowac makro, (moze jest funkcja w Excelu której nie znam?..) ktore wykonuje obliczenia na minutach.
W komorki osoba wpisuje w formacie: godzina,minuta (np. 4,35) Chce aby excel liczyl do 60 ! nie do 100 !
Czyli aby 4,55 + 0,12 bylo rowne 5,07 a nie 5,67....
Waznym jest aby oddzielic godzine i minute wlasnie przecinkiem !

Poradzicie? Na pewno mieliscie podobny problem.

Pozdrowienia,
Bartek


<-wstecz  1  dalej->
wszystkich stron: 1


Sortuj posty: z