Opmerkingen in Excel naar een Word-document exporteren

Een Excel-werkmap bevat mogelijk tientallen opmerkingen van de verschillende editors. Deze opmerkingen blijven het meest relevant wanneer ze zijn gekoppeld aan de bijbehorende cellen, maar ze kunnen ook een eigen verhaal vormen. Als u en een collega bijvoorbeeld samen een verkoopprojectiesheet bewerken, volgen de opmerkingen van het blad uw gesprek over de formules van het blad. Een manier om deze opmerkingen te isoleren is door een Visual Basic-macro te schrijven die deze naar een Word-document verzendt.

1.

Open de Excel-werkmap en druk vervolgens op "Alt-F11" om de Visual Basic-editor van Excel te openen.

2.

Dubbelklik op de module "NewMacros" in de map Modules van het projectvenster als Word deze niet automatisch opent.

3.

Typ het volgende om een ​​nieuwe macro te openen:

Sub mcrComment ()

4.

Typ het volgende om de variabelen van de macro te declareren:

Dim excelComment As Comment Dim wordProgram As Object

5.

Typ het volgende om een ​​Word-document te maken:

Stel wordProgram = CreateObject ("Word.Application") in

6.

Typ het volgende om een ​​lus te openen die inwerkt op het Word-object:

Met wordProgram

7.

Typ het volgende om te openen en selecteer het Word-document:

.Visible = True .Documents.Add DocumentType: = 0

8.

Typ het volgende om een ​​lus te openen die op elke opmerking inwerkt:

Voor elke excelComment in ActiveSheet.Comments

9.

Typ het volgende om de auteur en het celadres van elke opmerking in het Word-document af te drukken:

.Selectie.TypeTekst excelComment.Parent.Address & vbTab & excelComment.Text

10.

Typ het volgende om elke opmerking in het Word-document af te drukken:

.Selection.TypeParagraph

11.

Typ het volgende om de For-Next-lus te sluiten:

volgende

12.

Typ het volgende om de With-lus te sluiten:

Eindigt met

13.

Typ het volgende om de macro te sluiten:

End Sub

14.

Druk op "F5" om de macro uit te voeren en de opmerkingen naar een Word-document te exporteren.