- Katılım
- 1 Mart 2005
- Mesajlar
- 22,254
- Excel Vers. ve Dili
-
Win7 Home Basic TR 64 Bit
Ofis-2010-TR 32 Bit
Kod:
Sub karakterler()
ad = [A1]
isim=ad
ad = Len(ad)
For i = 1 To ad
r = Mid([A1], i, 1)
MsgBox r
If r = " " Then
msgbox isim & " ismli sayfa adında boşluk karakterine rastlandı.!!"
Exit For
End If
Next
End Sub
Yukarıdaki kodlar ile A1 hücresindeki verinin içinde boşluk karakteri olup olmadığına bakıyorum.
Makrolar ile çalışırken Sheet isimlerinde boşluk olursa Makro göçüyor.
Sheet ismlerinde boşluk ve diğer yasak karakterlerin neler olduğunu öğrenmek istiyorum.
Teşekkür ederim.
İyi çalışmalar.
:hey: