Birbiri ile bağlantılı 3 sayfada butonlar ile kaydetme ve yazdırma işlemleri

[eccentric]

Sorumu dosyanın içinde bulabilirsiniz.
Dosyada 3 ayrı excel sayfası birbiri ile bağlantılı gibi düşünülüyor.( bağ yapıştır ile )
Sayfalara buton eklenerek bir sayfadan diğerlerinin yazdırılması kaydedilmesi vs.
Bu iş makrolarla yapılıyorsa da nasıl yapıldığı açıklanabilirse çok memnun olurum.

 

[zafer]

Merhaba


Ekli dosyayı inceleyiniz.

Dosyayı yaptım. sebebide kodları öğrenmeniz açısından.
Kod yazmaya başlamanızı tavsiye ederim.

öncelikle
Bu istediklerinizi Makro kaydet yöntemi ile yapabilirsiniz.

http://www.excel.web.tr/f60/makro-kaydet-yontemi-resimli-anlatym-t56297.html

Ayrıca Excel dershanesi bölümünde araştırma yaparsanız istediğiniz bilgilere ulaşabilirsiniz.

 

[eccentric]

Çok teşekkür ederim mantığı anladım. Fakat makro ile kaydet butonu oluşturduğumda mevcut dosyanın üzerine kayıt yapılıyor. Farklı kaydet seçeneğinin çıkması mümkün değil mi acaba? Aynı şekilde yazdırmak isterken de direkt yazdırıyor yani yazdırma ile ilgili seçenekleri göstermeden.

 

[zafer]

Merhaba

Yazdırma ile ilgi kod

ActiveSheet.Printout yerine

ActiveSheet.PrintPreview

kullanın


saklama ile ilgili kodlar

A1 hücresine saklanacak dosyanın ismini yazınız
c:\zzzzz.xls gibi

sub yazdır()
yeni = Range("A1").Value
ActiveWorkbook.SaveAs Filename:=yeni
end sub