DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Sub bosluktire()
Selection.SpecialCells(xlCellTypeBlanks).Select
Selection.Value = "-"
End Sub
SELAM;nihan' Alıntı:MRB,ben hazırladığım tabloda bir sütun içinde kalan her boşluğa"-" gelsin istiyorum.excel fonksiyonlarından biriyle yapılabilir mi? :?
Bu da benimTürker' Alıntı:Merhaba
Sürekli elle yapılan bir çözüm ama paylaşmak istedim. - olmasını istediğiniz alanları tarayın sonra
Edit >> Go to dan açılan pencerenin altındaki special butonu seçilir.Pencere değiştiği zaman yeni pencerede blanks seçilir ve OK butonuna basılır.Boylece butun boş hücreler seçilmiş olur.
Daha sonra - tuşuna basılır ve sonra ctrl ile enter tuşuna birlikte basılır.Böylece boş hücrelerin hepsi - olur.![]()
Sub bosluktire()
Selection.SpecialCells(xlCellTypeBlanks).Select
Selection.Value = "-"
End Sub
Sub BoslukTire2()
Selection.SpecialCells(xlCellTypeBlanks) = "-"
End Sub
Hocam, kod çok kısa olursa kalitesiz gibi görünür diye düşündüm. :hiho: :hiho:Huseyin'in VBA koduna maydonoz olmak için ben de aşağıdakini önereyim bari;