コピー or カット ＆ ペースト

    With ActiveDocument
        .Words(2).Copy '２つ目の単語をコピーする
        .Range(Start:=5, End:=5).Paste  '五文字目にコピーする
    End With
    'ｺﾋﾟｰ 　　　→　Copy
    '切り取り　 →　Cut