LÜTFEN YARDIM ( HASANAGA) YAZISINDA HASAN NORMAL AGA İSE ÜST KARAKTER OLARAK YAZILIDIR FORMULÜN ÜST KARAKTER KISMINI 3 - 5 VEYA 10 KARAKTER NE OLURSA OLSUN SİLİNMESİNİ İSTİYORUM YARDIM EDECEK DOSTLARA ŞİMDİDEN ÇOK TEŞEKKÜRLER.
Sub EfektSil()
Dim a As Range, i As Byte, d As String, deg As String
For Each a In Range("A1:A10")
For i = 1 To Len(a.Value)
d = Mid(a.Value, i, 1)
If a.Characters(i, 1).Font.Superscript = False Then
deg = deg & d
End If
Next i
a.Value = deg
deg = ""
Next a
End Sub
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.