*maaf, salah fatal !*
*
*
harusnya: sebelum memproses data; *event change* di disabled dulu
ini koreksinyahh..
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count = 1 Then
If Target.Address = "$X$1" Then
Application.EnableEvents = False
Target = Target / 10
Application.EnableEvents = False
End If
End If
End Sub
'-------------------------
2011/4/29 STDEV(i) <[email protected]>
> masukkan di cell X1 = 77
> outputnya diinginkan JUGA DI X1 = 7.70
>
> bisa (dengan makro)
>
> Private Sub Worksheet_Change(ByVal Target As Range)
> If Target.Count = 1 Then
> If Target.Address = "$X$1" Then
> Target = Target / 10
> End If
> End If
> End Sub
>
> jika tanpa makro walaupun dengan meng-Enablekan setting ITERATION
> tetap tidak bisa
> karena ketika anda memasukkan 70 ke cell X1 itu sama dengan
> menghapus FORMULA di X1 ( yg semula kita tulis =X1 + (X1/100) )
>
> c.w.i.i.w (colek me if ai yem werong )
>
>
> 2011/4/28 Jamil Makhmudin <[email protected]>
>
>> Dear pakar excel...mohon bantuannya... apakah bisa memasukkan angka
>> puluhan pada sel misal "x1" outputnya satuan dengan bilangan decimal 2 angka
>> di cell tersebut (x1)??
>> Misalnya memasukkan angka 77 outputnya 7,70 .... jika bisa bagaimana
>> caranya terima kasih
>>
>>
