Inserisci il contenuto cellulare su Word Bookmarks non elimina i segni dei segnalibri

Question

Ho un wordDocument con i segnalibri.Da Excel I scrivere il contenuto delle cellule nei luoghi in cui ho impostato i segnalibri.

Il mio problema: puoi ancora vedere i segnalibri.

Cosa ho provato:

Per prima cosa ho usato un segnalibro di placehoder con

.item("Name1").Range.InsertAfter Rep.NName1

.

Secondo ho usato un segnalibro allegato con

.item("Name1").Range.InsertAfter Rep.NName1

.

e

.item("Name1").Range.InsertBefore Rep.NName1

.

Non riesco ancora a sbarazzarmi dei segnalibri.

Tutto quello che potevo fare è usare l'approccio di sledgehammer ed eliminarli ma penso che ci dovrebbe essere un modo per sostituirli durante l'inserto.

sorgente

Answer 1

Se si desidera sovrascrivere il segnalibro (cioè sostituire qualsiasi testo contenuto all'interno del segnalibro ed eliminare il segnalibro stesso), puoi semplicemente impostare la proprietà del testo della gamma del segnalibro:

    .Item("Bookmark1").Range.Text = "Some new text"

.

Se si desidera sostituire il contenuto del segnalibro esistente, ma identificare il nuovo testo con il segnalibro, è necessario sostituire il testo quindi segnare il nuovo testo come segnalibro:

    Dim bmRange As Range
    Set bmRange = .Item("Bookmark2").Range
    bmRange.Text = "Some new text"
    .Add Name:="Bookmark2", Range:=bmRange

.