我有一个值为11的单元格,我希望复制这个值,并将它粘贴到另一个单元格(另一个工作表)中的字符"“之间或单元格中句子的末尾。
即
值11在单元格A1中,我想将其粘贴到单张2单元格A4中:修改频率"11“。
提前感谢您的帮助。
发布于 2016-05-09 12:04:03
Private Sub findandreplace()
Dim string1 As String
Dim string2 As String
Dim string3 As String
string1 = ThisWorkbook.Sheets("Sheet1").Range("a1").Value
string2 = ThisWorkbook.Sheets("Sheet2").Range("a4").Value
string3 = Replace(string2, " ", string1)
ThisWorkbook.Sheets("Sheet2").Range("a4").Value = string3
Debug.Print ; string1
Debug.Print ; string2
Debug.Print ; string3
End Subhttps://stackoverflow.com/questions/37114676
复制相似问题