Hoe alle opmerkingen in een nieuw werkblad of werkmap in Excel weergeven?

Als u een werkmap heeft met te veel opmerkingen erin en u wilt alle opmerkingen op een nieuw werkblad of werkboek vermelden om alle opmerkingen te bekijken, hoe kunt u dat dan doen? Met de volgende methoden kunt u snel alle opmerkingen van een werkblad / werkmap weergeven in een nieuw werkblad of nieuwe werkmap in Excel.

Maak een lijst van alle opmerkingen op een nieuw werkblad met VBA-code

Maak een lijst van alle opmerkingen in een nieuw werkblad of werkmap met Kutools voor Excel

Maak een lijst van alle opmerkingen op een nieuw werkblad met VBA-code

Verbazingwekkend! Efficiënte tabbladen gebruiken in Excel zoals Chrome, Firefox en Safari!

Bespaar 50% van uw tijd en verminder elke dag duizenden muisklikken!

---

De volgende VBA-code geeft een overzicht van alle opmerkingen op een nieuw werkblad in de huidige werkmap. In het nieuwe werkblad worden alle opmerkingen van de hele werkmap in een lijst weergegeven met de bladnaam, het celadres, de inhoud van de opmerking en de celnaam. Gebruik deze methode als volgt:

1. Klik Ontwikkelaar > Visual Basic, het toont de Microsoft Visual Basic voor applicaties venster. En klik Invoegen > Moduleen voer vervolgens de volgende VBA-codes in de module in.

VBA: toont alle opmerkingen in een nieuw werkblad.

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. Dan klikken  om de code uit te voeren, en je krijgt een nieuw werkblad met alle opmerkingen in de huidige werkmap. Zie screenshot:

Maak een lijst van alle opmerkingen in een nieuw werkblad of werkmap met één klik

Met de Maak een commentaarlijst of Kutools for Excelkunt u snel alle opmerkingen op een nieuw werkblad of een nieuwe werkmap plaatsen.

Kutools for Excel: met meer dan 300 handige Excel-invoegtoepassingen, gratis te proberen zonder beperking in 30 dagen. Get it Now.

1. Als u Kutools voor Excel hebt geïnstalleerd, klikt u op Kutools > Meer > Maak een commentaarlijst, zie screenshot:

2. In de Maak een commentaarlijst dialoog venster:

• Selecteer het bereik waarin u de opmerking wilt weergeven, u kunt kiezen Actief blad or Alle lakens.
• Geef vervolgens de locatie op waar u de opmerkingenlijst wilt plaatsen, u kunt de opmerkingen in een nieuwe werkmap of een nieuw blad weergeven, zie screenshot:

3. En klik vervolgens op creërenknop. Er wordt een nieuw werkblad toegevoegd om alle actieve werkbladcommentaar weer te geven met zijn attributen zoals bladnaam, celverwijzingen, rij en kolom. Zie screenshot:

Voor meer gedetailleerde informatie over Maak een commentaarlijstKunt u terecht op Functiebeschrijving van een opmerkingenlijst maken.

Gerelateerde artikelen:

• Wijzig alle commentaarformaten in cellen
• Wijzig de auteursnaam van alle opmerkingen
• Zoek en vervang tekst in opmerkingen
• Toon of verberg alle opmerkingen en opmerkingindicatoren in Excel
• Converteer celinhoud naar opmerkingen in Excel
• Converteer opmerkingen naar celinhoud in Excel

---

De beste tools voor kantoorproductiviteit

Kutools voor Excel lost de meeste van uw problemen op en verhoogt uw productiviteit met 80%

• visfuik: Snel invoegen complexe formules, grafieken en alles wat je eerder hebt gebruikt; Versleutel cellen met wachtwoord; Maak een mailinglijst en stuur e-mails ...
• Super Formula-balk (bewerk eenvoudig meerdere regels tekst en formule); Lay-out lezen (gemakkelijk grote aantallen cellen lezen en bewerken); Plakken in gefilterd bereik...
• Voeg cellen / rijen / kolommen samen zonder gegevens te verliezen; Gespleten cellen inhoud; Combineer dubbele rijen / kolommen... Voorkom dubbele cellen; Vergelijk Ranges...
• Selecteer Dupliceren of Uniek Rijen; Selecteer lege rijen (alle cellen zijn leeg); Super zoeken en fuzzy zoeken in veel werkboeken; Willekeurige selectie ...
• Exacte kopie Meerdere cellen zonder de formuleverwijzing te wijzigen; Maak automatisch verwijzingen naar meerdere bladen; Plaats kogels, Selectievakjes en meer ...
• Extraheer tekst, Tekst toevoegen, Verwijderen op positie, Ruimte verwijderen; Paging-subtotalen maken en afdrukken; Converteren tussen celinhoud en opmerkingen...
• Super filter (bewaar en pas filterschema's toe op andere bladen); Geavanceerd sorteren per maand / week / dag, frequentie en meer; Speciaal filter door vet, cursief ...
• Combineer werkmappen en werkbladen; Tabellen samenvoegen op basis van sleutelkolommen; Gegevens splitsen in meerdere bladen; Batch Converteer xls, xlsx en PDF...
• Meer dan 300 krachtige functies. Ondersteunt Office / Excel 2007-2021 en 365. Ondersteunt alle talen. Eenvoudig te implementeren in uw onderneming of organisatie. Volledige functies Gratis proefperiode van 30 dagen. 60 dagen geld-terug-garantie.

Lees verder... Gratis download... Aankoop... 

---

Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker

• Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
• Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
• Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!

Lees verder... Gratis download... Aankoop...