Listeyi PDF kaydet

Merhaba.
Aşağıdaki gibi düşünebilirsiniz.
-- Kod'daki yol bilgisini ÇİFT TIRNAK ARASIna yazarak düzenleyebilirsiniz.
-- İşlemi başka sayfa aktif için yapacaksanız,
kodda yer alan Activesheet 'lerin yerine ilgili sayfa adını kulanarak Sheets("xxxx") şeklinde değiştirirsiniz.

Ömer BARAN' Alıntı:

Merhaba.
Aşağıdaki gibi düşünebilirsiniz.
-- Kod'daki yol bilgisini ÇİFT TIRNAK ARASIna yazarak düzenleyebilirsiniz.
-- İşlemi başka sayfa aktif için yapacaksanız,
kodda yer alan Activesheet 'lerin yerine ilgili sayfa adını kulanarak Sheets("xxxx") şeklinde değiştirirsiniz.
[Gizlenmiş içerik]

Genişletmek için tıklayın ...

Ömer hocam ko çalışıyor ancak listenin bittiği yerden değilde diğer boş hüçreleride içine alarak pdf olarak kaydediyor

Tekrar merhaba Sayın @mertatakan_3838 .
VBA ekranında iken, verdiğim F8 tuşuna aralıklarla basarak çalıştırırsanız, koddaki sonsat değişkeninin,
değerini A sütunundaki son dolu satır numarası şeklinde aldığını göreceksiniz.
A sütununda formül uygulamışsanız, son formül uygulanmış hücreyi sonsatır olarak bulur.
Bir hücredeki formülün sonucu BOŞ olsa da hücre BOŞ DEĞİLDİR.

Örnek belgeniz, cevabımın altındaki İMZA bölümünde belirtildiği şekilde hazırlanmış bir belge olursa sorun aşılabilir.
.

Sayın @mertatakan_3838
Sorunuz çözüme ulaşıldı ise konuyu çözüldü olarak işaretleyip, kilitleyelim.

ÇÖZÜLDÜ