-
Fototrend
A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
Kérdés felvetése előtt olvasd el, ha még nem tetted.
Új hozzászólás Aktív témák
-
Kraptor
őstag
válasz kiskegyed #101 üzenetére
Ú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 -
kiskegyed
aktív tag
É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. -
-
szucsi
őstag
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! -
Po-Fa
tag
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. -
Po-Fa
tag
Köszi szépen! Minden OK!
-
isapeti
aktív tag
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.
-
isapeti
aktív tag
lécci!
biztos tudjátok!"Verés közben jön-megy a székláb." - B. I.
-
lapa
veterán
é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] -
isapeti
aktív tag
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.
-
isapeti
aktív tag
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.
-
lapa
veterán
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.
-
isapeti
aktív tag
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.
-
carvelino
csendes tag
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.
-
lapa
veterán
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] -
lapa
veterán
kicsit megmoddoltam, ez hosszab célfájl-listánál kevesebbet küzd. Bővebben: link pass: xl
-
benyo
tag
én vagyok csak egyedül, akinek nem jön le semmi lapa belinkelt cuccából?
és igen azt vágom, h a jelszó xl....HAÉRTMIGO
-
isapeti
aktív tag
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.
-
isapeti
aktív tag
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.
-
isapeti
aktív tag
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.
-
nbk
aktív tag
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...''
-
robekri
addikt
Ú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!
-
-
chicken
senior tag
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
-
Cathfaern
nagyúr
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
Új hozzászólás Aktív témák
- Xbox Series X|S
- Motorola Moto G24 Power - hol van az erő?
- Lakáshitel, lakásvásárlás
- MG4 menetpróba
- Futás, futópályák
- AMD Ryzen 9 / 7 / 5 7***(X) "Zen 4" (AM5)
- Energiaital topic
- Milyen TV-t vegyek?
- Azonnali informatikai kérdések órája
- Telekom otthoni szolgáltatások (TV, internet, telefon)
- További aktív témák...
- Eredeti Windows, telepítéssel! Digital Doctor Számítógép Szerviz
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.
- Windows, Office licencek a legolcsóbban, egyenesen a Microsoft-tól - 2990 Ft-tól!
- Adobe Creative Cloud - 2024. 04. 05 - 2025. 04. 05-ig
- Windows 10 Home COA fizikai licencek kiárusítás ingyenes szállítással