iLogic: Export to PDF + Print (2D Enviroment)

[Anonymous]

I'm asking for 2 codes

1) Export to PDF, same function as File > Export > PDF ...However, if this could include a subfix from a fx selectable parameter, that would be really cool

2) Print, same function as File > Print > Print

[Sergio.D.Suárez]

Hi, This is an example of code that I usually use to print a drawing document with many sheets. 

oDoc = ThisDoc.Document

Dim oSheet As Sheet
oSheet = oDoc.ActiveSheet

For Each oSheet In oDoc.Sheets
oSheet.Activate
If oSheet.ExcludeFromPrinting = False Then
oPrintMgr = oDoc.PrintManager
oPrintMgr.ColorMode = 13315    'kPrintGrayScale -> 13314 _kPrintDefaultColorMode ->13315
oPrintMgr.NumberOfCopies = 1
oPrintMgr.PaperSize = 14341   'kPaperSizeCustom
oPrintMgr.Scalemode = 13825  'Full Scale mode
	If oSheet.Orientation = 10243 Then
	oPrintMgr.Rotate90Degrees = False
	Else
		oPrintMgr.Rotate90Degrees = True
	End If
oPrintMgr.PrintRange = kPrintCurrentSheet
oPrintMgr.SubmitPrint					
End If
Next

 I hope it is useful for you. Best Regards!

[Anonymous]

I'd like to enter the "Print Drawing" menu like I normally would

[bradeneuropeArthur]

Then you need to change your commandbutton and replace it with your "Custom" one.

This can be done within an add-in.

Regards,