Sayfa adı yerine sayfa kodu ile işlem yapmak

[ismailuguz]

Merhaba arkadaşlar
Mesela Excel VBA bölümünde,
Sayfa1 (Ana Sayfa) şeklinde yazıyor.
if ActiveSheet.Name="Ana Sayfa" then şeklinde kontrol yapmak yerine "Ana Sayfa" yerine "Sayfa 1" olarak kontrol yapmak istiyorum. Bunu nasıl yapabilirim.
Teşekkür ederim.

 

[hakki83]

Tırnak içine almadan sadece Sayfa1 olarak yazınca olması lazım diye biliyorum.

Ama Sayfa 1 şeklinde arada boşluk olmasın.

 

[ismailuguz]

Tırnak içine almadan sadece Sayfa1 olarak yazınca olması lazım diye biliyorum.

Ama Sayfa 1 şeklinde arada boşluk olmasın.

Maalesef o şekilde olmuyor

 

[pitchoute]

Merhaba! Excel VBA'da sayfa adını değiştirmek istiyorsanız, ActiveSheet.Name kontrolünü yaparken, sayfa adını "Sayfa 1" şeklinde kullanabilirsiniz. Aşağıdaki gibi bir kod yazabilirsiniz:

If ActiveSheet.Name = "Sayfa 1" Then
    ' Buraya kontrol sonrası yapılacak işlemleri ekleyin
End If

Eğer "Ana Sayfa" adını "Sayfa 1" olarak değiştirmek istiyorsanız, sayfa adını şu şekilde değiştirebilirsiniz:

ActiveSheet.Name = "Sayfa 1"

 

[halit3]

Sayfanın adını direk yazın bu yordam sayfa1 gider.

Sayfa1.Select

 

[ismailuguz]

Merhaba! Excel VBA'da sayfa adını değiştirmek istiyorsanız, ActiveSheet.Name kontrolünü yaparken, sayfa adını "Sayfa 1" şeklinde kullanabilirsiniz. Aşağıdaki gibi bir kod yazabilirsiniz:

If ActiveSheet.Name = "Sayfa 1" Then
    ' Buraya kontrol sonrası yapılacak işlemleri ekleyin
End If

Eğer "Ana Sayfa" adını "Sayfa 1" olarak değiştirmek istiyorsanız, sayfa adını şu şekilde değiştirebilirsiniz:

ActiveSheet.Name = "Sayfa 1"

Sayfa adını değiştirmek istemiyorum.

Sayfanın adını direk yazın bu yordam sayfa1 gider.

Sayfa1.Select

Merhaba! Excel VBA'da sayfa adını değiştirmek istiyorsanız, ActiveSheet.Name kontrolünü yaparken, sayfa adını "Sayfa 1" şeklinde kullanabilirsiniz. Aşağıdaki gibi bir kod yazabilirsiniz:

If ActiveSheet.Name = "Sayfa 1" Then
    ' Buraya kontrol sonrası yapılacak işlemleri ekleyin
End If

Eğer "Ana Sayfa" adını "Sayfa 1" olarak değiştirmek istiyorsanız, sayfa adını şu şekilde değiştirebilirsiniz:

ActiveSheet.Name = "Sayfa 1"

Sn pitchoute sayfa adını değiştirmek istemiyorum. Sayfa adı yerine vbaproject bölümündeki sayfa koduyla kontrol yapmak istiyorum. Vbaproject bölümünde Sayfa1(Ana Sayfa) şeklinde yazıyor

if activesheet.name="Anasayafa" then
.....
End if

İfadesi yerine

if activesheet Sayfa1 then
.....
End if

Şeklinde yazmak istiyorum.

 

[halit3]

Bunlardan birini dene

MsgBox "sayfa kod adı :" & Worksheets(ActiveSheet.Name).CodeName
MsgBox "sayfa adı :" & Worksheets(ActiveSheet.Name).Name
MsgBox "sayfa kod adı :" & Worksheets("Ana Sayfa").CodeName