ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 13647|回复: 16

能用vba实现水平文本框内文字的垂直对齐吗?

[复制链接]

TA的精华主题

TA的得分主题

发表于 2004-11-10 10:31 | 显示全部楼层 |阅读模式

能用vba实现水平文本框内文字的垂直对齐吗?效果如图。每次垂直对齐文本框内的文字只能通过设置段落的前后行距来实现。请问各位有没有更加简捷的方法?用vba自己定制一个按钮该怎么做?word中垂直对齐的vba代码是什么?

能用vba实现水平文本框内文字的垂直对齐吗?

能用vba实现水平文本框内文字的垂直对齐吗?

TA的精华主题

TA的得分主题

 楼主| 发表于 2004-11-10 10:37 | 显示全部楼层
设置文本框默认格式中也不能直接实现这个效果。目前偶只能用手调中……

TA的精华主题

TA的得分主题

发表于 2004-11-10 11:33 | 显示全部楼层

此题有二个方法:以下链接供参考:

http://club.excelhome.net/viewthread.php?tid=48508

http://club.excelhome.net/viewthread.php?tid=61059中有我做的一个代码.

最适合方式:先将文字选定后设置其格式至你的要求,然后单击绘图/文本框命令(这是我前个月的研究心得,不传之密),OK?

[em05]

TA的精华主题

TA的得分主题

 楼主| 发表于 2004-11-10 13:32 | 显示全部楼层

能得斑竹大人不传秘籍,小弟感激涕零!谢谢!

TA的精华主题

TA的得分主题

 楼主| 发表于 2004-11-10 13:43 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助

守柔斑竹,我试用过你的“图形文字中部居中”的小程序了。设置很方便,不过不能随着文本框高度的调整而自动垂直居中。

还有一个反馈就是:把文本框拉高,按“图形文字中部居中”;然后在把文本框缩短,使文字不可见,再按“图形文字中部居中”就不起作用了。

TA的精华主题

TA的得分主题

发表于 2004-11-10 21:08 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
守柔,你的不传之秘不好用。

TA的精华主题

TA的得分主题

发表于 2006-3-1 18:33 | 显示全部楼层
老大的不传秘密说了,我就说一个我的秘密了。 这个利用类模块,能及时改变,还可以更好, 只是把老大的代码放到类模块中而已。 MdHf2rVq.rar (10.51 KB, 下载次数: 90) 老大,请指点一下!

TA的精华主题

TA的得分主题

发表于 2006-3-2 07:22 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助

各位高手能否帮忙设计一段VBA程序,在插入文本框的同时,在文本框内插入一个大小相适应的单行单例的表格,这样就很好解决了.

TA的精华主题

TA的得分主题

发表于 2006-3-3 06:54 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
以下是引用[I]konggs[/I]在2006-3-1 18:33:00的发言:[BR]老大的不传秘密说了,我就说一个我的秘密了。 这个利用类模块,能及时改变,还可以更好, 只是把老大的代码放到类模块中而已。 老大,请指点一下!
TO KONGGS,我未及细看,没有时间,但有些问题,等有时间你再修改一下,或者我有时间再处修饰一下。

TA的精华主题

TA的得分主题

发表于 2008-4-5 14:03 | 显示全部楼层

Word文本框功能遐想

QUOTE:
以下是引用守柔在2006-3-3 6:54:00的发言:
TO KONGGS,我未及细看,没有时间,但有些问题,等有时间你再修改一下,或者我有时间再处修饰一下。

谢谢konggs兄的奇思!期待老大在文本框“中部居中”问题上有精妙解决方案!
  关于文本框中的对齐等问题,小弟浏览了一下本版,略作集结:
  ①能像Excel中的文本框设置一下,可以进行多种设置——典型的是“中部居中”,及“自动调整大小”(文本框的大小即时据文本数量自动调整)功能(有意思的是,Excel的文本框复制到Word中,文本的颜色、对齐设置信息全部丢失)。
  (注意:Word文本框也有“重新调整自选图形以适应文本”功能,但一则需要手动操作点击来进行,二则只能进行高度的自动调整,无法同时实现宽度的自动调整)
  ②能像表格的右键菜单“单元格对齐方式”提供的9种方式一样,在文本框的右键菜单中可以直接选择设置。
  ③对“横排文本框”,可以进行针对于文本框的“分散对齐”——比如说有四段文字,首段顶于文本框上框线,末段抵于文本框下框线,中间二段按比例均匀分布。——或者说,类似于对在“画布”里的多个图形进行种种对齐设置。
  ④适用于“横排文本框”的功能,同样适用于“竖排文本框”。


[此贴子已经被作者于2008-4-5 14:12:18编辑过]

能用vba实现水平文本框内文字的垂直对齐吗?

能用vba实现水平文本框内文字的垂直对齐吗?

Word文本框功能遐想

Word文本框功能遐想
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-11-23 19:06 , Processed in 0.041434 second(s), 10 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

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