Hur exporterar jag kommentarer från Excel till Word?
För Excel-användare är att infoga kommentarer i cellerna en vanlig uppgift, ibland måste du kopiera och klistra in dessa kommentarer i ett Word-dokument för något ändamål. Naturligtvis kan du kopiera och klistra in kommentaren i Word en efter en, men det här är ett tråkigt och tidskrävande jobb. Finns det något sätt att exportera alla kommentarer från Excel till Word på en gång?
Exportera kommentarer från nuvarande kalkylblad till Word med VBA-kod
Exportera kommentarer från nuvarande kalkylblad till Word med VBA-kod
Tyvärr tillhandahåller Excel inte funktionen för att kopiera och klistra in alla kommentarer till Word på en gång. Med följande VBA-kod kan du dock snabbt exportera alla kommentarer i det aktiva kalkylbladet till Word-dokumentet.
1. Håll ner ALT + F11 nycklar för att öppna Microsoft Visual Basic for Applications-fönstret.
2. Klicka Insert > Modulernaoch klistra in följande kod i Modulfönster.
VBA-kod: Exportera kommentarer från nuvarande kalkylblad till 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. Tryck sedan på F5 för att köra den här koden, och alla kommentarer i det aktiva kalkylbladet har exporterats till ett nytt Word-dokument med dess celladress. Se skärmdump:
Relaterade artiklar:
Hur infogar jag snabbt en kommentar till flera celler i Excel?
Hur ändrar jag formen på kommentarrutan i Excel?
Hur ändrar jag alla kommentarformat i celler i Excel?
Hur ändrar jag alla kommentarers författarenamn i Excel?
Bästa kontorsproduktivitetsverktyg
Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för Excel erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid. Klicka här för att få den funktion du behöver mest...
Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare
- Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
- Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
- Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!