Gunakan kode VBA berikut:
Option Explicit
Public myString As String
Sub CopyMyDelete()
' Alt-1 is shortcut
myString = Selection.Text
End Sub
Sub PasteMyDelete()
' Alt-2 is shortcut
Selection.TypeText myString
End Sub
Sekarang saya bisa masuk ke balon TrackChange, pilih teks yang dihapus dan tekan
Alt- 1. Ya, mungkin itu konyol, tetapi Anda tidak dapat menyalin teks terhapus yang dipilih di VBA juga. Namun, Anda dapat membuat variabel string publik yang memilih teks.
Sekarang saya bisa memindahkan Seleksi dari balon, dan di mana pun saya inginkan, saya bisa Alt- 2dan teks yang dihapus yang sebelumnya dipilih diketikkan. Ini tentu saja akan ditandai sebagai sisipan Ganti Lacak.
Perhatikan bahwa saat Anda memindahkan Pilihan dari ballon TrackChange (tempat Anda mengambil teks yang dihapus), Anda dapat menggunakan Pilihan sesuka Anda. Konten teks yang dihapus berada dalam variabel string, BUKAN teks yang terkait dengan pemilihan itu sendiri. Anda dapat melakukan hal-hal lain, dan ketika Anda mau - ketikkan teks yang dihapus dengan
Alt- 2.