Is it BarTender Professional Edition 11 can use Excel macro to print out? Follow

0
Avatar
angho

I'm using Professional Edition and try following code, but it haven't response

Dim BarTender As Object
Dim dirfile As String
dirfile = "C:\Label.btw"


Dim btApp As BarTender.Application
Dim btFormat As BarTender.Format
Dim LLI As Integer

Set btApp = New BarTender.Application
btApp.Visible = False
Set btFormat = btApp.Formats.Open(dirfile)
On Error Resume Next

btFormat.RecordRange = btFormat.PrintOut(False, False)

btApp.Quit

Set btApp = Nothing
Set btFormat = Nothing

 

Please sign in to leave a comment.