VBA Excel - 复制单元格值并将值粘贴到另一个单元格的字符之间

Question

我有一个值为 11 的单元格，我想复制此值并将其粘贴到字符“”之间或单元格内句子末尾的另一个单元格（另一个 sheet）中。

即

值 11 在单元格 A1 中，我想将其粘贴到句子中的 sheet 2 单元格 A4 : 修改频率 "11".

在此先感谢您的帮助。

Answer 1

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 Sub

VBA Excel - 复制单元格值并将值粘贴到另一个单元格的字符之间

VBA Excel - copy cell values and paste value in between characters of another cell

excel

vba

copy-paste