Vinod verwendet häufig die erweiterten Filterwerkzeuge von Excel, um gefilterte Daten von einem Ort an einen anderen zu kopieren. In einigen Fällen möchte er nicht nur den Zellinhalt, sondern auch die Zellkommentare der Zellen kopieren, die die Filterkriterien erfüllen. Er sucht nicht nach einer Möglichkeit, basierend auf Kommentaren zu filtern, sondern nur Kommentare zusammen mit dem Zelleninhalt zu kopieren, wenn er die erweiterten Filterfunktionen von Excel verwendet.

Soweit wir das beurteilen können, gibt es keine Möglichkeit, Kommentare mithilfe der erweiterten Filterung zu kopieren. Es wird nur der Zelleninhalt kopiert. Es ist jedoch möglich, die Kommentare in zwei Schritten zu kopieren.

Verwenden Sie zunächst die erweiterte Filterung, um Ihre Daten zu filtern. Stellen Sie jedoch sicher, dass Sie die Filterung direkt durchführen. Geben Sie nicht an, dass die Informationen an einen anderen Speicherort kopiert werden sollen. Am Ende erhalten Sie eine gefilterte Liste, in der nur die Zellen angezeigt werden, die Ihren Kriterien entsprechen. Wählen Sie als Nächstes die von der Filterung zurückgegebenen Zellen aus. Sie sollten dann sicherstellen, dass Excel weiß, dass nur die sichtbaren Zellen ausgewählt werden sollen:

  1. Drücken Sie F5, um das Dialogfeld Gehe zu anzuzeigen.

  2. Klicken Sie auf Spezial, um das Dialogfeld Gehe zu Spezial anzuzeigen. (Siehe Abbildung 1.)

  3. Stellen Sie sicher, dass die Option Nur sichtbare Zellen ausgewählt ist.

  4. Klicken Sie auf OK.

Wenn die sichtbaren Zellen ausgewählt sind (die durch die Filterung ausgeblendeten werden nicht ausgewählt), können Sie mit dem zweiten Schritt fortfahren: Kopieren Sie die Zellen mit normalen Bearbeitungstechniken an einen anderen Ort. Das Ergebnis ist, dass die Kommentare direkt zusammen mit dem Zelleninhalt kopiert werden.

Wenn Sie diese Aufgabe ziemlich oft ausführen und Sie sogar die beiden Schritte stören, können Sie die Aufgabe automatisieren. Das folgende Makro wendet einen erweiterten Filter an, kopiert die sichtbaren Zellen in die Zwischenablage und fügt sie (und ihre Kommentare) in eine neue Arbeitsmappe ein:

Sub AdvancedFilter_AndCopyComments()

With Range("Database")

' filter the data range         .AdvancedFilter Action:=xlFilterInPlace, _           CriteriaRange:=Range("Criteria"), Unique:=False         ' copy visible cells only         .SpecialCells(xlCellTypeVisible).Copy     End With

' goto to another worksheet     Sheets("Sheet1").Select     ' and paste the copied data     With Range("A1")

.PasteSpecial xlPasteColumnWidths         .PasteSpecial xlPasteAll     End With

Application.CutCopyMode = False End Sub

Das Makro setzt voraus, dass Sie zwei benannte Bereiche eingerichtet haben: einen für die zu filternden Daten (Datenbank) und einen für die Filterkriterien (Kriterien). Führen Sie das Makro aus, und die gefilterten, kommentierten Informationen landen auf Sheet1.

_Hinweis: _

Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der ExcelTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.

Klicken Sie hier, um diese spezielle Seite in einem neuen Browser-Tab zu öffnen.

ExcelTips ist Ihre Quelle für kostengünstige Microsoft Excel-Schulungen.

Dieser Tipp (3169) gilt für Microsoft Excel 97, 2000, 2002 und 2003. Eine Version dieses Tipps für die Multifunktionsleistenschnittstelle von Excel (Excel 2007 und höher) finden Sie hier:

Kommentare beim Filtern kopieren.