Kako navesti vse komentarje na novem delovnem listu ali delovnem zvezku v Excelu?

Če imate delovni zvezek s preveč komentarji in želite vse komentarje uvrstiti v nov delovni list ali delovni zvezek za pregled vseh komentarjev, kako lahko to storite? Naslednji načini vam pomagajo hitro našteti vse komentarje delovnega lista / delovnega zvezka na nov delovni list ali delovni zvezek v Excelu.

Vse komentarje dodajte na nov delovni list s kodo VBA

Navedite vse komentarje na novem delovnem listu ali delovnem zvezku s programom Kutools za Excel

Vse komentarje dodajte na nov delovni list s kodo VBA

Neverjetno! Uporaba učinkovitih zavihkov v Excelu Tako kot Chrome, Firefox in Safari!

Prihranite 50% svojega časa in vsak dan zmanjšajte na tisoče klikov z miško!

---

V naslednji kodi VBA bodo navedeni vsi komentarji na novem delovnem listu v trenutnem delovnem zvezku. V novem delovnem listu bodo navedeni vsi komentarji celotnega delovnega zvezka na seznamu z imenom lista, naslovom celice, vsebino komentarja in imenom celice. Uporabite to metodo na naslednji način:

1. klik Razvojni > Visual Basic, prikaže Microsoft Visual Basic za aplikacije okno. In kliknite Vstavi > Moduliin nato v modul vnesite naslednje kode VBA.

VBA: na novem delovnem listu navede vse komentarje.

Sub ShowCommentsAllSheets()
'Update 20140508
Dim commrange As Range
Dim rng As Range
Dim ws As Worksheet
Dim newWs As Worksheet
Set newWs = Application.Worksheets.Add
newWs.Range("A1").Resize(1, 4).Value = Array("Sheet", "Address", "Value", "Comment")
Application.ScreenUpdating = False
On Error Resume Next
For Each ws In Application.ActiveWorkbook.Worksheets
    Set commrange = ws.Cells.SpecialCells(xlCellTypeComments)
    If Not commrange Is Nothing Then
        i = newWs.Cells(Rows.Count, 1).End(xlUp).Row
        For Each rng In commrange
            i = i + 1
            newWs.Cells(i, 1).Resize(1, 4).Value = Array(ws.Name, rng.Address, rng.Value, rng.Comment.Text)
        Next
    End If
    Set commrange = Nothing
Next
newWs.Cells.WrapText = False
Application.ScreenUpdating = True
End Sub

2. Nato kliknite  za zagon kode in dobili boste nov delovni list z vsemi komentarji v trenutnem delovnem zvezku. Oglejte si posnetek zaslona:

Z enim klikom navedite vse komentarje na novem delovnem listu ali delovnem zvezku

Z Ustvari seznam komentarjev of Kutools za Excel, lahko vse komentarje hitro uvrstite na nov delovni list ali nov delovni zvezek.

Kutools za Excel: z več kot 300 priročnimi dodatki za Excel, brezplačno preizkusite brez omejitev v 30 dneh. Get it now.

1. Če ste namestili Kutools za Excel, kliknite Kutools > Več > Ustvari seznam komentarjev, glej posnetek zaslona:

2. v Ustvari seznam komentarjev pogovorno okno:

• Izberite obseg, za katerega želite dodati komentar, ki ga lahko izberete Aktivni list or Vsi listi.
• Nato določite mesto, kamor želite dodati seznam komentarjev, komentarje lahko navedete v novi delovni zvezki ali novem listu, glejte posnetek zaslona:

3. In nato kliknite ustvarjanje. Dodan bo nov delovni list, na katerem bodo navedeni vsi komentarji aktivnega delovnega lista z njegovimi atributi, kot so ime lista, sklici na celice, vrstica in stolpec. Oglejte si posnetek zaslona:

Za podrobnejše informacije o Ustvari seznam komentarjev, Obiščite Ustvari opis funkcije seznama komentarjev.

Sorodni članki:

• Spremenite vse oblike komentarjev v celicah
• Spremeni ime avtorja vseh komentarjev
• Poiščite in zamenjajte besedilo v komentarjih
• Prikaži ali skrije vse komentarje in kazalnike komentarjev v Excelu
• Vsebino celic pretvorite v komentarje v Excelu
• Pretvorite komentarje v vsebino celic v Excelu

---

Najboljša orodja za pisarniško produktivnost

Kutools za Excel rešuje večino vaših težav in poveča vašo produktivnost za 80%

• Ponovna uporaba: Hitro vstavite zapletene formule, grafikoni in vse, kar ste že uporabljali; Šifriraj celice z geslom; Ustvari poštni seznam in pošiljanje e-pošte ...
• Vrstica Super Formula (enostavno urejanje več vrstic besedila in formule); Bralna postavitev (enostavno branje in urejanje velikega števila celic); Prilepite v filtrirani obseg...
• Združi celice / vrstice / stolpce brez izgube podatkov; Vsebina razdeljenih celic; Združi podvojene vrstice / stolpce... prepreči podvojene celice; Primerjaj obsege...
• Izberite Duplicate ali Unique Vrstice; Izberite prazne vrstice (vse celice so prazne); Super Find in Fuzzy Find v mnogih delovnih zvezkih; Naključna izbira ...
• Natančna kopija Več celic brez spreminjanja sklica formule; Samodejno ustvarjanje referenc na več listov; Vstavi oznake, Potrditvena polja in še več ...
• Izvleček besedila, Dodaj besedilo, Odstrani po položaju, Odstrani presledek; Ustvari in natisni vmesne seštevke strani Pretvarjanje med vsebino celic in komentarji...
• Super filter (shranite in uporabite sheme filtrov za druge liste); Napredno razvrščanje glede na mesec / teden / dan, pogostost in drugo; Poseben filter s krepko, ležeče ...
• Združite delovne zvezke in delovne liste; Spoji tabele na podlagi ključnih stolpcev; Razdelite podatke na več listov; Paketna pretvorba xls, xlsx in PDF...
• Več kot 300 zmogljivih funkcij. Podpira Office / Excel 2007-2021 in 365. Podpira vse jezike. Enostavna uvedba v vašem podjetju ali organizaciji. 30-dnevna brezplačna preizkusna različica vseh funkcij. 60-dnevna garancija vračila denarja.

Preberite več ... Brezplačen prenos... Nakup ... 

---

Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo

• Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
• Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
• Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!

Preberite več ... Brezplačen prenos... Nakup ...