Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1012to1016
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Abfrage inkompatibel Excel 2002 zu 2007

Abfrage inkompatibel Excel 2002 zu 2007
04.10.2008 10:34:19
Meinolf
Guten Morgen Excel Forum,
hab ein Problem mit der Umstellung von Excel 2002 auf 2007. Excel 2007 filtert meine Abfragen nicht mehr (Spezialfilter) per makro. Hat vorher wunderbar funktioniert. Die abgefragte Tabelle liegt in einem anderen Arbeitsblatt und hat einen Bereichsnamen. Den habe ich auch schon testweise geändert, aber im Zielbereich kommt nichts an. Weis jemand warum das nicht funktioniert ? Auch eine Aufzeichnung liefert kein Ergebnis.
Vielen Dank Meinolf

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Abfrage inkompatibel Excel 2002 zu 2007
04.10.2008 10:46:00
mumpel
Hallo!
Dazu müsstest Du uns das Makro zeigen. Sonst können wir den Fehler nicht finden.
Gruß, René
AW: Abfrage inkompatibel Excel 2002 zu 2007
04.10.2008 11:29:54
Meinolf
Hallo René
die Datenbank befindet sich in einem anderen Blatt, wo ich einen Bereich Kauf_Verkauf definiert habe.
Das Makro starte ich in dem Arbeitsblatt wo das Ergebnis der Abfrage ausgegeben werden soll.
Wie gesagt unter der früheren Version kein Problem. Seltsamerweise funktioniert in einem anderen Blatt eine andere Abfrage auf die gleiche Datenbank.

Sub abfrage
Range("Kauf_Verkauf").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:= _
Range("b10:f11"), CopyToRange:=Range("B13:l200"), Unique:=False
End Sub


Anzeige
AW: Abfrage inkompatibel Excel 2002 zu 2007
04.10.2008 12:34:56
ransi
HAllo
Ich denke du hast den Zielbereich und die CriteriaRange nicht sauber angegeben.
Ungetestet:
Option Explicit

Sub abfrage()

With Sheets("Tabelle1")
    Range("Kauf_Verkauf").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:= _
        .Range("b10:f11"), CopyToRange:=.Range("B13:l200"), Unique:=False
End With
End Sub

ransi
Anzeige

299 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige