VBA中replacement语法实现以下替换

发布网友发布时间：2023-08-14 09:10

共1个回答

热心网友时间：2024-11-30 01:43

Sub test()Range("A1:C3").Select Selection.Replace What:="0201A", Replacement:=Chr(39) & "0000", LookAt:=xlPart, _ SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _ ReplaceFormat:=False Selection.Replace What:="0203K", Replacement:=Chr(39) & "0000", LookAt:=xlPart, _ SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _ ReplaceFormat:=False Selection.Replace What:="493R", Replacement:=Chr(39) & "0000", LookAt:=xlPart, _ SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _ ReplaceFormat:=FalseEnd Sub

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com