Seçili Alandan İstenilen Karakteri Kaldırma
21 Şubat 2021
835
Seçili Alandan İstenilen Karakteri Kaldırma isimli kod, seçmiş olduğuz alanda yer alan bir karakteri hızlı bir şekilde kaldırmanızı sağlamaktadır.
Sub removeChar()
Dim Rng As Range
Dim rc As String
rc = InputBox("Değiştirilecek karakter(ler)", "Enter Value")
For Each Rng In Selection
Selection.Replace What:=rc, Replacement:=Empty
Next
End SubGerekli Adımlar
Kodu çalıştırmanız için aşağıdaki adımları yerine getirmeniz gerekir.
- Microsoft Visual Basic for Applications penceresini (Alt + F11) açın.
- Project - VBAProject alanının, ekranın sol tarafında görüldüğünden emin olun. Görünmüyorsa, Ctrl + R kısayolu ile hızlıca açın.
- Microsoft Excel Objects yazısının solundaki + simgesini tıklayın ve BuÇalışmaKitabı kısmına çift tıklayın.
- Üstteki kodu yapıştırın.
Kod Açıklaması
Kaldırmak istediğiniz karakteri yazmanız yeterli olacaktır.
Etiketler :
| YARARLI KISAYOLLAR | |
|---|---|
| VB Penceresini Açmak | Alt F11 |
| Ad Yöneticisi Penceresinin Açılması | Alt F X |
| İşlev Ekle Penceresini Açma | Shift F3 |
| Tüm Tabloyu Seçme | Ctrl A |
| Bitişik Hücre Aralığı Seçme | Shift Tıklama |