IPB

( Für Mitglieder: Zur Anmeldung | Für Gäste: Zur Registrierung ) · 0 neue Nachricht(en)

 
Reply to this topicStart new topic
> EXCEL und VBA EXPERTENFRAGE, VB-Programmierpraktikum etc...
Spedrum
Beitrag Jun 16 2005, 10:47 AM
Beitragslink: #1





Gruppe: Members
Beiträge: 1185
Mitglied seit: 18-March 03
Aus: Hamburg
Mitglieds-Nr.: 7



Moinsen erstmal an die hochbegabte Community,

habe hier mal ein kleines Problemchen, was ich für meinen Arbeitgeber lösen muss.

Ich habe in Excel eine Tabelle. In dieser Tabelle ist ein AutoFilter gesetzt. Nun möchte ich per Makro diesen Autofilter automatisch neu "justieren" lassen. Hintergrund ist, dass nur die Fälle/Zeilen angezeigt werden sollen, die in einem bestimmten Quartal aufgetreten sind (also bei Quartal I z.B. alle zwischen 01.01.05 bis 31.03.05). In einem anderen worksheet habe ich die Kriterien zu stehen - für das Makro habe ich also zunächst mal zwei Variablen angelegt und schließlich diese mit Werten gefüttert.

CODE

Sub testfiltern()
Dim datcrit1 As String
Dim datcrit2 As String

datcrit1 = Sheets("Abfragen").Range("H1")
datcrit2 = Sheets("Abfragen").Range("H2")
...


Der Code für das Setzen des Filtern sieht bei Makroaufzeichnung ungefähr so aus:
CODE

Selection.AutoFilter field:=2, Criteria1:=">=datcrit1", Operator:=xlAnd, Criteria2:="<=datcrit2"


Wie man sieht, habe ich statt eines "echten" Wertes einfach die Variablen datcrit1 und datcrit2 als Kriterien eingefügt. Leider schreibt mir daraufhin das Makro in das Autofilterkriteriumsfeld das Wort "datcrit1" bzw. "datcrit2" anstatt mir den Wert darein zu schreiben, der im Variablentöpfchen drinsteckt...

Und nun? hat jemand eine Idee??? das WWW gibt darüber leier auch keine Auskunft... vielleicht steckt ja jemand gerade tief in Visual Basic drin und kann mir helfen oder mir zumindest einen Weg zeigen, wie man's anders machen könnte...

Gruß der Spedrum


--------------------
aka Marko Zschätzsch

<img src="http://www.spedrum.de/images/xing_big02.jpg">
User is offlineProfile CardPM
Go to the top of the page
+Quote Post
Karlsson vom Dach
Beitrag Jun 16 2005, 06:21 PM
Beitragslink: #2



Group Icon

Gruppe: Boardhelper
Beiträge: 282
Mitglied seit: 20-March 03
Aus: Hamburg
Mitglieds-Nr.: 17



hä?!?! smiley_mini155.gif


--------------------
LIBERTATEM QUAM PEPERERE MAIORES DIGNE STUDEAT SERVARE POSTERITAS

<A HREF="CALLTO://Skoilopoy"><IMG SRC="http://goodies.skype.com/graphics/skypeme_btn_blue.gif" BORDER=0></A>
User is offlineProfile CardPM
Go to the top of the page
+Quote Post
Goran
Beitrag Jun 16 2005, 07:16 PM
Beitragslink: #3



Group Icon

Gruppe: Boardhelper
Beiträge: 377
Mitglied seit: 20-March 03
Aus: Norderstedt
Mitglieds-Nr.: 22



ich glaube dass deine variablen gar nicht den wert haben den sie haben sollten. ich würde mir mal zu testzwecken den wert dieser variablen anzeigen lassen um zu überprüfen ob der gewünschte wert übernommen wurde. du hast die variablen als string deklariert, also als text. wenn du dann aber mit diesen werten rechnen (vergleichen) möchtest, wird es schwer, da es ja keine zahlen sind.

befinden sich eigentlich die beiden ausdrücke, die du oben gepostet hast in EINER funktion?


--------------------
jup,ich schreibe alles klein
User is offlineProfile CardPM
Go to the top of the page
+Quote Post
Spedrum
Beitrag Jun 16 2005, 07:58 PM
Beitragslink: #4





Gruppe: Members
Beiträge: 1185
Mitglied seit: 18-March 03
Aus: Hamburg
Mitglieds-Nr.: 7



ach Goran, manchmal frage ich mich warum ich dir nicht gleich eine PM schicke... wink.gif

allerdings ist mit den Variablen alles in Ordnung... Habe mir die Mal über eine msgBox anzeigen lassen und er hat mir auch die Zelleninhalte ausgegeben. Soweit also kein Problem. Das andere Problem mit dem "richtigen" Einsetzen der Variablen in den Autofilter-Code hat sich zwischenzeitlich geregelt, hatte die Anführungszeichen falsch gesetzt und ein "&" vergessen... smiley_mini102.gif

Öhm, und ja die sachen sind in alle in einer funktion...

Bekomme zwischenzeitlich super Support von einem anderen Excel-Forum (spotlight, wems was sagt)

Danke trotzdem für deine Mühen!


--------------------
aka Marko Zschätzsch

<img src="http://www.spedrum.de/images/xing_big02.jpg">
User is offlineProfile CardPM
Go to the top of the page
+Quote Post
Goran
Beitrag Jun 17 2005, 01:50 PM
Beitragslink: #5



Group Icon

Gruppe: Boardhelper
Beiträge: 377
Mitglied seit: 20-March 03
Aus: Norderstedt
Mitglieds-Nr.: 22



jetzt sehe ich den fehler mit den anführungsstrichen auch smiley_mini102.gif
das war echt ziemlich dämlcih winknudge.gif das forum kenn ich auch, schau da auch häufiger mal vorbei


--------------------
jup,ich schreibe alles klein
User is offlineProfile CardPM
Go to the top of the page
+Quote Post

Reply to this topicStart new topic
1 Besucher zu diesem Thema (Gäste: 1 | Anonyme Besucher: 0)
Mitglieder: 0 |

 



- LoFi Version Aktuelles Datum: 20th May 2012 - 07:44 PM