@GrabkaMan: Number formats - custom formats i tam wpisz: 00\:\0\0 - po wpisaniu 14 dostaniesz 14:00. Jeżeli wpisujesz 1430 to wystarczy wpisać 00\:00. Daj znać w razie problemów.
Wpisuj tak: 930 dla minut 14 dla pełnych godzin. W zestawie makro(bez dobrego error handlingu, wiec wpisuj uważnie ( ͡°͜ʖ͡°) )
Sub changedatetype
sVal = 0
Set colRng = cells(1,1).entieecolumn For each cl in colrng.specialcells(xlcelltypeconstants).cells Hval = 0 Mval = 0 If len(cl.value) = 1 or len(cl.value) =2 then Hval = cl.value Cl.value = timeserial(hval,mval,sval) Elseif len(cl.value) =3 or len(cl.value) = 4 then Hval
Mam na myśli, że jak jakaś data będzie mniejsza niż dzisiejsza to by zmienił kolor automatycznie na zielony czy coś. Można tak?
#excel #pytanie #microsoft
http://www.conowego.pl/porady/praca-z-excelem-100-porad-i-trickow-czesc-i-13184/
Chciałbym, by po wpisaniu 14 zamiast 00:00 wpisała mi się godzina: 14:00
Można to jakoś ogarnąć?
Aktualnie żeby wpisać godzinę muszę wpisać całość, czyli: 14:00, a potrzebuję, by on sam uzupełniał sobie zera.
No i potrzebuję czasem wpisać: 14:30, co powinno działać normalnie tak jak wpisuję. Da radę to ogarnąć?
00\:\0\0 - po wpisaniu 14 dostaniesz 14:00. Jeżeli wpisujesz 1430 to wystarczy wpisać 00\:00. Daj znać w razie problemów.
Więc chyba lipton. :|
Sub changedatetype
sVal = 0
Set colRng = cells(1,1).entieecolumn
For each cl in colrng.specialcells(xlcelltypeconstants).cells
Hval = 0
Mval = 0
If len(cl.value) = 1 or len(cl.value) =2 then
Hval = cl.value
Cl.value = timeserial(hval,mval,sval)
Elseif len(cl.value) =3 or len(cl.value) = 4 then
Hval