View Single Post
  #2  
Old 21-05-2013, 06:45
grzjanik grzjanik is offline
Member
 
Join Date: Mar 2010
Location: Lodz, Poland
Posts: 86
Send a message via Skype™ to grzjanik
Post Plates - true or false

Hi guys.

I'm working in Corel 12 and...

this code:

Code:
Sub PlatesTest()

Dim strPlates As String
Dim Plate As SeparationPlate
Dim intPlateCounter As Integer
 
ActiveDocument.PrintSettings.Separations.Enabled = True

    With ActiveDocument.PrintSettings.Separations
       For intPlateCounter = 1 To .Plates.count - 1
          If .Plates(intPlateCounter).Enabled = True Then
             strPlates = strPlates & .Plates(intPlateCounter).Color & vbCr
          End If
       Next intPlateCounter
          MsgBox strPlates
     End With

intPlateCounter = 1

ActiveDocument.Windows.Refresh

End Sub

shows this message:





What can I do to show the truth?




Please help me change the code to show only those plates which are actually used in the document.

Regards.

GrzJanik

Last edited by grzjanik; 10-07-2013 at 01:21.
Reply With Quote