Visual Basic - Enlace Corel - VB

Life is soft - evento anual de software empresarial
 
Vista:

Enlace Corel - VB

Publicado por Juan Carlos (4 intervenciones) el 13/03/2008 10:30:50
Buenos días a todos, quisiera saber si desde el VB se puede cargar un fichero en Corel y acto seguido exportarlo o guardarlo con otra extensión. En concreto debo de importar un fichero tal como Grafico.eps y exportarlo como Grafico.plt. Esto es lo que estoy intentando pero me da varios errores.

Dim s1 As Shape
Dim impflt As ImportFilter
Dim impopt As StructImportOptions
Dim grp1 As ShapeRange
Dim doc1 As Document
Dim expflt As ExportFilter
Dim expopt As StructExportOptions

ActiveDocument.Pages(1).Activate
ActivePage.Layers("Dummy%Layer%Dummy%Layer").Activate
ActiveLayer.Name = "Dummy%Layer%Dummy%Layer"
Set impopt = New StructImportOptions
impopt.MaintainLayers = True
Set impflt = ActiveLayer.ImportEx("C:Gráfico1.eps", cdrPSInterpreted, impopt)
impflt.Finish
Set s1 = ActiveShape
ActiveLayer.Name = "Capa 1"
Set grp1 = s1.UngroupEx
Set doc1 = OpenDocument("C:Gráfico1.eps")
Set expopt = New StructExportOptions
expopt.UseColorProfile = False
Set expflt = doc1.ExportEx("C:Gráfico1.plt", cdrHPGL, cdrAllPages, expopt)
expflt.Finish
doc1.Close

Saludos
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder