ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

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

[讨论] 如何智能截取字符串分别写入表格不同的地方

[复制链接]

TA的精华主题

TA的得分主题

发表于 2016-5-27 10:17 | 显示全部楼层 |阅读模式
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
背景:有一不定长文本要写入Word文档表格中,该Word文档格式既定,不得修改
需求:把不定长文本超长部分写入后续的表格
提示:这个功能类似Word文本框的文本链接功能

详情见附件“叙述内容.rar”。

叙述内容.rar

8.58 KB, 下载次数: 7

TA的精华主题

TA的得分主题

发表于 2016-5-29 23:47 | 显示全部楼层




上个图片,帮顶。是这个意思?



demo2.gif

评分

1

查看全部评分

TA的精华主题

TA的得分主题

 楼主| 发表于 2016-5-30 15:19 | 显示全部楼层
首先感谢您的回复(我原本对发帖得到回复不抱希望的,原因是此帖是Word相关,且有一定难度,估摸着没多少人感兴趣,或有这能力解答这题)。

因为是图片,没看到代码,不知您的图片效果的代码原理是怎样的,从您所发图片看,您做到了帖中的要求,且有过之而无不及,佩服,^_^。

事实上,我已有代码,只是感觉该代码效率低,想看看他人有没什么高效率的代码实现快速智能截分字符串。

最后,您的驾驭Word的能力当真非同小可,刮目相看。同时,再次感谢您对此主题的关注并不辞辛苦地写了代码。

但是冒昧提醒下,从图片看,您的代码是在Word宿主环境中运行的,且运行过程中,Word一直可见。我的代码是在Excel环境中运行,且Word不可见。之所以作上述描述,本意是想说,譬如Word中的Selection属性似乎有些缺陷(具体所指的细节不好描述,就不废话了),或者说,在Excel宿主环境中操作Word与直接在Word中操作有些不同,其难度增加不少。此外,在Word中直接操作的效果,有时放在Excel环境中,其结果可能让人很意外(仅是个人感觉)。

TA的精华主题

TA的得分主题

发表于 2016-5-30 20:37 | 显示全部楼层
gbgbxgb 发表于 2016-5-30 15:19
首先感谢您的回复(我原本对发帖得到回复不抱希望的,原因是此帖是Word相关,且有一定难度,估摸着没多少人 ...

你说的问题某些情况下会出现,还好,我原来的处理方法没有遇到那样的问题。

ps:看起来感觉比较慢,主要是慢在 Set vWord=new word.application ,批量处理的话,这个动作所耗的时间是一个常数。

还是上个图片看下效果


d.gif

评分

2

查看全部评分

TA的精华主题

TA的得分主题

发表于 2016-5-30 20:38 | 显示全部楼层
4L的代码就是2L的代码直接拖到Excel中的,在Excel中,只是添加了Word的引用,多了一个application对象创建,其它只字未改。

评分

1

查看全部评分

TA的精华主题

TA的得分主题

 楼主| 发表于 2016-5-31 11:17 | 显示全部楼层
Moneky 发表于 2016-5-30 20:37
你说的问题某些情况下会出现,还好,我原来的处理方法没有遇到那样的问题。

ps:看起来感觉比较慢,主 ...

不知您为什么特意提到“感觉比较慢”,我没说您的代码慢啊,恰恰相反,我倒是说了您截分字符串的效果很好(从图片看,不仅速度快,且做到了自适应单元格大小,对此,我还在纳闷中。但我相信,终有一日,我终究能发现Word中关于文本与单元格大小自适应的相关属性或类似您这样的高效方案)。

补充:我感觉,启动Word的速度倒很快,相反,关闭(或者说退出)Word却有一个很明显的迟钝,迟钝到让人不得不认为这是一个大问题(犹其是在Excel中操作Word时,因为,Excel此时陷入一个类似卡顿的状态,让人感觉很不爽)。

说笑下,虽不雅,但我感觉较形象:
这个Word关闭时表现出一个很明显的较长过程,拿俺们如厕时脱裤和穿裤作比方,即脱裤时极顺,但在穿回裤子时则有所不便了,^_^。

最后,再次感谢您花时间在Excel环境中测试了该代码。

TA的精华主题

TA的得分主题

发表于 2018-12-10 21:13 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2018-12-10 21:13 | 显示全部楼层
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

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

GMT+8, 2024-3-29 03:02 , Processed in 0.046963 second(s), 11 queries , Gzip On, Redis On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

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

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

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