Hoe commentaar uit Excel naar Word exporteren?

Voor gebruikers van Excel is het invoegen van opmerkingen in cellen een veelvoorkomende taak. Soms moet je deze opmerkingen kopiëren en plakken in een Word-document voor een bepaald doel. Natuurlijk kun je de opmerkingen één voor één naar Word kopiëren en plakken, maar dit is een tijdrovende en vervelende klus. Is er een manier om alle opmerkingen tegelijkertijd van Excel naar Word te exporteren?

Opmerkingen uit het huidige werkblad naar Word exporteren met VBA-code

Opmerkingen uit het huidige werkblad naar Word exporteren met VBA-code

Helaas biedt Excel geen functie om alle opmerkingen tegelijk naar Word te kopiëren en te plakken. Met de volgende VBA-code kun je echter snel alle opmerkingen van het actieve werkblad naar het Word-document exporteren.

1. Houd de toetsen ALT + F11 ingedrukt om het venster Microsoft Visual Basic for Applications te openen.

2. Klik op Invoegen > Module en plak de volgende code in het modulevenster.

VBA-code: Opmerkingen uit het huidige werkblad naar Word exporteren

Sub CopyCommentsToWord()
'Update 20140325
Dim xComment As Comment
Dim wApp As Object
On Error Resume Next
Set wApp = GetObject(, "Word.Application")
If Err.Number <> 0 Then
  Err.Clear
  Set wApp = CreateObject("Word.Application")
End If
wApp.Visible = True
wApp.Documents.Add DocumentType:=0
For Each xComment In Application.ActiveSheet.Comments
    wApp.Selection.TypeText xComment.Parent.Address & vbTab & xComment.Text
    wApp.Selection.TypeParagraph
Next
Set wApp = Nothing
End Sub

3. Druk vervolgens op de F5-toets om deze code uit te voeren, en alle opmerkingen in het actieve werkblad zijn geëxporteerd naar een nieuw Word-document, inclusief hun celadres. Zie screenshot:

Gerelateerde artikelen:

Hoe snel een opmerking in meerdere cellen in Excel invoegen?

Hoe de vorm van het opmerkingsvak in Excel wijzigen?

Hoe alle opmaak van opmerkingen in cellen in Excel wijzigen?

Hoe de naam van alle auteurs van opmerkingen in Excel wijzigen?