This is the coding i have done in vb illustrator file is loading and we can make changes
CODING
---------
Private Sub Command1_Click()
Set appRef = New Illustrator.Application
Set fol = fso.GetFolder("C:\ChemDraw\StePHOXTetrahedronRevised\Eps")
Dim charStyle As Illustrator.CharacterStyle
For Each fil In fol.Files
Set docref = appRef.Open(fil)
appRef.ActiveDocument.ActiveLayer.HasSelectedArtwork = True
appRef.ActiveDocument.ActiveLayer.Opacity = 10
'appRef.ActiveDocument.CharacterStyles.Item
docref.CharacterStyles.Application.TextFonts.Item
appRef.ActiveDocument.Close
docref.Activate
Next
'Set charStyle = docref.CharacterStyles.Add("BigRed")
'' Create a red color
'Dim colorRed As New Illustrator.RGBColor
'Dim font As New Illustrator.PrintFontOptions
'colorRed.Red = 255
'
'' Set character attributes of the new style
'With charStyle.CharacterAttributes
'.Size = 7
''.TextFont
'End With
End Sub
SOLUTION NEEDED
----------------------
1) change the font in illuustrator file through vb coding
2) change the size also
WHAT I HAVE DONE:
-------------------------
1) LOADED A EPS FILE IN ILLUSTRATOR THROUGH VB CODING
waiting for ur reply ASAP