Modül içinde Sayfa tanımlarını tek seferde yapmak

[tamer42]

Merhaba
Bir modül içerinde birden çok kod var, sayfa tanımlarını her seferinde bütün kodların içine yazmak yerine modülün en üstüne yazarak tek seferde tanımla yapılabilir mi?

Dim ws11 As Worksheet, ws12 As Worksheet

Set ws11 = Sheets("SayiBulD1")
Set ws12 = Sheets("SayiBulT2")

Dim ws11=Sheets("SayiBulD1")  As Worksheet

gibi....


teşekkürler,

iyi çalışmalar.

 

[Emir Hüseyin Çoban]

Global SV As Worksheet

Sub kod_degiskenler()
Set SV = Sheets("Sayfa1")
End Sub


Sub kode()
Call kod_degiskenler
SV.Range("A1") = "1"
End Sub

 

[Haluk]

Değişken tanımlamalarını modülün en üstünde "Dim" ile yaparsınız, "Set" ile atamaları da dosyanın ilk açılışında "Autpen" prosedürü içinde yaparsanız..... modüldeki bütün prosedürlerde değişkenleri kullanabilirsiniz.

Değişken tanımlamalarını eğer "Public" deyimiyle yaparsanız, dosyadaki tüm modüller içinde kullanabilirsiniz.

.

 

[tamer42]

Değişken tanımlamalarını modülün en üstünde "Dim" ile yaparsınız, "Set" ile atamaları da dosyanın ilk açılışında "Autpen" prosedürü içinde yaparsanız..... modüldeki bütün prosedürlerde değişkenleri kullanabilirsiniz.

Değişken tanımlamalarını eğer "Public" deyimiyle yaparsanız, dosyadaki tüm modüller içinde kullanabilirsiniz.

.

teşekkürler