Hogyan lehet 65536 sornál hoszabb filet megnyitni úgy, hogy egy worksheeten legyen az egész, valamint az autofilter ne csapja le az ezredik után jövő cuccokat.
Ha adsz megoldást kvittek vagyunk

Úgy simán sehogy, mert 65K a limit, de vannak okosságok amivel meglehet kerülni ezeket. Van egy progi amit Microsoft Office Spreadsheet 10.0 UserForm control-nak hívnak és ezzel elvileg létretudsz hozni 18,278 x 262,144-es lapokat.Ezt nem tudom, hogy mennyire igaz vagy nem.

Vagy vannak különböző makrók amikkel megtudsz nyitnyi nagyobb fileokat, csak akkor több lapba fogja megnyitni őket automatikusan.

Sub ImportLargeFile()
'Imports text file into Excel workbook using ADO.
'If the number of records exceeds 65536 then it splits it over more than one sheet.

Dim strFilePath As String, strFilename As String, strFullPath As String
Dim lngCounter As Long
Dim oConn As Object, oRS As Object, oFSObj As Object


'Get a text file name
strFullPath = Application.GetOpenFilename(''Text Files (*.txt),*.txt'', , ''Please select text file...'')

If strFullPath = ''False'' Then Exit Sub 'User pressed Cancel on the open file dialog
Application.ScreenUpdating = False


'This gives us a full path name e.g. C:\folder\file.txt
'We need to split this into path and file name
Set oFSObj = CreateObject(''SCRIPTING.FILESYSTEMOBJECT'')

strFilePath = oFSObj.GetFile(strFullPath).ParentFolder.Path
strFilename = oFSObj.GetFile(strFullPath).Name


'Open an ADO connection to the folder specified
Set oConn = CreateObject(''ADODB.CONNECTION'')
oConn.Open ''Provider=Microsoft.Jet.OLEDB.4.0;'' & _
''Data Source='' & strFilePath & '';'' & _
''Extended Properties=''''text;HDR=Yes;FMT=Delimited''''''

Set oRS = CreateObject(''ADODB.RECORDSET'')

'Now actually open the text file and import into Excel
oRS.Open ''SELECT * FROM '' & strFilename, oConn, 3, 1, 1
While Not oRS.EOF
Sheets.Add
ActiveSheet.Range(''A1'').CopyFromRecordset oRS, 65536
Wend

oRS.Close
oConn.Close

Application.ScreenUpdating = True


End Sub


Itt egy másik is:

Sub LoadData()
Const cCol1 = 20, cCol2 = 20, cCol3 = 20, cLimit = 50000
Dim intFreeFile As Integer, i As Long, j As Long, strTemp As String
Dim arr() As String

On Error Resume Next
intFreeFile = FreeFile
Open ''c:\test.txt'' For Input As #intFreeFile
i = 0: j = 1
ReDim arr(cLimit, 2)
Do Until EOF(intFreeFile)
Line Input #intFreeFile, strTemp
arr(i, 0) = Trim(Mid(strTemp, 1, cCol1))
arr(i, 1) = Trim(Mid(strTemp, cCol1, cCol2))
arr(i, 2) = Trim(Mid(strTemp, cCol1 + cCol2, cCol3))
i = i + 1
If i > cLimit - 1 Then
Cells(1, j).Resize(cLimit, 3).Value = arr
i = 0: j = j + 3
ReDim arr(cLimit, 2)
End If
Loop
Close #intFreeFile
End Sub

Én egy ~másfélmillió sorot és 52 oszlopot tartalmazó tab delimited file-t szeretnék megnyitni és autofilterelni benne.
Különben most egy php progit írogatok, ami feltölti egy MySQL adatbázisba a cuccot, de lassan haladok, mert mostanáig nem igazán foglalkoztam programozással, MySQL-t meg nem ismerem.

rakd be access-ba, az legalább látja

na elküldtem! ha kell vmi ne kímélj

jaj valamit elcsesztem
Holnapra lesz javítás

Eddig még nem használtam sose accesst, nem ismerem.
Van neki olyan funkciója, hogy megnyit egy ilyen nagy file-t, nem kell bajlódnom a mezők deffiniálásával csak benyalja és máris keresgélhetek, szűrögethetek benne? Akkor ez lehet az én kedvencem

igen, accessben létrehozható adattábla importtal is. hasonló, mint az excelnél, csak nincs sorkorlát (legalábbis én nem tudok róla). ha beimportáltad a táblát, már lehet tallózni, szűrni, stb...

"...cos if i go out drinkin', then i can stop thinkin', how the world done me wrong"

Köszi, hétfőn kipróbálom. most irány a Balcsi

Sziasztok!

Fennakadtam egy problémán:

Adott egy excel adatbázis, amiben két egymás melletti oszlop tartalmát (mindkettő szöveg), szeretném egyenkénti kopipésztelés nélkül akár a két oszlop valamelyikében, akár egy harmadikban egyesíteni.

Merge ugye nem járható, mert az egyik oszlop tartalma elvész.

Van-e tehát valamilyen trükk, amivel ez megoldható?

Köszi a segítséget!

=CONCATENATE(A1;B1)

ha jól értelek

Blog:http://ikszkom.freeblog.hu RSS:http://ikszkom.freeblog.hu/rss.xml http://live.xbox.com/member/ikszkom

Czupp!

Még egyet, de ez már lehet, hogy perverzió.

A kettő közé rajon egy szpészt (ui.egy levelezőlista nevei az adatok).

Köszi!

=CONCATENATE(A1;'' '';B1)

Blog:http://ikszkom.freeblog.hu RSS:http://ikszkom.freeblog.hu/rss.xml http://live.xbox.com/member/ikszkom

Köszönöm!!!



[Szerkesztve]

Hali!
Egy táblázattal dolgozom és azt szeretném elérni, hogy amikor görgetem a sorokat, akkor a táblázat felső része - hogy milyen adatokkal kell kitölteni - mindig látható legyen. Előre is köszi mindenkinek.

Allj ra annak a sornak az elso cellajara ami folott mereviteni akarod a tablazatot (Pl A5 cella), utana menubol: Window / Freez Panes

van ilyen is, hogy =A1&'' ''&B1 amelyik szimpatikus.

Köszi szépen! Minden OK!

Úgy tudom 4 millióig használható az access

Kötelemfakasztó - A könyvek legnagyobb hibája, hogy nincs bennük CTRL+F. ''Or do something that's never been done''

Ahoj!

Hasonló felvetés már volt, bonyolítanám
Szal, adott egy lista pl. különféle nyomtatható anyagok (papír, vászon, stb), mindegyikhez
tartozik 1 ár. Azt szeretném, hogy legyen egy lenyíló listám, amiben kiválasztom az anyagot, de
a linkelt cellában már az ár jelenjen meg....
Bocs, ha lamer kérdés... Odáig, hogy kombi panel, linkelés, stb. okés a dolog.

"Verés közben jön-megy a székláb." - B. I.

lécci!

biztos tudjátok!

"Verés közben jön-megy a székláb." - B. I.

és az a baj, hogy a linkelt cellában csak a kiválasztott listaelem sorszáma jelenik meg? mert ha igen, akkor:

1. két oszlopban ''papper'' meg ''ár'', harmadikban (mellette!) ''sorszám''

2. kombibox meg linkelés megcsinálva ''link'' cellába

3. célcellában: =INDEX(''ár'';HOL.VAN(''link'';''sorszám'';0))

HOL.VAN = MATCH, az ''ár'' és a ''sorszám'' fix cellatartományt jelölnek. lehet, hogy van erre vmi egyszerűbb is, de nekem ez ugrott be hirtelen. az is lehet, hogy nem is ez a probléma. akkor részletezd.

[Szerkesztve]

Hi!

Kösz a tippet, közben rájöttem, hogy mivel négyzetméterenként más árak vannak, ez bonyibb
lesz... Viszont sikerült megoldani, DE! ez a szemet csak 7 szintig hajlandó függvényeket
egymásba ágyazni!!! Tudtok erre vmi megoldást (más cella meghívásán kívül, mert egyelöre így
van)?

"Verés közben jön-megy a székláb." - B. I.

sztem csak más cella, vagy ALT+F11 = visual basic editor...

és nem szemét, hanem a világ leghasznosabb alkalmazása. ne szidd.

[Szerkesztve]

köszi.

A ''szemet'' nem volt komoly, csak amolyan játékos Egyetértünk a hasznosságát illetöen
természetesen. Röstellem magam 1 kicsit... csak kezdtem örülni, mint majom a farkának, hogy
sikerül call-ok nélkül megoldani, és akkor elértem a 7 beágyazást...

"Verés közben jön-megy a székláb." - B. I.

egyébként ha ennyire sok beágyazás van lehet hogy tényleg egyszerűbb lenne vmi visual basic megoldás. a sok beágyazás meg pláne a beágyazott képletek egymásra mutogatása nagyságrendekkel növeli a számolási igényt. pláne ha hosszúak az oszlopok. nekem volt már 5-6 mb-os excelem tele képlettel, ami saccra 5 perc alatt számolt újra 2 ghz-en. írj konkrétumot, próbáld meg lemodellezni, ha kell megpróbálok segíteni.

Köszi mester, de ne fáradj, jó lesz ez a linkelt cellákkal, még egyszer?bb is volt lecsekkolni,
hogy rendesen mükszik-e. Nincs sok adat különben, tehát gyorsan nyomja a srác... pont ezért
volt bosszantó, hogy 7-nél figyel a határ beágyazgatásnál, 9 meg már elég lett volna...

Van viszont 1 új gázom... nem kímélnek, így én sem titeket
Szóval: külön fájlokban készülgetnek árajánlatok. Ezek közül azokat, melyek meg is valósulnak,
vmiféleképpen automatizáltan össze kéne szedni egy táblázatos formájú külön doksiba, sorba
szépen a megrendülô nevével meg még 1000 adattal. Úgy gondoltam, hogy egy cellának adok
érvényesítéssel igen/nem lehetôséget, igen esetén pedig átnyomom az adatait a táblázat
következö sorába... csakhogy itt megáll a tudomány. Valaki valamit? Félek, hogy ez már VBA
lesz a javából...

köszi elöre is!!!

"Verés közben jön-megy a székláb." - B. I.

nem tudja valaki hogy melyik az a cella ahova ha beirsz valamit akkor bejön egy rejtett progi??? anno megmutatta vki, de még kicsi vokltam, elfelejtettem.

Túl sok állat, túl kevés cirkusz.

Ha az alkalmazásba ágyazott progira gondoltál akkor:
[L]http://www.j-walk.com/ss/excel/eastereg.htm[L]
Sorry van még mit tanulnom!

[Szerkesztve]

izé, azt azért elmondom előre, hogy amit tudok a vb-ről, azt a vb súgóból tudom. nem tanultam programozást se soha. a ''nézzünk végig minden cellát'' stílus kissé brute-force, de hát azért vannak a mega-giga-hertzek. Bővebben: link (pass: xl)

feltételezzük, hogy ugyanaz az adatbank és célfájl könyvtára. az érvényesítés jelen esetben ''ajánlat 1.xls'' D oszlopában lévő ''IGEN'' szöveg. az E oszlop lehet (legyen) rejtett a felhasználók elől.

ez egy kicsit kifordított példa ugyanis lehet, hogy célszerűbb a kódot a célfájlban elhelyezni, mint ezer külön adatbankban, de egyrészt gyakorold te is a súgót, másrészt ezzel megvalósítható vmi event-triggering, hogy pl. ''ajánlat 1.xls'' minden mentésekor töltse be az adatokat (csendben hozzáteszem hogy ha jót akarsz, az igazi kódot ez esetben is az egyetlen céltáblába rakod, az adatbankokból meg csak meghivatkozod a céltábla makróját).

szóval dolgod lesz vele elég, de a végén ha minden igaz lesz a ''lefutott.xls''-ben egy fasza kódod, amit a sok beviteli tábla pl. mentéskor elindít. van pár másodperc amíg az egyik adatbank ment, addig a másik ugye nem fér hozzá (=runtime error 1004).

remélem segítettem. jótanácsként csak annyit (nemtom mennyire vagy jártas a vb for excel-ben), hogy én bepippantottam anno a ''visual basic'' menüt az excelben, és rövid utasításokat kezdtem rögzíteni, utána meg az editorral (ALT+F11) megnéztem, hogyan mentette el. ezt tedd meg sztem az ''ajánlat 1.xls'' megnyitása után is, (magamhoz képest) sokat kommenteltem.

aki meg (jobban) ért hozzá, bírálja felül simán, én is szívesen tanulnék.

[Szerkesztve]

[Szerkesztve]

kicsit megmoddoltam, ez hosszab célfájl-listánál kevesebbet küzd. Bővebben: link pass: xl

ja. lezsíroztam, most próba.

HAÉRTMIGO

Bocs a hosszi kussolásért, 7vg-n nem vagyok netközelben...
Nagyon köszönöm a segítséget! Most fogom meglesegetni a cuccost, de valami azt súgja,
frankó lesz! Remélem lesz lehetôségem viszonozni...

"Verés közben jön-megy a székláb." - B. I.

Vmiért nem viszi által az adatokat... nincs hibaüzenet sem. Szerintem kapcsolatban lehet
azzal,hogy Mac-en ügyködök, mert az elérési út backslash-ét is zokon vette, de azt sikerült
megoldani... Öti esetleg?

"Verés közben jön-megy a székláb." - B. I.

OK, láma voltam esmét... inkább le se írom...
A lényeg, hogy TÖKÉLETES, köszönöm szépen! Aztán belemerülök a VBA súgóba...

"Verés közben jön-megy a székláb." - B. I.

Sziasztok!

Érdekelne, hogy lehet megcsinálni excelben, hogy ha egy bizonyos szó megtalálható a cellában, akkor az a cella legyen zöld vagy akármilyen...
valamilyen feltételes formázás kéne...

thx

''Egy aprócska kalapocska, benne csacska macska mocska...''

hát ha nem csak az a szó, vagy legalábbis nem azzal a szóval kezdődik a mondat, akkor csak VBA szerintem

Blog:http://ikszkom.freeblog.hu RSS:http://ikszkom.freeblog.hu/rss.xml http://live.xbox.com/member/ikszkom

kösz...

''Egy aprócska kalapocska, benne csacska macska mocska...''

Újratelepítettem egy gépet, windows XP és Office XP-vel.

Exelben ha beírom pl. 14745 akkor ebben a formában kerül a cellába 147,45!
Próbáltam már a cellát formázni, de nem írja be megfelelően!

A melómban és otthon is simán tudom írni a számokat!

Mit tegyek ezzel a gecÓÓÓval?!?!

Üdv.:Robe

-Tanulok, mert egy idő után a tanulásba fektetett munkám meghozza a gyümölcsét, és mint tudjuk a gyümölcsből pálinkát lehet főzni!

Közben megtaláltam a megoldást a tizedesjegyek kikapcsolása! Telepítésnél beáll automatikusan ''2''-re!

Üdv.:Robe

-Tanulok, mert egy idő után a tanulásba fektetett munkám meghozza a gyümölcsét, és mint tudjuk a gyümölcsből pálinkát lehet főzni!

Akor ezt szépen megbeszélted magaddal

Az irigyek mind meghalnak, de az irigység halhatatlan

grafikont kellene csináljak egy olyan táblázatból, ami kimenő telefonhívásokat tartalmaz, vagyis hogy hány órakor kezdődtek, és mikor lett végük.
így néz ki most:
08:30:57 08:31:12
08:35:10 08:35:45
stb
ebből van rengeteg sor.
Az első oszlopban van, hogy mikor kezdődött a hívás, a másodikban, hogy mikor lett vége.
Olyan grafikon kellene, amin víszintesen van, hogy hány óra van, és menne egy csík, hogy épp volt hívás vagy nem volt, tehát igazából a függőleges tengelyen nem lenne semmi.
Fogalmam sincs, hogy kell, ha valaki tud, segítsen lszi.



[Szerkesztve]

mens sana in campari soda

Gondolkozz 2-es számrendszerben:
A függőleges tengelyen legyen két szám, az egyik az egy, a másik a nulla. Értelemszerűen amikor van hívás, akkor az érték 1-es, ha nincs, akkor nulla. Mivel nem ismerem behatóbban az Excelt, ezért pontos leírást nem tudok adni, de ezt az elvet követve meg lehet valahogy csinálni.
Mondjuk a vízszintes tengely megcsinálása meglehetősen macerásnak tűnik

"Nembaj, megvan az ilyen kuruzslások placebo hatása legalább. Kikapcsolod a hibernálást, +10 FPS. Olyan mint autótuningban a street racing matrica a szélvédőn..." by orbano