. : : ClassiClub ForuM : : .

会员中心 论坛帮助 日历事件 标记论坛已读
返回   精品技术论坛 » 技术论坛 » 『软件使用』

『软件使用』: 电脑软件推荐, 电脑软件使用, 经验分享



发表新主题 回复
 
主题工具
wl362
 
wl362 的头像
高级会员
 
资 料:
注册日期: Mar 2002
帖子: 612 声望值: 3
精华: 0
#1 旧 2018-10-09, 09:08:43 默认 【求助】EXCEL VBA 读取WORD表格中单元格内容问题
wl362 当前离线  

向各位请教下:WORD中的表格,单元格中的文本有若干行,以回车换行的,在excel 中用VBA打开该文件,读取该单元格内容,myTable.Cell(x, y).Range.Text 读取出来的字符串,怎么就自动把单元格中的所有换行符全过滤了?有保留换行符的读法吗?
回复时引用此帖
edwardj
 
edwardj 的头像
超级会员
 
资 料:
注册日期: Nov 2001
帖子: 1,621 声望值: 3
精华: 1,解答: 2
#2 旧 2018-10-11, 00:44:09 默认
edwardj 当前离线  

替换 vbCR/vbLF/vbCRLF 不行么?


胸无大志,跑到屁股上去了 :eek:
回复时引用此帖
wl362
 
wl362 的头像
高级会员
 
资 料:
注册日期: Mar 2002
帖子: 612 声望值: 3
精华: 0
#3 旧 2018-10-23, 09:14:46 默认
wl362 当前离线  

引用:
作者: edwardj 查看帖子
替换 vbCR/vbLF/vbCRLF 不行么?
替换?用myTable.Cell(x, y).Range.Text 读出来的就已经没换行符了,我需要读出来的保留换行符。
回复时引用此帖
wgf4242
 
wgf4242 的头像
热心会员
 
资 料:
注册日期: Aug 2001
帖子: 6,275 声望值: 6
精华: 0,解答: 31
#4 旧 2018-10-23, 11:16:33 默认
wgf4242 当前离线  

在VBA中还是能输出换行的.估计是Excel和Word在表格中的换行符 不一样...
在VBA中将word的换行替换成别的
在Excel中研究下换行怎么表示,再替换回来试试.

----------------------------------
测试了下,是vbcr

直接替换好这里 mystr = Replace(Word.Selection.Tables(1).Cell(1, 1).Range.Text, vbCr, "xxxxx"),
在写入excel时处理下吧.

如你所说,先赋值到mystr再替换vbCr就不行了.
上传的图像
文件类型: png 20181023111506.png (588 字节, 12 次查看)

此帖于 2018-10-23 11:39:02 被 wgf4242 编辑. .
回复时引用此帖
发表新主题 回复

主题工具

论坛规则  发帖规则
不可以发表主题
不可以回复帖子
不可以上传附件
不可以编辑自己的帖子
论坛启用 vB 代码
版面启用 表情符号
版面启用 [IMG] 代码
版面禁用 HTML 代码


所有时间均为北京时间, 现在的时间是 00:18:19.

本论坛带宽由迅通网络提供
SSL证书由TrustAsia提供

Copyright © 2000 - 2018 ClassiClub Forum All Rights Reserved.
粤ICP备09123456号