Mr Kid Saya coba menambahkan prosedur event change untuk sheet 1 Private Sub Worksheet_Change(ByVal Target As Range) If Target.Count = 1 Then If Target.Column < 3 Then If Target.Row > 1 Then Target.Calculate ( sudah dicoba juga Me.Calculate ) End If End If End If End Sub
tetapi sepertinya perubahan format (normal to bol, Bold to normal) tidak menyebabkan event change (formatting bukan event) Apakah memang begitu ? Thx, *2012/6/29 Kid Mr. <[email protected]> > Karena menggunakan UDF, coba event selection change diisi activesheet.calculate > Kid. > > 2012/6/29 Markonah <[email protected]> >> Betul seperti kata Mr. Kid >> mekipun dlm UDF diberikan perintah Appl.Volatile >> perubahan sumber data (dari Bold ke NonBod / viceversa) tidak seketika mengubah hasil Fungsi >> Perubahan harus dipaksa dengan pijitan pada kunci F9*
