Sayıları 6 ve katlarına yuvarlama

[TCBAKINCI]

Merhabalar
Elimde bir süre değerlerini içeren kolonvar.
Kolondaki rakamları 6 ve 6 nın mislilerine yuvarlamaya çalışıyorum
Mesela
(8) değeri 12 ye - (14) değeri 18 e yuvarlamaya çalışıyorum..ROUND UP formülünü tam olarak nasıl bu mantığa uyarlarım..

Süre değerlerini içeren dosya da ektedir...
Konu biraz acil dir...

Tşk

 

[Korhan Ayhan]

Selamlar,

B2 hücresine aşağıdaki formülü uygulayıp denermisiniz.

=EĞER(MOD(A2;6)=0;A2;A2+6-MOD(A2;6))

 

[hamitcan]

Ben de kod ile yapmaya çalıştım. Bir deneyin.

Sub nn()
For i = 2 To [a65536].End(3).Row
    Cells(i, 2) = Cells(i, 1)
10:
    If Cells(i, 2) Mod 6 = 0 Then GoTo 20
    If Cells(i, 2) Mod 6 <> 0 Then
        Cells(i, 2) = Cells(i, 2) + 1
        GoTo 10
    Else
        Cells(i, 2) = Cells(i, 1)
    End If
20:
Next
End Sub

 

[Ali]

=YUKARIYUVARLA(A2/6;0)*6

yazınız.

 

[TCBAKINCI]

Çok tşk gerçekten çok işime yaradı birde merakımı çekti ya eğer 6 ın katlarına yuvarlamak isteseydim mesela 6 - 36- 216 - 1.296 ın altının katları olduğunu düğünürsek mesela kolonumda 40 sayısı olsa direk 40 değerini 216 ya yuvarlamak istesem nasıl bir bağıntı yazmam gerekirdi..Tşk

 

[egebes]

bunun icin 40= 6^x denkleminden x i cekip kendine en yakin ust tamsayiya yuvarlamak ve bu sayiyida 6 nin ussu olarak kullanmak gerekiyor.

bu formulude hucre icine
=6^ROUNDUP(LOG(40)/LOG(6);0) seklinde kopyalayabilirsiniz.
Burada 40 ve 6 rakamini bir hucreye baglayip degisken olarakta kullanabilirsiniz.