VBA İle | Nasıl Kullanılır ... Excel VBA'da İfadeyle Bitir?

Excel VBA'da Bildirim ile

With ifadesi, VBA'da belirtilen bir nesnenin tüm özelliklerine ve yöntemlerine erişmek için kullanılır. Önce hangi VBA nesnesine atıfta bulunduğumuzu tedarik etmeliyiz, ardından With ifadesini End With ile kapatmalıyız , sonra bu ifadenin içinde söz konusu nesnenin tüm özellik değişikliklerini ve yöntemlerini gerçekleştirebiliriz.

VBA'da With Statement'in sözdizimi aşağıdadır.

 [NESNE] [Kod… Ne yapılması gerekiyor?] İle Bitir

Nesne, bahsettiğimiz bir dizi hücre veya hücreden başka bir şey değildir ve daha sonra özellikleri değiştirebilir ve bu belirli hücre veya hücrelerle ilişkili tüm yöntemleri uygulayabiliriz.

Excel VBA'da İfadeyle Nasıl Kullanılır?

Aşağıda Excel VBA'da With Statement kullanmak için bazı örnekler verilmiştir.

Bu VBA'yı Excel Şablonu ile buradan indirebilirsiniz - Excel Şablonlu VBA

Örnek 1

A1 hücresinde belirli bir değere sahip olduğunuzu varsayın, metni A1 hücresine "Excel VBA" olarak girdim.

Şimdi bu hücre için bazı görevleri, yani excel'de biçimlendirme yapmam gerekiyor.

Yazı tipi boyutunu, yazı tipi adını ve iç rengini değiştirmek, bir kenarlık eklemek, vb. İstiyorum… Tipik olarak yaptığımız şey, önce hücreye VBA RANGE nesnesini kullanarak başvurmaktır.

Kod:

 Alt İle_Örnek1 () Aralık ("A1") Son Alt

Şimdi yazı tipi boyutunu değiştirmek için bu hücrenin "yazı tipi" özelliğine erişiyoruz.

FONT özelliği altında Size özelliğine erişiriz ve eşittir işareti koyarak boyutu gireriz.

Kod:

 Sub With_Example1 () Range ("A1"). Font.Size = 15 End Sub

Şimdi benzer şekilde, aşağıda gösterildiği gibi diğer biçimlendirme görevlerini yapıyoruz.

Kod:

 Alt With_Example1 () Aralık ("A1"). Font.Size = 15 Aralık ("A1"). Font.Name = "Verdana" Aralık ("A1"). Interior.Color = vbYellow Aralık ("A1"). Kenarlıklar .LineStyle = xl Contininuous End Sub

Bu, belirtilen tüm görevleri gerçekleştirecektir, ancak her seferinde hücre adresini sağladığımız her biçimlendirme etkinliğini gerçekleştirmek için koda bakarsanız, bu kodun uzun ve zaman alıcı görünmesine neden olur.

Şimdi her seferinde hücre adresi girişini azaltmak için VBA With ifadesini kullanacağız. Excel VBA'da WITH ifadesini açın ve hücre adresini sağlayın.

Kod:

 Alt İle_Örnek1 () Aralıklı ("A1") Son Alt

With ifadesinin içine, A1 hücresinin tüm özelliklerini ve yöntemlerini görmek için bir nokta koyun.

Şimdi ilk biçimlendirme etkinliği yazı tipi boyutunu değiştiriyor, bu nedenle FONT'a ve bu SIZE özelliğine erişin.

Kod:

 Sub With_Example1 () With Range ("A1") .Font.Size = 15 End Sub

Benzer şekilde, diğer biçimlendirme kodlarını sağlayın ve VBA With Statement'ı kapatın.

Kod:

 Sub With_Example1 () With Range ("A1") .Font.Size = 15 .Font.Name = "Verdana" .Interior.Color = vbYellow .Borders.LineStyle = xl End Sub ile Sürekli Son

Bahsedilen nesnedeki tüm biçimlendirmeyi, yani A1 hücresini görmek için kodu çalıştırın.

Yani, hücreye uygulanan tüm biçimlendirme. Bu tekniğin ne kadar harika olduğuna bakın.

Örnek 2

Örneğin, yazı tipiyle ilgili tüm özellikleri değiştirmek isterseniz hücre ve FONT özelliğinden bahsedebilirsiniz.

Kod:

 Alt İle_Örnek2 () Aralıklı ("A1"). Yazı Tipi Sonu Alt Alt İle

Vba İle İfadeyle, IntelliSense listesini görebiliriz, yalnızca FONT özelliği ile ilgili özellikleri ve yöntemleri gösterir.

Şimdi bununla herhangi bir aktivite setini gerçekleştirebiliriz.

Kod:

 Sub With_Example2() With Range("A1").Font .Bold = True 'Font will be Bold .Color = vbAlias 'Font color will be Alias .Italic = True 'Font will be italic style .Size = 20 ' Font size will be 20 .Underline = True 'Font will be underlined End With End Sub

The result of this will be as shown below.

Example #3

Below code will access only cell border-related properties.

Code:

 Sub With_Example3() With Range("B2").Borders .Color = vbRed 'Border color will be red .LineStyle = xlContinuous 'Full border .Weight = xlThick 'Thick border End With End Sub

The result of this code is as follows.

Things to Remember

  • With statement is used to minimize the code.
  • We need to supply object first for With statement.
  • Once the specific object is supplied we can access only that object’s properties and methods.