< návrat zpět

MS Excel


Téma: Microsoft.ACE.OLEDB - Jen 65536 řádků. rss

Zaslal/a 4.1.2014 23:44

Ahoj.

Zkoušel jsem externí zdroj pro KT a laboroval jsem s "Microsoft.ACE.OLEDB". Níže uvedený kod v Off 2007 nefunguje. Nakonec jsem problém našel v počtu řádku. Pokud místo 1048576 napíšu jen 65536, pak je kod funkční. Nevíte jak přinutit Off aby respektoval celých 1048576 řádků z tabulky ? Tabulku jsem zkoušel ve formátu .xlsm a .xlsb. R.

Office 2007 + Win 7/32 bit


Sub Test_v2()
Dim c As ADODB.Connection
Dim Rs As Recordset
Dim Book As String
Set c = New ADODB.Connection
c.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & ActiveWorkbook.FullName & _
";Extended Properties=""Excel 12.0;HDR=Yes;"";"
Set Rs = New ADODB.Recordset
Rs.ActiveConnection = c
Rs.Open "SELECT * from [Capacity$B5:AS1048576] " & _
" UNION SELECT * from [Flats orders$B5:AS1048576]"
Debug.Print Rs.Fields.Item(2)
Rs.Close
Set Rs = Nothing
End Sub

Zaslat odpověď >

Strana:  « předchozí  1 2
#017109
avatar
Takže na otázku "Co je cílem Vašeho kódu? Součit data ze dvou tabulek (listů) a předat je do KT?" Stačilo odpovědět ano a bylo vše jasné. Jaký nástroj používáte pro stažení dat z MySQL do listu?

Pokud nelze vytvořit union přímo na serveru, tak
http://www.contextures.com/xlPivot08.htmlcitovat
icon #017110
avatar
@Roman:
K poslednému odstavcu; skús pozrieť do:
http://blog.contextures.com/archives/2013/09/19/create-pivot-table-or-excel-table-from-multiple-files/ alebo http://www.contextures.com/xlPivot08.html..
edit: daal bol rýchlejší 1citovat
#017128
avatar
@daal
Pro načtení dat používám ...
Worksheets(cDBSheet).QueryTables.Add(Connection:=cConnectionDB, Destination:=.Range("A1")).CommandText = strSql ... @AL:
První odkaz je stejný postup který jsem zvolil. Je to obšlehnuté podle nápovědy ve VBA. Jeho stažený příklad mi funguje i doma na Off2007 :). Ten druhý odkaz http://www.contextures.com/xlPivot08.html je postup v nápovědě Excelu a našel jsem ho i na tomto webu. Pro mě je nevhodný/nepoužitelný a nebo jej neumím správně napsat/použít. Pokud se všechny data stupidně "sečtou" a nerespektují se textové položky, které se sčítat nedají a vypadne z toho počet, pak je to pro mě nepoužitelné.
Oba postupy myslím znám a zkoušel jsem je.
Jdu se podívat na to proč jeho demo funguje a moje né. Asi bude problém mezi židlí a klávesnicí.citovat
icon #017129
avatar
no, mne bolo hneď podozrivé, že by som zrovinka Tebe mohol nejako poradiť, mám za to, že v tejto problematike si o dosť ďalej, než ja, tak neostáva, než držať palce, aby si ten problém nakoniec zlomil..citovat
#017130
avatar
Určitě se mýlíš. Obvykle stačí nějaký jiný pohled/ nápad a řešení se najde. Zatím to dodělám ve třech listech a udělám v tom tmp skrytý list do kterého nakopíruji pod sebe data a ze kterého budu cucat pivot tabulky. Je to lepší než nic a za cenu cca dvojnásobné velikosti souboru. Necháme železo nažrat :)citovat

Strana:  « předchozí  1 2

Uživatelské menu

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

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

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

Aktivní diskuse

odpocet a storno tl.

PavDD • 28.3. 8:53

odpocet a storno tl.

Začátečník • 26.3. 14:39

odpocet a storno tl.

PavDD • 26.3. 10:22

odpocet a storno tl.

elninoslov • 26.3. 7:50

odpocet a storno tl.

PavDD • 26.3. 7:26

odpocet a storno tl.

elninoslov • 25.3. 22:34

odpocet a storno tl.

Začátečník • 25.3. 15:09