(分享)调用隐藏的字体对话框修改E系统字体

tanhong · 发表于 2008-6-25 01:44:36

在EXCEL中我们可以通过格式对话框的字体设置来调整表格中的默认字体，但这不能修改包括系统字体,如：行列标在内的字体。
记得前不久也有网友问过如何修改行列标的字体的问题。
1、我们通常的办法：点菜单 “工具”——“选项”——在选项对话框中点“常规”—— 在该页中调整字体。这个虽然能改变包括行列标在内字体，但只对重新建立EXCEL工作簿才起作用，并不能立竿见影的发生变化，而对于原存在的EXCEL也不起作用。
2、我们可以通过VBA话句调用一个隐藏的字体调整对话框来立竿见影的修改当前的EXCEL窗口系统字体（包括行列标的字体）。

代码很简单，如下：

Application.Dialogs(xlDialogStandardFont).Show

效果图：

实例样本：

[ 本帖最后由 tanhong 于 2008-6-25 20:00 编辑 ]

tmtony · 发表于 2008-6-25 07:53:06

简单而很实用的方法!!

tanhong · 发表于 2008-6-25 08:58:29

[:50] 谢谢老大的支持!!!

brother13 · 发表于 2008-12-5 11:38:26

太感谢了特意注册表示感谢在网上找了好久

余方方 · 发表于 2011-3-7 14:46:21

谢谢分享

帐号		自动登录	找回密码
密码			注册

群介绍
Excel中国官方交流群2群 (331511605)
Excel中国官方群 (243419633)
Office China for Exc (498717031)
Excel交流群(纯技术) (324568243)

主题相关群

地区相关群[您还没设置居住地]

[基础应用] (分享)调用隐藏的字体对话框修改E系统字体

本帖子中包含更多资源

群介绍
主题无相 (随机显示版	同地区群块其他地区)