Thema Datum  Von Nutzer Rating
Antwort
26.02.2016 18:32:11 Thomas
NotSolved
26.02.2016 19:42:04 Gast83497
NotSolved
26.02.2016 20:44:32 Thomas
NotSolved
26.02.2016 21:50:05 Gast12214
NotSolved
Rot Filter läuft nicht
27.02.2016 11:20:05 Thomas
NotSolved
27.02.2016 13:01:51 Gast25700
NotSolved
27.02.2016 18:15:29 Thomas
NotSolved
27.02.2016 20:13:03 Gast81730
NotSolved
28.02.2016 09:48:37 Thomas
NotSolved
28.02.2016 17:18:17 Gast76347
NotSolved

Ansicht des Beitrags:
Von:
Thomas		 Datum:
27.02.2016 11:20:05		 Views:
1336		 Rating:
     
Antwort:
  Ja
Thema:
Filter läuft nicht

Vielen Dank das scheint nun zu funktionieren, nur leider funktioniert nun ein anderer Code dadurch nicht mehr.

Private Sub SortSheetsWithArrayList(ArrList As Variant, Optional Ascending As Boolean = True)

    Dim i As Long
    If Ascending Then
     For i = UBound(ArrList) To LBound(ArrList) Step -1
     Sheets(ArrList(i)).Move Before:=Sheets(3)
    Next
Else
     For i = LBound(ArrList) To UBound(ArrList)
     Sheets(ArrList(i)).Move Before:=Sheets(3)
Next
End If
End Sub

Dieser Code sortiert mir die Sheets.

Wenn alle 3 Filter Daten enthalten läuft das Prima ausser das er mir nun meine 2 Hauptsheets Master und Controll ans ende Stellt und nicht an den Anfang

und wenn ein Filter keine Daten enhält dann läuft der Code gar nicht mehr.

 

Vielen Dank

Thomas

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
26.02.2016 18:32:11 Thomas
NotSolved
26.02.2016 19:42:04 Gast83497
NotSolved
26.02.2016 20:44:32 Thomas
NotSolved
26.02.2016 21:50:05 Gast12214
NotSolved
Rot Filter läuft nicht
27.02.2016 11:20:05 Thomas
NotSolved
27.02.2016 13:01:51 Gast25700
NotSolved
27.02.2016 18:15:29 Thomas
NotSolved
27.02.2016 20:13:03 Gast81730
NotSolved
28.02.2016 09:48:37 Thomas
NotSolved
28.02.2016 17:18:17 Gast76347
NotSolved