VBA - nur Tagesdatum anzeigen in Tabelle
14.01.2013 16:48:02
Benjamin
ein Teil meines Problems wurde schon gelöst (leere Zeilen ausblenden)
für den anderen Teil konnte ich jedoch nichts über die Suche finden.
Leider auch nicht bei google
Ich habe eine Tabelle mit Daten aus einem externen Programm (Blatt: Protokoll).
Diese kann ich leider nicht weiter bearbeiten bzw, ändern.
Deswegen habe ich dort ein zweites Blatt (Verladung) eingefügt in
dem ich mit Hilfe einer WENN-Formel nur die Daten des Tagesdatums des anderen Blattes (Protokoll) übernehme.
Jetzt möchte ich die leeren Zeilen weg haben.
Diese funktinoiert mit dem Code aus dem BEitrag "VBA Zeilen ausblenden":
Option Explicit
Sub ZeilenAusblenden()
Dim iCol As Integer
Dim lRow As Long
Dim rWeg As Range
iCol = 9 'Spalte I = Spalte 9
lRow = Cells(Rows.Count, iCol).End(xlUp).Row
For Each rWeg In Range(Cells(1, iCol), Cells(lRow, iCol))
If rWeg.Value = "x" Then rWeg.EntireRow.Hidden = True
Next rWeg
End Sub
Jedoch muss ich dafür manuell immer ein "x" vor das Tagesdatum machen.
Weiter muss ich das Makro jedesmal manuell ausführen.
Ich möchte gerne ein Makro haben, das quasi nur die Zeilen auf dem Blatt (Verladung)anzeigt, die das heutige Datum haben.
Vielleicht geht das auch mit einem Filter und "heutiges Datum"!?
Wichtig ist mir nur, das alles beim öffnen automatisch passiert und nicht noch
über "hunderte" von klicks.
Vielen Dank schon mal
Hier die Datei:
https://www.herber.de/bbs/user/83390.xls