60;"Hour";30;"Thirty";20;"Twenty";15;"Fifteen";10;"Ten";5;"Five";1;"Minute"
sütun sayısı=2
sütun genişliği=0
yapıp
Select Case selectivite döngüsü yerine de aşağıdaki kodu yazmayı dener misiniz
sadece saati göstermek için
çember kısmını daha halledemedim
Hassas = Me.selectivite
SonDgr = Round(SonDgr / Hassas) * Hassas '