Witam,
Stworzyłam sobie 2 makra - jedno, które drukuje wybrany zakres i drugie, które zapisuje dany zakres w formacie PDF. Wszystko działa jak należy, jednak mam problem z wykresami. Zarówno na wydrukach, jak i przy zapisywaniu w formacie PDF wykresy są niewidoczne lub ucięte. Od czego to może zależeć? Powinnam ustawić coś w formatowaniu wykresu, czy raczej dodać jakiś zapis w makrze? Z góry dziękuje za pomoc.
Oba makra wyglądają następująco:
Sub b260_Drukuj()
If MsgBox("Wydrukować budżet?", vbYesNo + vbQuestion, "Drukowanie") = vbNo Then Exit Sub
Range("E1:K72").Select
Selection.PrintOut copies:=1, collate:=True
End Sub
Sub b260_PDF()
If MsgBox("Zapisać budżet w formacie PDF? Jeśli nie masz wymaganej ścieżki dostępu, plik nie zostanie zapisany.", vbYesNo + vbQuestion, "Zapisywanie pliku w formacie PDF") = vbNo Then Exit Sub
nazwa = Range("E1") & " " & Range("I10")
Range("E1:K72").Select
Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\Users\Izabela\Desktop\BUDŻETY 2017\Aktualizacje\" & adres & nazwa & ".pdf", Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
False
End Sub