ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

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

[求助] Word表格里的这个标记是什么

[复制链接]

TA的精华主题

TA的得分主题

发表于 2020-12-16 11:30 | 显示全部楼层 |阅读模式
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
Word表格每个单元格里面最后的那个标记(不是单元格外面的那个段落标记),看上去是段落标记,但无论是用^p或^13(勾选“使用通配符”),都找不到这个标记,很奇怪,看上去明明就是段落标记呀,而且在“Word选项”、“显示”里取消勾选“段落标记”,这个标记就会消失,按道理应该是段落标记呀,为什么又不行呢?那这个标记到底是什么呢?查找时该用什么来查找此标记(比如段落标记可以用^p或^13)?
      有人说这个标记是单元格结束标记,它的ASCII代码是7,但是查找时用^7(勾选“使用通配符”)又不行。请高手赐教该用什么来查找这个标记,多谢啦!
Word表格里的这个标记是什么.jpg

TA的精华主题

TA的得分主题

 楼主| 发表于 2020-12-16 14:47 | 显示全部楼层
加了附件加了附件

Word表格里的这个标记是什么.rar

9.1 KB, 下载次数: 13

TA的精华主题

TA的得分主题

发表于 2020-12-16 16:38 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
表格结尾是Chr(13) & Chr(7)两个符号。在VBA用Asc可以检查出来

TA的精华主题

TA的得分主题

发表于 2020-12-16 17:26 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
* 楼主,你的探索精神令人钦佩!
* 单元格结束符表面上只有一个回车符,但此回车符并不是段落标记(^p或^13)。
* 选定一个空白单元格,用代码 MsgBox Len(Selection.Text) 显示有 2 个字符,下面代码可验证(结果为 True):
   MsgBox Selection.Text Like vbCr & Chr(7)
* 选定 A-5 单元格,用代码 MsgBox Selection.Text Like "A-5" & vbCr & Chr(7) 可以验证结果为 True。
* 实践证明:单元格结束符看似只有一个回车符,实际上可以理解为它是包含 2 个字符的组合,即它是由段落标记(“^p 或 ^13” 或 “chr(13)”)和表格结束符(“^7 或 chr(7)”)联合组成的。
* 如何查找这个单元格结束符呢?我的建议是不查找。只须选定单元格,然后,用下面的代码刨除单元格结束符,再对文字进行格式处理,即(请先选定单元格后应用下面的代码):
    Selection.MoveEnd 1, -1
或:
    Selection.MoveEnd Unit:=wdCharacter, Count:=-1

评分

1

查看全部评分

TA的精华主题

TA的得分主题

发表于 2020-12-16 19:08 来自手机 | 显示全部楼层
413191246se 发表于 2020-12-16 17:26
* 楼主,你的探索精神令人钦佩!
* 单元格结束符表面上只有一个回车符,但此回车符并不是段落标记(^p或^1 ...

学习了,老师正解。

TA的精华主题

TA的得分主题

发表于 2020-12-17 10:32 | 显示全部楼层

TA的精华主题

TA的得分主题

 楼主| 发表于 2020-12-19 21:04 | 显示全部楼层
谢谢413191246se老师。我是想在每个单元格的后面批量加上两个字“和谐”,单元格的内容没有规律,有的是有短横-,有的是有@或#等特殊符号,有的是空格,有的都没有。我想用通配符替换,查找内容为*>、替换为^&和谐(即查找内容加上和谐),不行;查找内容为<*>、替换为^&和谐,效果和上一个一样,也不行。
      我现在的做法是先将表格转换为文本,然后查找内容为^p、替换为和谐^&(即和谐加上查找内容),替换好后再将文本转换成表格。请问大师,有没有直接在表格里操作的方法?

Word表格里的这个标记是什么.rar

14.1 KB, 下载次数: 6

TA的精华主题

TA的得分主题

发表于 2020-12-20 00:37 | 显示全部楼层
* 楼主:经反复试验,替换无效!建议:不妨用 VBA 宏来达到目的,轻松完成。
* Loop循环/Cell单元格/Cursor鼠标/光标/Table表格
* 请试用下面的宏(如果光标不在表格中会提示,请将光标放在表格中再执行宏,将代码中的“China”替换为“和谐”即可):
  1. Sub LoopCells()
  2.     If Not Selection.Information(12) Then MsgBox "Cursor not in table!", 0 + 16: End
  3.     Dim c As Cell
  4.     For Each c In Selection.Tables(1).Range.Cells
  5.         c.Range.Text = Left(c.Range.Text, Len(c.Range.Text) - 2) & "China"
  6.     Next
  7. End Sub
复制代码

TA的精华主题

TA的得分主题

 楼主| 发表于 2020-12-20 17:00 | 显示全部楼层
谢谢413191246se,哎,我不会VBA 宏啊,通配符替换是我经常用的

TA的精华主题

TA的得分主题

发表于 2020-12-20 22:32 | 显示全部楼层
有时,替换未必是全能的,用宏亦可完成。对宏有兴趣的话,可以自学。
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

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

GMT+8, 2025-1-9 15:23 , Processed in 0.045008 second(s), 14 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

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

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

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