关闭大字体？
嗨我使用的是2007。
我想修改现有的TextStyles，以便关闭Texstyle对话框中的“使用大字体”开关。
在帮助中，它说. bigfontfile属性“此属性不能设置为NULL或空字符串”。
有办法关闭它吗？
它存储在注册表中吗？
感谢您的任何帮助
Dave F.
**** Hidden Message ***** 从内存中，在命令行（-STYLE）上，当它要求字体时，你可以提供一个逗号分隔的字体列表，通常是一个普通字体，然后是一个大字体，如so：
ISO，BIGFONT
你能检查现有样式的文本字体属性并相应地重置它们吗？ Dave，
VBA我帮不了你，
这只是那个的lisp方法
~'J'~
;; save this code as KB.lsp
;;==================code begin
(defun KillBigFont (stname / )
(setq styl (tblobjname "style" stname))
(setq stlist (entget styl))
(entmod (subst (cons 4 "")(assoc 4 stlist) stlist))
(entupd styl)
(princ)
)
(defun c:kb(/ stname)
(setq stname (getstring T "\Enter the style name: "))
(KillBigFont stname)
)
(princ "\nType KB to execute")
(prin1)
;;============== code end
页:
[1]