Hoe exporteer ik opmerkingen van Excel naar Word?
Voor Excel-gebruikers is het invoegen van opmerkingen in de cellen een veel voorkomende taak, soms moet u deze opmerkingen voor een bepaald doel kopiëren en in een Word-document plakken. Natuurlijk kunt u de opmerking een voor een naar het Word kopiëren en plakken, maar dit is een saaie en tijdrovende klus. Is er een manier om alle opmerkingen in één keer van Excel naar Word te exporteren?
Exporteer opmerkingen van het huidige werkblad naar Word met VBA-code
Exporteer opmerkingen van het huidige werkblad naar Word met VBA-code
Helaas biedt Excel niet de functie om alle opmerkingen in één keer naar Word te kopiëren en te plakken. Met de volgende VBA-code kunt u echter snel alle opmerkingen van een actief werkblad naar het Word-document exporteren.
1. Houd de ALT + F11 toetsen om de te openen Microsoft Visual Basic for Applications-venster.
2. Klikken Invoegen > Moduleen plak de volgende code in het Module Venster.
VBA-code: exporteer opmerkingen van het huidige 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 vervolgens op F5 sleutel om deze code uit te voeren, en alle opmerkingen in het actieve werkblad zijn geëxporteerd naar een nieuw Word-document met zijn celadres. Zie screenshot:
Gerelateerde artikelen:
Hoe snel een opmerking invoegen in meerdere cellen in Excel?
Hoe verander ik de vorm van het commentaarvak in Excel?
Hoe verander ik alle commentaarformaten in cellen in Excel?
Hoe de auteursnaam van alle opmerkingen in Excel wijzigen?
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!