Thema Datum  Von Nutzer Rating
Antwort
08.10.2021 06:47:09 Robin
Solved
08.10.2021 07:31:23 Robin
NotSolved
08.10.2021 07:56:54 Mase
NotSolved
08.10.2021 08:26:32 robin
NotSolved
Rot ersten 10 Zeilennummern nach Autofilter: Step by Step
08.10.2021 09:33:54 Mase
NotSolved
08.10.2021 09:39:38 robin
NotSolved
08.10.2021 10:20:39 Mase
NotSolved
08.10.2021 10:40:51 Robin
NotSolved
08.10.2021 11:00:17 Mase
NotSolved
08.10.2021 11:16:18 Robin
NotSolved
08.10.2021 11:25:17 Mase
NotSolved
08.10.2021 11:56:41 Robin
NotSolved
19.10.2021 13:01:32 robin
NotSolved
19.10.2021 14:29:53 Mase
NotSolved
19.10.2021 14:52:23 Robin
NotSolved
08.10.2021 10:00:56 robin
NotSolved

Ansicht des Beitrags:
Von:
Mase
Datum:
08.10.2021 09:33:54
Views:
95
Rating: Antwort:
  Ja
Thema:
ersten 10 Zeilennummern nach Autofilter: Step by Step

Mach ne Sicherung von Deiner Mappe.

Dann filterst Deine Daten von Hand.

Ich unterstelle mit nachfolgem Code, dass die Daten ab A1 in der Tabelle vorliegen.

(Und zwar sowohl vertikal als auch horizontal aneinanderliegend.)

 

Jetzt führst folgenden Code aus:

    Dim rng     As Excel.Range

    Set rng = Range("A1").CurrentRegion

    MsgBox Intersect(rng, rng.SpecialCells(xlCellTypeVisible), rng.Offset(1, 0)).Address

 



 

Der oben gezeigte Code, erzeugt eine Messagebox, welche Dir den gefilterten Bereich bzw dessen Adresse ausgibt.

Sag Bescheid, wenn soweit alles klappt und klar ist.

 


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
08.10.2021 06:47:09 Robin
Solved
08.10.2021 07:31:23 Robin
NotSolved
08.10.2021 07:56:54 Mase
NotSolved
08.10.2021 08:26:32 robin
NotSolved
Rot ersten 10 Zeilennummern nach Autofilter: Step by Step
08.10.2021 09:33:54 Mase
NotSolved
08.10.2021 09:39:38 robin
NotSolved
08.10.2021 10:20:39 Mase
NotSolved
08.10.2021 10:40:51 Robin
NotSolved
08.10.2021 11:00:17 Mase
NotSolved
08.10.2021 11:16:18 Robin
NotSolved
08.10.2021 11:25:17 Mase
NotSolved
08.10.2021 11:56:41 Robin
NotSolved
19.10.2021 13:01:32 robin
NotSolved
19.10.2021 14:29:53 Mase
NotSolved
19.10.2021 14:52:23 Robin
NotSolved
08.10.2021 10:00:56 robin
NotSolved