Excel Makro ile Büyük/Küçük Harf Değiştirme

Excel ile hayal edebileceğimiz herşeyi yapabileceğimizi biliyoruz. Düğmeye atıyacağımız bir makro ile hücre(ler)de bulunan metinlerin büyük/küçük harf değişimini yapmayı öğreniceğiz.
Ders Excel 2003 ile oluşturulmuştur.

1. Boş bir Excel sayfası oluşturup kaydediyoruz. Ve araç çubuğuna sağ klikleyip "Formlar" Araç Kutusunu aktif hale getiriyoruz.





2. A1 hücresinden başlıyarak aşağıdaki kayıtları Excel'e giriyoruz.

excel dersleri
EXCEL DERSLERİ
eXCeL dERsLerİ



3. Formlar araç kutusundan "Düğme" öğesini seçiyoruz.



4. Excel ekranında düğmemizi istediğimiz boyutta çiziyoruz. Çizim bittikten sonra ekrana otomatik olarak "Makro Ata" penceresi gelecektir. Çıkan pencereden yeni düğmesine tıklıyoruz.



5. Ekrana gelen Microsoft Visual Basic penceresine aşağıdaki değerleri giriyoruz.

Hücre(ler)deki metin değerini büyük harfe döndürmek için;

Sub Düğme1_Tıklat()
' Belirtilen aralıktaki her bir hücreye tek tek git.
For Each x In Range("A1:A3")
' Aralıktaki metni büyük harflere dönüştür.
x.Value = UCase(x.value)
Next
End Sub

Hücre(ler)deki metin değerini küçük harfe döndürmek için;

Sub Düğme1_Tıklat()
' Belirtilen aralıktaki her bir hücreye tek tek git.
For Each x In Range("A1:A3")
x.Value = LCase(x.Value)
Next
End Sub

Hücre(ler)deki tüm metni ilk harfleri büyük harfe döndürmek için;

Sub Düğme1_Tıklat()
' Belirtilen aralıktaki her bir hücreye tek tek git.
For Each x In Range("A1:A3")
' Visual Basic'te Yazım Düzeni işlevi yoktur.
' Bu nedenle, çalışma sayfası işlevini aşağıdaki şekilde kullanmalısınız:
x.Value = Application.Proper(x.Value)
Next
End Sub



6. Sayfayı kaydediyoruz.



7. Excel sayfamıza geçiyoruz ve Düğme1 öğesine tıklıyoruz. Hücredeki metinler yazdığınız makroya göre değişecektir.



Ders tamamlanmıştır.

İyi çalışmalar...

0 yorum:

Yorum Gönder