哪位能帮我做一个excel单元格自动替换的宏程序
各位大神,谁能帮我做一个宏程序,让我在对附件中黄色的单元格中的内容进行时,其他单元格中有相同内容的文字同时进行修改。 比如我把B2格中的“XX中压/民用/工商燃气工程”改为“YY工程”,那下面A24、A30、A31、A32、A33单元格中相同字样的内容也全部自动替换为“YY工程”。以此类推。 非常非常感谢
完全是按你的要求做的,具体详见附件。 附件中的代码可以进行一下简化,用以下代码来替换,功能一样。 Dim xg As Variant Private Sub Worksheet_SelectionChange(ByVal Target As Range) xg = Target。
Value End Sub Private Sub Worksheet_Change(ByVal Target As Range) th = Target(1)。Value If th = xg Then Exit Sub If Intersect(Target(1), [B1:B14]) Is Nothing Then Exit Sub Application。
EnableEvents = False Range("A19:F50")。Replace What:=xg, Replacement:=th, LookAt:=xlPart Application。EnableEvents = True End Sub。
a24=b2不是更简单
CTRL+H、ALT+N并输入“XX中压/民用/工商燃气工程”、ALT+E并输入“YY工程”、CTRL+A,“确定”,“关闭”,即可将所有单元格的“XX中压/民用/工商燃气工程”字样全部替换为“YY工程”。
操作方法: 以将表格中的所有“XX中压/民用/工商燃气工程”替换为“YY工程”为例。 1、复制需要替换的字符串:将B2单元格作为活动单元格后,将光标放在编辑栏,再将需要替换的字符串“XX中压/民用/工商燃气工程”选中(刷黑)并“复制”,点编辑栏左边的“×”。也可不进行这一步的操作而直接进入第2步的操作,这就需要在代码的运行过程中手工输入需要替换的字符串“XX中压/民用/工商燃气工程”! 2、运行宏代码:点击“全部替换”按钮后宏代码开始运行,运行过程中按代码提示进行相关操作即可。
没有必要使用宏,直接使用=即可。
答:这不需要建那么多表格,用数据库软件如ACCESS只需建立两个表格,一个产品信息表,一个出入库记录表。你想要的结果,只是查询生成的报表,经过简章设定后,可以根据要...详情>>
问:怎样用Camtasia Studio v2.0.3来制作媒体
答:这个软件有使用向导的,你新建一个文件,然后照着他的说明一步一步的走下去,就知道怎么用了,这个软件太小了,网上跟本找不到教程的,如果你确实还是不会的话,找个懂电脑...详情>>