Public ve Set Yerine Const Kullanmak?

[hsayar]

Const SourceSheet As String = "Sheet1"
Sub x()
MsgBox SourceSheet
End Sub

deyiminde string yerine worksheet tanımlayamıyorum ne yapmalıyım

 

[Levent Menteşoğlu]

Aşağıdaki linki inceleyin.

Sayfa' yı sabit olarak tanımlamak

 

[Recep İpek]

Const SourceSheet As String = "Sheet1"
Const SourceCells As String = "a1:b10"
Sub x()
MsgBox Sheets(SourceSheet).Range(SourceCells).Address
End Sub

şeklinde deneyiniz.

 

[Zeki Gürsoy]

Merhaba,

Nesneler sabit olarak tanımlanamıyor.
Kullanılabilir sabit veri tipi,

typeOptional. Data type of the constant; may be Byte, Boolean, Integer, Long, Currency, Single, Double, Decimal (not currently supported), Date, String, or Variant. Use a separate As type clause for each constant being declared.

 

[hsayar]

hepinize alakanız için teşekkür ederim

public s1 as worksheet
 
sub auto_open()
Set s1 = Sheets("sayfa1")
end sub

Eğer sayfa adını bir userformda kullanacaksanız set ile başlayan satırı userformun initialize olayına yazabilirsiniz.[/QUOTE]

şeklinde kullanmaya devam edeceğiz anlaşılan