TIFF error: Invalid byte order

TIFF Viewer & Browser Plug-In related topics

TIFF error: Invalid byte order

Postby allan.vitale » Tue Sep 19, 2017 6:06 pm

Hi There,

We are switching from MODI printer to Black Ice. I print my files using an Excel VBA macro - here is the code that worked before:

Sub CreateTIFFilessORIGINAL()
' CreateTIFFiles Macro
intKounter = intKounter + 1
strKount = Format(intKounter, "000")
' Prints Gain Calculation Sheet
Sheets("Gain Calculation Sheet").Select
Application.ActivePrinter = "Microsoft Office Document Image Writer on Ne03:"
strA_Title = IWriterPath & strKount & "a Gain Calculation Sheet.tif"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _
PrintToFile:=True, PrToFilename:=strA_Title
End Sub

, which automatically names and saves the file to a folder:

Const IWriterPath As String = "G:\mydocs\EMAIL ATTACHMENTS\SURR. & QUOTE .tif PRINTS\"
strA_Title = IWriterPath & strKount & "a Gain Calculation Sheet.tif"

Which results in a named file of something like:
"G:\mydocs\EMAIL ATTACHMENTS\SURR. & QUOTE .tif PRINTS\001a Gain Calculation Sheet.tif"

I modified the code to print using the Black Ice (BI) printer:

Sub CreateTIFFilessBI()
' CreateTIFFilesBI Macro
intKounter = intKounter + 1
strKount = Format(intKounter, "000")
' Prints Gain Calculation Sheet
Sheets("Gain Calculation Sheet").Select
Application.ActivePrinter = "Black Ice TIFF on Ne01:"
strA_Title = IWriterPath & strKount & "a Gain Calculation Sheet.tif"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:="Black Ice TIFF on Ne01:", _
PrintToFile:=True, Collate:=True, PrToFilename:=strA_Title, IgnorePrintAreas:=False
End Sub

Which does produce the file:
"G:\mydocs\EMAIL ATTACHMENTS\SURR. & QUOTE .tif PRINTS\001a Gain Calculation Sheet.tif"

But when I try to open the file using the BI Tiff Viewer 11.59 I recieve the following error:
Error opening file[\\life.pacificlife.net\life\Home\AD\AVitale\mydocs\EMAIL ATTACHMENTS\SURR._QUOTE.tif PRINTS\001a Gain Calculation Sheet.tif].
TIFF error code: 14
TIFF error: Invalid byte order.

I would like to know if someone can help me figure out what is wrong with my code? You see, I can open other files created by the macro using the following code; but note, these are not named and placed in my SURR._QUOTE.tif PRINTS folder:

Sub Macro6()
' Macro6 Macro
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _
IgnorePrintAreas:=False
Application.ActivePrinter = "Black Ice TIFF on Ne01:"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
"Black Ice TIFF on Ne01:", Collate:=True, IgnorePrintAreas:=False
End Sub

Any help would be greatly appreciated - thanks

Allan.Vitale
allan.vitale
 
Posts: 1
Joined: Tue Sep 19, 2017 5:34 pm

Return to TIFF Viewer & Browser Plug-In



Who is online

Users browsing this forum: No registered users and 1 guest

cron