Note: The other languages of the website are Google-translated. Back to English

Cum se exportă comentarii din Excel în Word?

Pentru utilizatorii Excel, inserarea comentariilor în celule este o sarcină obișnuită, uneori, trebuie să copiați și să lipiți aceste comentarii într-un document Word pentru un anumit scop. Desigur, puteți copia și lipi comentariul pe Cuvânt unul câte unul, dar acesta este un job obositor și care consumă mult timp. Există vreo modalitate de a exporta toate comentariile din Excel în Word simultan?

Exportați comentariile din foaia de lucru curentă în Word cu cod VBA

Fila Office Activați editarea și navigarea cu file în Office și faceți munca mult mai ușoară ...
Kutools pentru Excel vă rezolvă majoritatea problemelor și vă crește productivitatea cu 80%
  • Reutilizați orice: Adăugați cele mai utilizate sau complexe formule, diagrame și orice altceva la preferatele dvs. și reutilizați-le rapid în viitor.
  • Peste 20 de caracteristici text: Extrageți numărul din șirul de text; Extrageți sau eliminați o parte din texte; Conversia numerelor și valutelor în cuvinte în limba engleză.
  • Instrumente de îmbinare: Mai multe cărți de lucru și foi într-unul; Combinați mai multe celule / rânduri / coloane fără a pierde date; Combinați rândurile duplicate și suma.
  • Instrumente divizate: Împărțiți datele în mai multe foi bazate pe valoare; Un registru de lucru pentru mai multe fișiere Excel, PDF sau CSV; O coloană la mai multe coloane.
  • Lipiți săriți Rânduri ascunse / filtrate; Număr și sumă de Culoarea fundalului; Trimiteți e-mailuri personalizate către mai mulți destinatari în bloc.
  • Super Filtru: Creați scheme avansate de filtrare și aplicați oricăror foi; Sortează pe săptămână, zi, frecvență și multe altele; Filtru prin îndrăznețe, formule, comentarii ...
  • Peste 300 de caracteristici puternice; Funcționează cu Office 2007-2021 și 365; Suporta toate limbile; Implementare ușoară în întreprinderea sau organizația dvs.

săgeată albastru dreapta balonExportați comentariile din foaia de lucru curentă în Word cu cod VBA

Din păcate, Excel nu oferă funcția de a copia și lipi toate comentariile în Word simultan. Cu toate acestea, cu următorul cod VBA, puteți exporta rapid toate comentariile foii de lucru active în documentul Word.

1. Țineți apăsat butonul ALT + F11 tastele pentru a deschide Fereastra Microsoft Visual Basic pentru aplicații.

2. Clic Insera > Moduleși lipiți următorul cod în Fereastra modulului.

Cod VBA: exportați comentariile din foaia de lucru curentă în 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. Apoi apăsați F5 cheie pentru a rula acest cod și toate comentariile din foaia de lucru activă au fost exportate într-un nou document Word cu adresa sa de celule. Vedeți captura de ecran:

doc-export-comentarii1


Legate de articole:

Cum se introduce rapid un comentariu în mai multe celule din Excel?

Cum se schimbă forma casetei de comentarii în Excel?

Cum se schimbă toate formatele de comentarii din celulele din Excel?

Cum se schimbă numele autorului tuturor comentariilor în Excel?


Cele mai bune instrumente de productivitate Office

Kutools pentru Excel vă rezolvă majoritatea problemelor și vă crește productivitatea cu 80%

  • reutilizarea: Introduceți rapid formule complexe, diagrame și orice ai folosit anterior; Criptați celulele cu parola; Creați o listă de corespondență și trimiteți e-mailuri ...
  • Super Formula Bar (editați cu ușurință mai multe linii de text și formulă); Layout de citire (citiți și editați cu ușurință un număr mare de celule); Lipiți la interval filtrat...
  • Merge celule / rânduri / coloane fără a pierde date; Conținut de celule divizate; Combinați rânduri / coloane duplicate... Prevenirea celulelor duplicate; Comparați gamele...
  • Selectați Duplicat sau Unic Rânduri; Selectați Rânduri goale (toate celulele sunt goale); Super Find și Fuzzy Find în multe cărți de lucru; Selectare aleatorie ...
  • Copie exactă Mai multe celule fără modificarea referinței formulelor; Creați automat referințe la foi multiple; Introduceți gloanțe, Casete de selectare și multe altele ...
  • Extrageți textul, Adăugați text, eliminați după poziție, Eliminați spațiul; Creați și imprimați subtotaluri de paginare; Convertiți conținutul dintre celule și comentarii...
  • Super Filtru (salvați și aplicați scheme de filtrare altor foi); Sortare avansată după lună / săptămână / zi, frecvență și multe altele; Filtru special cu bold, italic ...
  • Combinați cărți de lucru și foi de lucru; Merge Tables pe baza coloanelor cheie; Împărțiți datele în mai multe foi; Conversia în loturi xls, xlsx și PDF...
  • Peste 300 de funcții puternice. Suportă Office / Excel 2007-2021 și 365. Acceptă toate limbile. Implementare ușoară în întreprinderea sau organizația dvs. Funcții complete Probă gratuită de 30 de zile. Garanție de returnare a banilor de 60 de zile.
fila kte 201905

Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară

  • Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
  • Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ​​ferestrele noi.
  • Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!
fundul officetab
Comentarii (17)
Încă nu există evaluări. Fii primul care evaluează!
Acest comentariu a fost redus la minimum de moderatorul de pe site
Bună, Excelent articol, eram curios să știu, dacă am imagini în acele comentarii, codul VBA de mai sus va exporta rapid și toate imaginile din comentarii acele imagini ale unei foi de lucru active în documentul Word? Vă mulțumesc că ți-ai acordat timp să citești asta, foarte apreciat. Cu respect, Vladmir
Acest comentariu a fost redus la minimum de moderatorul de pe site
Acesta a funcționat perfect și a fost exact ceea ce aveam nevoie! Mulțumesc foarte mult.
Acest comentariu a fost redus la minimum de moderatorul de pe site
primiți mesajul „Eroare de compilare: procedură externă invalidă”. Acum ce?
Acest comentariu a fost redus la minimum de moderatorul de pe site
Am avut același mesaj - ai reușit să rezolvi asta Randi?
Acest comentariu a fost redus la minimum de moderatorul de pe site
știe cineva dacă pot face acest lucru, dar doar să copiez comentariile dintr-un anumit rând? orice ajutor va fi mult apreciat. Am încercat să lucrez la asta de secole.
Acest comentariu a fost redus la minimum de moderatorul de pe site
chiar a ajutat. tq!
Acest comentariu a fost redus la minimum de moderatorul de pe site
Se poate extrage din rândurile filtrate după aplicarea filtrului? Mulțumesc.
Acest comentariu a fost redus la minimum de moderatorul de pe site
Acest lucru este grozav și ajută! Există o modalitate de a obține text real în celulă pentru a înlocui numărul celulei sau pentru a fi inclus? Am antete și instrucțiuni de balon în anteturi. Încerc să creez o procedură de cuvânt la completarea rândurilor cu antete ale datelor (Ex.; „Nume”) și apoi caseta de comentarii îi spune utilizatorului formatul.

Afișează în prezent cu macrocomanda de mai sus:

Nume de utilizator A1:


- Introduceți numele Împrumutatului așa cum se vede în documentele organizaționale ale Împrumutatului sau în alte documente justificative ale numelui.


Căutându-l, arată textul celulei A1, care este Numele companiei.


Orice ajutor este foarte apreciat!
Acest comentariu a fost redus la minimum de moderatorul de pe site
Nu-mi vine să cred! chiar a fost de ajutor!
Acest comentariu a fost redus la minimum de moderatorul de pe site
Acest lucru este super util! Mulțumiri!
Există o modalitate de a trage în antetul rândului sau coloanei mai degrabă decât poziția celulei (B4)?
Acest comentariu a fost redus la minimum de moderatorul de pe site
Am putut obține acest rezultat schimbând „xComment.Parent.Address” în „xComment.Parent.Value” în rândul 14.
Acest comentariu a fost redus la minimum de moderatorul de pe site
Am copiat și lipit exact, dar a generat doar un document Word gol. Vreo idee?


Sub CopyCommentsToWord()
„Actualizare 20140325
Dim xComentează ca comentariu
Dim wApp ca obiect
La data de eroare CV următoare
Set wApp = GetObject(, "Word.Application")
Dacă Err.Number <> 0 Atunci
Err.Clear
Set wApp = CreateObject("Word.Application")
Final, dacă
wApp.Visible = Adevărat
wApp.Documents.Add DocumentType:=0
Pentru fiecare xComment din Application.ActiveSheet.Comments
wApp.Selection.TypeText xComment.Parent.Address & vbTab & xComment.Text
wApp.Selection.TypeParagraph
Pagina Următoare →
Set wApp = Nimic
End Sub
Acest comentariu a fost redus la minimum de moderatorul de pe site
aceeasi problema. ai reusit sa rezolvi?
Acest comentariu a fost redus la minimum de moderatorul de pe site
La fel... ceva gânduri?
Acest comentariu a fost redus la minimum de moderatorul de pe site
Hei, mi-am dat seama cum să repar asta. Linia 13 trebuie să citească „Pentru fiecare xComment în Application.ActiveSheet.CommentsThreaded”. (Ieșirea nu este exact ca cea din captura de ecran, ar trebui să adăugați xComment.Author sau poate alte proprietăți în bucla For - dar schimbarea de la Comments la CommentsThreaded face ca acest lucru să funcționeze din nou.)
Acest comentariu a fost redus la minimum de moderatorul de pe site
Able To Extract începe cu setul inițial de date măsurabile și generează valori derivate. Utilizatorii își pot insera și personaliza numerele pentru a indexa în mod profesional afacerile.
Philip
patchhere.com
Acest comentariu a fost redus la minimum de moderatorul de pe site
Acesta este excelent! cu toate acestea, mă străduiesc să fixez comentariile acolo unde aparțin în foaia de lucru. Există vreo modalitate de a putea eticheta rândurile sau coloana sau celula în care sunt extrase comentariile?
Nu există comentarii postate aici încă
Lăsa comentarii
Postare ca invitat
×
Evaluează această postare:
0   Caractere
Locații sugerate

Urmărește-ne

Copyright © 2009 - www.extendoffice.com. | Toate drepturile rezervate. Cu sprijinul ExtendOffice. | Harta site-ului
Microsoft și sigla Office sunt mărci comerciale sau mărci comerciale înregistrate ale Microsoft Corporation în Statele Unite și / sau în alte țări.
Protejat de Sectigo SSL