Hi
bisher vergeblich gegoogelt, das hier könnte die Lösung sein:
http://meinews.niuz.biz/problem-t135974.html

Problem bei Filterung von Datumswerten, Datum soll danach nur mit Ganzzahl funzen

Wäre ja ein "Superfortschritt" und ein Grund mehr, Excel2007 zu hassen
Kann es erst testen, wenn ich in meinem Büro mit Excel 2007 sitze.

Kann das Problem jemand bestätigen und gibt es eine Lösung, mit der man nicht jeden Datumwert erst in Ganzzahlen umwandeln muss.

MfG

Hallo,

bei mir läuft Dein Code.

Rufst Du das Makro aus dem Zielblatt heraus auf?
Wenn nicht, musst Du es im Code selektieren.

Gruss
Rainer

hi schnallgonz ^^

probier mal das :-)

hab aber nur excel 2000

gruss nighty

Index der Worksheets gegebenenfalls durch namen einsetzen

Sub Afilter()
Dim rngDatenbank As Range
Dim rngFilter As Range
Dim rngAusgabe As Range
Set rngDatenbank = Worksheets(2).Range(Datenbank)
Set rngFilter = Worksheets(1).Range(Suchkriterien)
Set rngAusgabe = Worksheets(1).Range(Zielbereich)
rngDatenbank.AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=rngFilter, CopyToRange:=rngAusgabe, Unique:=False
End Sub

hi all ^^

*huch*

einsetzen sollte ja ersetzen heissen

gruss nighty

hi schnallgonz ^^

oder so aehnlich, das du umformatierst ?

gruss nighty

Sub Afilter()
    Dim rngDatenbank As Range
    Dim rngFilter As Range
    Dim rngAusgabe As Range
    Set rngDatenbank = Worksheets(2).Range(Datenbank)
    Set rngFilter = Worksheets(1).Range(Suchkriterien)
    Set rngAusgabe = Worksheets(1).Range(Zielbereich)
    rngDatenbank.NumberFormat = "0"
    rngDatenbank.AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=rngFilter, CopyToRange:=rngAusgabe, Unique:=False
    rngDatenbank.NumberFormat = "d/m/yy"
End Sub  

hi ^^

waere mal interessant zu wissen ob ob der code kompatibilität gewaehrleistet ?

excel 2000 vs excel 2003 vs 2007

gruss nighty

p.s.
oder hat wer wer noch andere ideen ?
oder ist das prob durch ms patch vielleicht schon behoben ?
oder ist es gar ein anwender bedienungsfehler ?

hab ja kein excel 7 ^^

Salvete
erstmal Danke für die bisherigen Antworten
wie gesagt, bis Excel2003 null problemo, Excel2007 keine Reaktion bei der o.g. Codezeile

@rainberg
Das Makro wird per Button auf dem Zielblatt aufgerufen, gleichzeitig im Code das Zielblatt per select ausgewählt
sonst gäbe es auch unter excel2003 Probleme

@nighty
das mit der konkreten Tab-Benennung habe ich auch schon probiert
Worksheets("Datenblatt").Range(Datenbank).AdvancedFilter Action....

ebenfalls ohne Ergebnis

Es wird wohl darauf hinaus laufen, vor dem Filtern alle Datumswerte in einer Spalte und die Suchbegriffe auf Zahl zu setzen und nach dem Filtern wieder zurück in das Datumsformat zu formatieren

m.a.W. die neue Excelversion bringt hier eine Verschlechterung
bin noch nicht zum Testen gekommen, ich selbst habe kein Excel2007 und hoffe im Büro so lange wie möglich um diese Produkt herumzukommen, am Besten bis zur Pensionierung...

Die neue Oberfläche empfinde ich als echte Zumutung und solche Probleme wie mit dem Datumsformat tragen nicht unbedingt zur Akzeptanz bei, ist aber ein anderes Thema

Ich melde mich, sobald ich Gelegenheit habe, das makro unter Excel2007 zu testen mit "Formatierungsschleife"
klappt das dann, ok, wenn auch suboptimal, ansonsten stünde ich echt auf dem Schlauch

MfG

Hallo Schnallgonz,

wäre es möglich eine Beispielmappe einzustellen?

Ich arbeite schon länger mir Excel2007 und auch oft mit dem Spezialfilter und hatte bisher solche Probleme noch nicht.

Gruss
Rainer