QQ登录

只需一步,快速开始

查看: 5650|回复: 2
收起左侧

coreldrawVBA无法修改字体为指定英文字体,求指教

[复制链接]

尚未签到

发表于 2018-8-9 23:31:16 | 显示全部楼层 |阅读模式
10印币
自己写的,但是不知道问题出在哪里,修改的字体名称为中文时可用,但是无法更改为英文字体。尝试过“方正黑体简体”“黑体”“微软雅黑”“经典宋体简”等等字体都可以顺利修改,但是字体名为英文时,如“arial black”“times new roman”等等会直接改为arial字体,不知道问题出在哪里,还请路过的高手指点迷津。
代码如下
Sub zi()
ActiveDocument.Unit = cdrMillimeter
Dim s As Shape
Set s = ActiveDocument.Selection.Shapes(1)
If s.Type = cdrTextShape Then
s.Text.FontProperties.Name = "times new roman"
End If
Set OrigSelection = ActiveSelectionRange
ActiveDocument.ReferencePoint = cdrMiddleLeft
OrigSelection.SizeWidth = 15
End Sub


华印网相关搜索

累计签到:897 天
连续签到:5 天
发表于 2018-9-25 17:58:39 | 显示全部楼层
试试看,英文字体中的名称大小写,是不是和显示的名称一样,有的是认大小写的。
回复 送花

使用道具 举报

累计签到:5 天
连续签到:0 天
发表于 2019-3-13 06:52:39 | 显示全部楼层
帮你顶一下让大神看到
回复 送花

使用道具 举报

您需要登录后才可以回帖 登录 | 注册帐号

本版积分规则

关闭

注意注意注意:必看上一条 /1 下一条

华印网 - 华印社区
Share More 周一至周日:09:00 - 21:00
华印网旗下的设计印刷制作类专业技术站点
请勿发布违反国家法律法规的内容,会员观点不代表本站立场
企鹅群号:119572101

华印网汇集印前印后技术、PDF拼版、防伪包装、数码印刷、合版印刷、图文设计、平面设计、数码印刷及CTP等最新印刷技术,提供软件汉化、插件汉化、cdr插件、ai插件、ps插件、pdf插件、印刷流程、ctp输出、印刷软件、印能捷、esko、CorelDRAW、InDesign、Illustrator、CTP、CDR以及PDF软件下载的综合性印刷论坛社区!

Powered by Discuz! X3.4 © 2001-2021,Tencent Cloud.

站点地图|小黑屋|手机版|Archiver|华印 ( 粤ICP备19020152号-1 )

GMT+8, 2024-3-28 21:11 , Processed in 0.025639 second(s), 18 queries , Gzip On, Yac On.

快速回复 返回顶部 返回列表