Herkese merhaba , forumu yakından takip edip birçok konusa destek alıyorum öncelikle teşekkürler. Yine bu forumdan aldığım kod ile G:K sütunları arasında otomatik sayıları saate çevirme kodu kullanıyorum. Ancak belirtilen sütunlara yanlışlıkla harf yazılınca aşağıdaki hatayı alıyorum ve formül çalışmıyor . yardımlarınızı rica ediyorum teşekkürler
run time error 13 type missmatch
hatası alıyorum. Aşağıdaki kodu kullanıyorum
Kod:
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [G:K]) Is Nothing Or Target.Row < 2 Then Exit Sub
Application.EnableEvents = False
Target = TimeSerial(Int(Target.Value / 100), Target.Value Mod 100, 0)
Application.EnableEvents = True
End Sub