Çözüldü satır aralıgı

mustafa070707' Alıntı:

ActiveSheet.Range("A1:K30").ExportAsFixedFormat Type:=xlTypePDF, _
fileName:=Environ("UserProfile") & "\Desktop\Personel Bilgileri.pdf", _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
OpenAfterPublish:=False
MsgBox " Evrak Masaüstüne Oluşturuldu"

grubu cok rahatsız edıyorum kusura bakmayın.

bu kod ıle pdf alıyorum ama satır aralıgı degılde son dolu satır aralıgı nasıl yapabılırım.

Genişletmek için tıkla...