Yazarken değilde yazdıktan sonra aşağıdaki kod ile aralık verilebilir. Kodu sayfanın kod sayfasına kopyalayarak deneyin.
[vb:1:38fdfb6612]Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
For a = 1 To Len(Target)
deg = deg & Mid(Target, a, 1) & " "
Next
Target = deg
Application.EnableEvents = True
End Sub
[/vb:1:38fdfb6612]
Sizlere daha iyi bir deneyim sunabilmek icin sitemizde çerez konumlandırmaktayız, web sitemizi kullanmaya devam ettiğinizde çerezler ile toplanan kişisel verileriniz Veri Politikamız / Bilgilendirmelerimizde belirtilen amaçlar ve yöntemlerle mevzuatına uygun olarak kullanılacaktır.