Hoe exporteer je opmerkingen van Excel naar Word?
Voor Excel-gebruikers is het invoegen van opmerkingen in cellen een veelvoorkomende taak. Soms wilt u deze opmerkingen kopiëren en plakken in een Word-document voor een specifiek doel. Uiteraard kunt u de opmerkingen één voor één naar Word kopiëren en plakken, maar dat is vervelend en tijdrovend. Bestaat er een manier om alle opmerkingen tegelijkertijd uit Excel naar Word te exporteren?
Exporteer Opmerkingen van Huidig werkblad naar Word met VBA-code
Exporteer Opmerkingen van Huidig werkblad naar Word met VBA-code
Helaas biedt Excel geen ingebouwde functie om alle opmerkingen in één keer naar Word te kopiëren en plakken. Met de volgende VBA-code exporteert u echter razendsnel alle opmerkingen van het actieve werkblad naar een Word-document.
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: Exporteer Opmerkingen van Huidig werkblad naar Word
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 daarna op de F5-toets om deze code uit te voeren. Alle opmerkingen in het actieve werkblad worden nu geëxporteerd naar een nieuw Word-document, inclusief hun celadres. Zie de afbeelding hieronder:
Gerelateerde artikelen:
Hoe voegt u snel een opmerking toe aan meerdere cellen in Excel?
Hoe wijzigt u de vorm van een opmerking in Excel?
Hoe wijzigt u de opmaak van alle opmerkingen in cellen in Excel?
Hoe wijzigt u de auteursnaam van alle opmerkingen in Excel?
Beste Office-productiviteitshulpmiddelen
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie zoals nooit tevoren.Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en Tijd besparen.Klik hier om de functie te krijgen die u het meest nodig heeft...
Office Tab brengt een tabbladinterface naar Office en maakt uw werk veel eenvoudiger
- Schakel tabbladbewerking en -lezen in voor Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten aan in nieuwe tabbladen binnen hetzelfde venster, in plaats van in afzonderlijke vensters.
- Verhoogt uw productiviteit met 50 % en bespaart u dagelijks honderden muisklikken!
Alle Kutools-add-ins in één installatieprogramma.
Kutools for Office bundelt add-ins voor Excel, Word, Outlook en PowerPoint, plus Office Tab Pro—ideaal voor teams die met meerdere Office-apps werken.
- Alles-in-één suite— add-ins voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro
- Één installatieprogramma, één licentie— binnen enkele minuten klaar (MSI-geschikt)
- Werkt beter samen— gestroomlijnde productiviteit in alle Office-apps
- 30 dagen volledig functionele proefversie— geen registratie, geen creditcard
- Beste prijs-kwaliteitverhouding— bespaar ten opzichte van het afzonderlijk kopen van add-ins