Excel VBA Çalışma Sayfasını Bir Değişkene Ata


Excel VBA ile bir çalışma sayfasını bir değişkene nasıl atanacağını kısaca gösteren makro kodudur.

Kod
Option Explicit

Sub excelCalismaSayfasiniBirDegiskeneAta()
    Dim syf As Worksheet
    Set syf = ThisWorkbook.Worksheets("Sayfa1")
    
    MsgBox TypeName(syf)
End Sub

Kod (Açıklamalı)
Option Explicit

'Peşin Not: Eğer programlamayı yeni öğrenmeye başladıysanız
've Object Oriented Programming (OOP) kavramıyla hiç
'karşılaşmadıysanız açıklamalar çok yabancı/karışık gelebilir.
'
'Aslında hiç öyle değil ama asıl konuya hakim değilseniz (OOP)
'çok karışık gelebilir.
'
'Buradaki açıklamalarda asıl maksat neyi arayacağınızı
'bilmenize yardımcı olmak.
'
'Mesela bir sayı değişkeni tanımlarken direkt olarak değeri
'atarız (primitive veri tipi) ama böyle nesne değişkenlerinde
'iş biraz daha değişir.
'
'İşte bunlar hep nesne yönelimli programlama.

Sub excelCalismaSayfasiniBirDegiskeneAta()

    'Worksheet tipinde bir değişken oluşturduk.
    'Bu Worksheet Excel'de öntanımlı bir sınıf.
    'Çalışma sayfası için kullanılan bir sınıf
    'olduğundan doğal olarak bunu seçtik.
    '
    'Bunun gibi değişik kullanımları zamanla
    'daha çok örnek gördükçe aklınıza
    'daha iyi yerleşecek.
    '
    'Bu arada ön tanımlı sınıfları kullanabileceğimiz gibi
    'kendi sınıflarımızı, kütüphanelerimizi de oluşturabiliriz.
    Dim syf As Worksheet
    
    
    'Burada yine bir nesne yönelimli programlama,
    'object orient programming, oop işlemi yaptık.
    'Oluşturduğumuz değişkene yine Worksheet tipinde
    've ismi "Sayfa1" olan sayfayı (Worksheet'i)
    'syf değişkenine atamak için Set komutunu kullandık.
    Set syf = ThisWorkbook.Worksheets("Sayfa1")
    
    'Değişkene değeri atadık, bakalım şimdi tipi neymiş?
    MsgBox TypeName(syf)
End Sub

Bunlar da hoşunuza gidebilir...


Bir cevap yazın

E-posta hesabınız yayımlanmayacak. Gerekli alanlar * ile işaretlenmişlerdir