Hogyan exportálhatjuk a megjegyzéseket az Excelből a Wordbe?
Az Excel felhasználói számára a megjegyzések cellákba történő beillesztése gyakori feladat, néha ezeket a megjegyzéseket valamilyen célból át kell másolni és beilleszteni egy Word dokumentumba. Természetesen egyesével másolhatja és beillesztheti a megjegyzést a Wordbe, de ez unalmas és időigényes munka. Van-e mód az összes megjegyzés exportálására az Excelből a Wordbe egyszerre?
Exportálja a megjegyzéseket az aktuális munkalapról VBA-kóddal rendelkező Word-be
Exportálja a megjegyzéseket az aktuális munkalapról VBA-kóddal rendelkező Word-be
Sajnos az Excel nem biztosítja azt a lehetőséget, hogy az összes megjegyzést egyszerre másolja és illessze be a Wordbe. A következő VBA-kóddal azonban gyorsan exportálhatja az aktív munkalap összes megjegyzését a Word-dokumentumba.
1. Tartsa lenyomva a ALT + F11 billentyűk megnyitásához Microsoft Visual Basic for Applications ablak.
2. Kattints betétlap > Modulok, és illessze be a következő kódot a Modul ablak.
VBA-kód: Megjegyzések exportálása az aktuális munkalapról a Word-be
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. Ezután nyomja meg a gombot F5 kulcsot a kód futtatásához, és az aktív munkalap összes megjegyzését egy új Word dokumentumba exportálták annakcellával. Lásd a képernyőképet:
Kapcsolódó cikkek:
Hogyan lehet gyorsan beszúrni egy megjegyzést az Excel több cellájába?
Hogyan lehet megváltoztatni az Excel megjegyzésmező alakját?
Hogyan lehet megváltoztatni az Excel összes cellájának megjegyzésformátumát?
Hogyan lehet megváltoztatni az összes megjegyzés szerző nevét az Excel programban?
A legjobb irodai hatékonyságnövelő eszközök
Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz. Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...
Az Office lap füles felületet hoz az Office-ba, és sokkal könnyebbé teszi a munkáját
- Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
- Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
- 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!