VBA-Forum - Das Forum zu Microsoft VBA

VBA Excel VBA Word VBA Access VBA VBScript VB C# Objective-C C++ SQL JAVA VBA (English) Jobs Übersicht

Thema	Datum	Von Nutzer	Rating	Antwort
In einer Spalte mit aktivem Autofilter nur die sichtbaren Zellen auswählen	01.05.2020 15:50:51	Gast59450
In einer Spalte mit aktivem Autofilter nur die sichtbaren Zellen auswählen	01.05.2020 16:15:15	Gast01233
Alternativ: Intersect()-Methode	01.05.2020 17:19:32	Mase
Alternativ: Intersect()-Methode	01.05.2020 22:28:39	Gast67309
Alternativ: Intersect()-Methode	02.05.2020 01:28:37	Mase
Alternativ: Intersect()-Methode	02.05.2020 01:32:45	Mase
In einer Spalte mit aktivem Autofilter nur die sichtbaren Zellen auswählen	02.05.2020 10:22:43	Werner

Ansicht des Beitrags:

Von:
Werner

Datum:
02.05.2020 10:22:43

Views:
692

Rating:

Antwort:

Thema:
In einer Spalte mit aktivem Autofilter nur die sichtbaren Zellen auswählen

Hallo,

folgender Code

Public Sub aaa()
With Worksheets("Tabelle1")
    If .FilterMode Then
        With .AutoFilter.Range
            .Offset(1).Resize(.Rows.Count - 1).Columns(2).Copy Worksheets("Tabelle2").Range("A1")
        End With
    End If
End With
End Sub

kopiert Spalte 2 deines Filterbereichs ohne die Überschrift ins Tabellenblatt 2. Ich nehme nicht an, dass du die gefilterten Daten nur selektieren willst.

Gruß Werner

Ihre Antwort

Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema:		Name:		Email:

Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema	Datum	Von Nutzer	Rating	Antwort
In einer Spalte mit aktivem Autofilter nur die sichtbaren Zellen auswählen	01.05.2020 15:50:51	Gast59450
In einer Spalte mit aktivem Autofilter nur die sichtbaren Zellen auswählen	01.05.2020 16:15:15	Gast01233
Alternativ: Intersect()-Methode	01.05.2020 17:19:32	Mase
Alternativ: Intersect()-Methode	01.05.2020 22:28:39	Gast67309
Alternativ: Intersect()-Methode	02.05.2020 01:28:37	Mase
Alternativ: Intersect()-Methode	02.05.2020 01:32:45	Mase
In einer Spalte mit aktivem Autofilter nur die sichtbaren Zellen auswählen	02.05.2020 10:22:43	Werner