Skip to main content

AccessTr.neT


Sıfırdan Bir Form Nasıl Hazırlanır.

DUAYEN
DUAYEN
17
13592

Sıfırdan Bir Form Nasıl Hazırlanır.

#13
Duayen hocam konu anlatımınızda bir bölüm kafama takıldı.Sayfa sayısına göre sayfayı istenen konuma eklemeyle ilgili şu kısım:
Sub Düğme1_Tıklat()
WorksheetsAdd.Name=”Excel”
a = Worksheets.Count
Worksheets(“Excel”).Move after:=Worksheets(a)
End Sub

Burada önce bir sayfa ekliyor,sonra sayfa sayısını buluyor yani sayfa sayısı bu durumda 4 olmuyor mu? En sonda ise yeni sayfayı 4.sayfanın sonuna ekle gibi bir anlam çıkarıyorum.Fakat visual basic düzenleyicisinde yazdığımda sayfayı 3.sayfanın sonuna ekliyor.Aslında 4.sayfanın sonuna eklemeye çalışması ve 4.sayfa olmadığı için hata vermesi gerekir gibi ama hata vermiyor.Bu kodu aşağıdaki şekilde yapmayı denedim fakat 2.sayfanın sonuna ekledi yeni sayfayı.

a = Worksheets.Count
Worksheets.Add.Name = "yeni"
Worksheets("yeni").Move after:=Worksheets(a)

Bu kodda ise önce sayfa sayısını 3 olarak buluyorum.Sonra 3.sayfanın sonuna eklemesini istiyorum.Fakat 2.sayfanın sonuna ekliyor.Bende mi bir mantık hatası var anlamadım gitti.Yardımcı olursanız çok sevinirim.Kolay gelsin.

Cevapla
#14
Hocam ne güzel anlatmışsınız ağzınız dert görmesin emeğinize ellerinize sağlık teşekkürler
Cevapla
#15
eline koluna emeğine sağlık çok güzel anlatım olmuş.
Cevapla
#16
teşekkürler
Cevapla
#17
çok teşekkür ederim...
Cevapla
#18
çok güzel paylaşım
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da