no odpoved je trosku tazsia ad 1. rozbalovacie menu - ComboBox viacej najdes v helpe MS Forms(ide o data source metody, vlastnosti)/celkom dobre priklady/ ad 2. na forme si vytvoris tlacitko napr. Aktualizuj kt. bude volat tvoje makro Private SubcmdAktualizuj_Click() call macro pociatocnydatum, konecnydatum end sub /pricom pociatocnydatum, konecnydatum su premenne ktore dostanes z toho comboboxu na nastartovanie by to malo pomoct AleXXX <klasik><"Lide jsou ruzni, povetsinou ...."></klasik> > -----Original Message----- > From: Ján Bystrianský [SMTP:JBystriansky@seznam.cz] > Sent: Friday, February 04, 2000 9:56 AM > To: servis-internet@nawebu.cz > Subject: excel_makro > > Ahojte, > > potreboval by som poradit s excel makrom. Toto makro aktualizuje query > > tabulku, ale potrebujem kazdy mesiac zmenit hranice datumu > > od(2000-02-01) do(2000-02-29) > > na od(2000-03-01) do (2000-03-31), > > da sa to samozrejme spravit cez CRTL_H a vymenit tieto hranice pred > samotným > > behom makra, ale chcel by som to elegantnejsie cez rozbalovacie pole zo > > zoznamom (aby si uzivatel len vybral (od-do) a spustil aktualizaciu > tabulky. > > Rozbalovaci zoznam by som aj vedel spravit cez /vlozit userForm, ale ako > > potom dalej?, > > ako udaje z robalovacieho formulara vlozit do tela kodu makra ? > > > > > > toto je ciastkovy vypis kodu makra, kde sa ten datum nachadza: > > > > With Selection.QueryTable > > .Connection = _"ODBC;DSN=MSS-Fourth > > Shift;UID=***;PWD=****;DBQ=e:\moje dokumenty;CODEPAGE=1250;" > > .Sql = Array( _ > > "SELECT ITEM_HISTORY.ITEM, ITEM_HISTORY.TRANS_ID, > ITEM_HISTORY.DATE, > > ITEM_HISTORY.BODY1" & Chr(13) & "" & Chr(10) & "FROM ITEM_HISTORY > > ITEM_HISTORY" & Chr(13) & "" & Chr(10) & "WHERE > > (ITEM_HISTORY.TRANS_ID='IMTR') AND (ITEM_HISTORY.DATE>={d '2000-02-01'} > An" > > _ > > , _"d ITEM_HISTORY.DATE<={d '2000-02-29'}) AND (ITEM_HISTORY.BODY1 > > Like '%~SC~0000%')" _ ) > > .Refresh False > > > > > > Jan Bystriansky > > JBystriansky@seznam.cz > > JBystriansky@post.sk > > > > > > -- http://email.seznam.cz > -- email zdarma na cely zivot > > > ------------------- konference casopisu Internet ----------------------- > === Mazte, prosim, prebytecne citace z koncu vasich odpovedi === > Archiv a instrukce pro odhlaseni/prihlaseni na http://internet.nawebu.cz > Caste dotazy a odpovedi z konferenci (FAQ) na http://www.kab.cz/faq/ > ------------------------------------------------------------------------
This archive was generated by hypermail 2.1.2 : 03. 09. 2001, 22:42 CEST