Jak exportovat komentáře z Excelu do Wordu?
Pro uživatele aplikace Excel je vkládání komentářů do buněk běžným úkolem, někdy je z nějakého důvodu musíte tyto komentáře zkopírovat a vložit do dokumentu Word. Samozřejmě můžete zkopírovat a vložit komentář do Wordu jeden po druhém, ale je to zdlouhavá a časově náročná práce. Existuje nějaký způsob, jak exportovat všechny komentáře z Excelu do Wordu najednou?
Export komentářů z aktuálního listu do Wordu pomocí kódu VBA
Export komentářů z aktuálního listu do Wordu pomocí kódu VBA
Excel bohužel neposkytuje funkci kopírování a vkládání všech komentářů do Wordu najednou. S následujícím kódem VBA však můžete rychle exportovat všechny komentáře aktivního listu do dokumentu aplikace Word.
1. Podržte ALT + F11 klávesy pro otevření Okno Microsoft Visual Basic pro aplikace.
2, klikněte Vložit > Modula vložte následující kód do Okno modulu.
Kód VBA: Export komentářů z aktuálního listu do Wordu
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. Pak stiskněte tlačítko F5 klíč ke spuštění tohoto kódu a všechny komentáře v aktivním listu byly exportovány do nového dokumentu Word s adresou jeho buňky. Viz snímek obrazovky:
Související články:
Jak rychle vložit komentář do více buněk v aplikaci Excel?
Jak změnit tvar pole pro komentář v aplikaci Excel?
Jak změnit všechny formáty komentářů v buňkách v aplikaci Excel?
Jak změnit jméno autora všech komentářů v aplikaci Excel?
Nejlepší nástroje pro produktivitu v kanceláři
Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času. Kliknutím sem získáte funkci, kterou nejvíce potřebujete...
Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci
- Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
- Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
- Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!