Thema Datum  Von Nutzer Rating
Antwort
05.10.2020 14:42:54 elysa
NotSolved
Blau Zeilen filtern bzw. übertragen nach Monat
 05.10.2020 16:29:46 Gast74821
NotSolved
05.10.2020 16:42:43 elysa
NotSolved
05.10.2020 16:56:19 Gast20391
NotSolved

Ansicht des Beitrags:
Von:
Gast74821		 Datum:
05.10.2020 16:29:46		 Views:
667		 Rating:
     
Antwort:
  Ja
Thema:
Zeilen filtern bzw. übertragen nach Monat

kleines Beispiel:

Option Explicit

Sub Test()
  
  With Worksheets("Tabelle1").Range("A1")
    
    'Beispiel in Zelle A1 schreiben
    .NumberFormat = "MMM. YYY"
    .Value = #10/5/2020 4:30:42 PM# ' = "Okt. 2020", weil vom NumberFormat so vorgegeben
    
    Select Case Month(.Value) 'liefert Monat des Datums als Zahl
      Case 9 To 11 '9, 10, 11 / also Sep. bis Nov.
'        Last_row = Worksheets(s_Main).Cells(Rows.Count, 1).End(xlUp).Row
'        ws.Range("A" & i & ":P" & i).Copy Worksheets(s_Main).Range("A" & Last_row)(2)
    End Select
    
  End With
  
End Sub

Was ich hier hervorheben will ist, es ist wichtig was in der Zelle drin steht. Das Format in dem der Zelleninhalt angezeigt wird ist was ganz anderes.

Damit der Code oben funktioniert, muss in der Zelle eine echte Datumsangabe stehen, also z.B. 05.10.2020.

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
05.10.2020 14:42:54 elysa
NotSolved
Blau Zeilen filtern bzw. übertragen nach Monat
 05.10.2020 16:29:46 Gast74821
NotSolved
05.10.2020 16:42:43 elysa
NotSolved
05.10.2020 16:56:19 Gast20391
NotSolved