< návrat zpět

MS Excel


Téma: Recordset Pole rss

Zaslal/a 8.4.2016 21:49

Dobrý den všem...

jak mohu sloučit data z recordsetu a hlavicku recordsetu do jednoho pole??

děkuji

Zaslat odpověď >

Strana:  1 2   další »
#031048
avatar
arrRecordArray = ADORecordset.GetRows

Proč do pole?citovat
#031049
avatar
ReDim vararrFields(adoRset.Fields.Count - 1)
lngColumn = -1
Do While (lngColumn < adoRset.Fields.Count - 1)
lngColumn = lngColumn + 1
vararrFields(lngColumn) = adoRset.Fields(lngColumn).Name
Loop

Tady si můžeš stáhnout přílohu
http://wall.cz/index.php?m=topic&id=23792
V ukázkové třídě najdeš jak na ADO - např. ověření zda je recordset prázdný atd.citovat
#031050
avatar
Takhle chtel bych to do listboxu. Bohuzel nazvy sloupcu se mi tam nezadarilo vlozit. Proto si rikam vytvorim si dve pole hlavicku a data a nejakym jednoduchym zpusobem bych je sloucil problem ze nevim jak?citovat
#031052
avatar
Do hlavičky ListBoxu dostaneš názvy sloupců jedině přes list a vlastnost (ListBoxu) RowSource. Jinak budeš mít sloupce v prvním řádku ListBoxu - prostě se jakoby zamíchají mezi data.

Budˇ to tedy naimportuj do listu (pole na názvy sloupců a CopyFromRecordset pro data) a pak použij RowSource pro naplněni ListBoxu...

nebo

si nad ListBoxem vytvoř Labely a dopiš růčo názvy sloupců a naplň recordset rovnou do ListBoxu

nebo

se nadřešcitovat
#031062
avatar
právě přes list jsem to nechtěl...proto to chci řešit přes dvě pole, ale žádný jednoduchý způsob na sloučení jsem nenašel...
s těmi labely je to dobrý nápad, ale mě se počet sloupců bude měnit...
ještě mě napadlo vytvořit si třetí pole,které by bylo větší o jeden řádek než ADORecordset.Recordcount do tohoto polebych vložil ADORecordset.GetRows a pak pole na polední řádek pole , pole hlavička...ovšem hlavicku mam na konci novevytvoreneho pole:O(citovat
#031064
avatar
No pak bude platit, že názvy sloupců budou zamíchané mezi daty. To pak může při dalším práci s ListBoxem znamenat problém, hlavně když to bude používat někdo jiný, případně další kód VBA. Taky se ti schovají až budeš používat posuvník.

Jestli tě nenapadne jak dostat názvy sloupců nahoru (seřazení apod) budeš muset asi přelít pole získané pomocí GetRows.

ListBox ve VBE je naprd.citovat
#031066
avatar
a existuje ve VBA něco jiného jako listbox??citovat
#031068
avatar
ListViewcitovat
#031072
avatar
a jak se pracuje s listwiev??citovat
#031073
avatar
Proč se nepodíváš na internet? Např.:
http://www.experts-exchange.com/questions/24502583/How-do-I-bind-a-recordset-to-a-List-View-Control.html

Nebo se ptej konkrétněcitovat

Strana:  1 2   další »

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.

On-line nástroje