- sziku69: Szólánc.
- Luck Dragon: Asszociációs játék. :)
- sziku69: Fűzzük össze a szavakat :)
- gban: Ingyen kellene, de tegnapra
- weiss: Logi MX Master 3S FW NEM frissítés
- btz: Internet fejlesztés országosan!
- bambano: Bambanő háza tája
- eBay-es kütyük kis pénzért
- f(x)=exp(x): A laposföld elmebaj: Vissza a jövőbe!
- D1Rect: Nagy "hülyétkapokazapróktól" topik
Hirdetés
-
LOGOUT
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
-
#11700
m.zmrzlina
senior tag
m.zmrzlina
senior tag
Van két UserForm. Az egyiken parancsgomb amivel meg lehet hívni a másikat:
A másikon szintén parancsgomb amivel el lehet tüntetni:Private Sub cb_bezar_Click()
Unload uf_eredmeny
End SubA képen az eredmény:
Ha a következő (szerintem hajánál fogva előrángatott) módon zárom be akkor nincsen ez a hiba szépen eltűnik a meghívott formnak az első formon túllógó része is:
Private Sub cb_bezar_Click()
Application.ScreenUpdating = False
Unload uf_eredmeny
Worksheets(2).Select
Worksheets(1).Select
Application.ScreenUpdating = True
End SubA "Lecke száma" combobox Change eseménye mögött is van olyan művelet ami munkalap váltással jár az is eltünteti a megmaradó részeket.
Nyilván valami képernyőfrissítési probléma van de mi?
-
Salak
aktív tag
válasz
Delila_1
#11698
üzenetére
Köszönöm szépen, még igyekszem értelmezni!
Ezek szerint az INDEX és az INDIREKT függvények variálhatók, és ugyanarra jók csak más megközelítésből? Illetve még annyi kérdés, hogy a felkiáltójeles feladatnál a feladat szerint FKERES-sel kell megkeresni és kiiratni a megye nevét, ahol a 4év összege<4500, amit te INDEX-el csináltál. FKERES-sel meg tudod mondani, hogy kell?
Köszönöm szépen még egyszer!
-
Delila_1
veterán
Az első képen szándékosan 2 féle módon hivatkoztam a megyét tartalmazó A oszlopra. B28-ban az INDEX, B30-ban az INDIREKT függvénnyel.
A második képre beillesztettem az A oszlop szűrésének a képét. Mivel az egyéni kategóriában csak 2 szempont szerint lehet szűrni, felvettem egy új oszlopot (G), és a 3. szempont szerinti szűrést ide tettem be.
-
Salak
aktív tag
Itt van maga a táblázat, hátha így értelmezhetőbb: [link]
A "Feladat 7 cs" lapon vannak a kérdések, a 9-es és 10-es kérdés második fele nem megy. A 9. kérdés eredménye lenne a "Szül MO" lap 28. sorában, a 10 kérdés eredménye pedig a H 22-es cellában.
Köszönöm szépen előre is, ha valaki tud segíteni!
-
Salak
aktív tag
Sziasztok!
A következő, valószínűleg elég basic kérdésem lenne.
Adott egy táblázat, sorokban egymás alatt a megyék mellette 4 db oszlopban 4 évre vonatkozóan az élveszületések száma. Kellett számolni átlagot, összeget stb, ez nem volt gond. Van egy olyan feladat, hogy "ha" függvénnyel tegyek felkiáltójelet azok mellé a megyék mellé egy külön cellába, ahol a 4évi élveszületések száma kisebb, mint 4500. Ezt sikerült, de utána egy külön cellába ki kell iratni annak a megyének a nevét is, ahol van felkiáltójel és ez sehogy nem akar sikerülni, Melyik függvénnyel tudnám? Index? Nem jött eddig össze, bármit próbálltam.
És valószínűleg ugyanaz a függvény kellhet oda is, amikor évenként ki kell számolni a maximális születésszámot (ez megvan) és kiiratni minden év alá, hogy melyik megyében volt ez a maximális érték. Ez a névkiiratás nem akar összejönni...Bár itt meg azt írja, h fkeres-sel keressem meg..
Köszönöm előre is a segítséget!
-
mr.nagy
tag
válasz
Fire/SOUL/CD
#11694
üzenetére
Köszönöm! Ezt kipróbálom.
-
#11694
Fire/SOUL/CD
félisten
mr.nagy
#11693
válasz
mr.nagy
#11693
üzenetére
Akkor csak 1 javaslatom maradt, nevezetesen, hogy Te egyesítsd a dokumentumot (ekkor belekerülnek az adatok) és ezt a doksit küld el, így nem kell külön a körlevél adatbázisául szolgáló táblát is küldeni. Innentől az már csak egy mezei/általános dokumentum, ést azt már illene tudni kinyomtatni. Ennél egyszerűbben nem fogod tudni ezt kivitelezni...
-
mr.nagy
tag
válasz
Fire/SOUL/CD
#11691
üzenetére
Kipróbáltam a javasolt módszert, ezzel az a baj, hogy a kép így sokkal éltelenebb. Nem azt adja vissza, mint mondjuk a Wordben. Ha meg az átlátszóságot csökkentem akkor a cellák tartalma nem úgy látszik mint kellene.
-
#11692
Oly
őstag
Fire/SOUL/CD
#11691
Oly
őstag
válasz
Fire/SOUL/CD
#11691
üzenetére
Hm...
Akkor úgy!
-
#11691
Fire/SOUL/CD
félisten
mr.nagy
#11689
válasz
mr.nagy
#11689
üzenetére
"...egyébként már megcsináltam volna Excelben de ott meg a háttérkép nyomtatásra nem találtam megoldást."
Pedig van: [link] Az a trükk, hogy egy alakzatot szúrj be, majd ennek a kitöltésénél képet/anyagmintát adj meg és itt tudod állítani az átlátszóságot...![;]](//cdn.rios.hu/dl/s/v1.gif)
Oly
Igen, az tűnne logikusnak, csak azt nem lehet kinyomtatni, nyomtatásban/nyomtatási képen az a background nem jelenik meg...
-
mr.nagy
tag
válasz
Fire/SOUL/CD
#11688
üzenetére
Sajnos igen! Emailban kell elküldenem több embernek és vannak köztük magasan képzettek akik képesek csak az egyik vagy másik fájlt megnyitni közvetlenül az Outlookból aztán csodálkoznak és reklamálnak, hogy nem működik.
Arra gondoltam, hogy nem lehet e valahogy egy fájlba összegyúrni? Aztán csinálni hozzá a makrós gombot a nyomtatáshoz.
Sajnos szükség van egy háttérképre a dokumentumban, ennek minden nyomtatott oldalon ott kell lennie, egyébként már megcsináltam volna Excelben de ott meg a háttérkép nyomtatásra nem találtam megoldást.
-
#11688
Fire/SOUL/CD
félisten
mr.nagy
#11685
-
#11687
Fire/SOUL/CD
félisten
Badb0y
#11686
válasz
Badb0y
#11686
üzenetére
Még1x nekifutottam a dolognak, ez lett belőle. [link]
A makró, a Notebook.xls, csalamádé oszlopára támaszkodik, azaz az A oszlopra. A függvényt(az alábbi kódot) új modulba kell bemásolni.
Function FSCD_GetMachineInfo(MyRange As Range) As String
Dim MyString As String
Dim MyArray() As String
Dim MyRightMarker_Good() As Variant, MyRightMarker_Bad() As Variant
MyRightMarker_Good = Array("11.6", "12.1", "12.5", "12.6", "13.1", "13.3", "14.1", "15.6", "17.3", "18.4")
MyRightMarker_Bad = Array("11,6", "12,1", "12,5", "12,6", "13,1", "13,3", "14,1", "15,6", "17,3", "18,4")
MyString = MyRange.Value
For i = 0 To UBound(MyRightMarker_Good)
MyString = Replace(MyString, MyRightMarker_Bad(i), MyRightMarker_Good(i))
Next i
MyString = Replace(MyString, "BONTOTT", "")
MyString = Replace(MyString, "NB", "")
MyString = Trim(MyString)
MyString = Replace(MyString, ",", " ")
MyString = Replace(MyString, " ", " ")
MyArray = Split(MyString, " ")
MyString = ""
For i = 0 To UBound(MyArray)
If Not (InStr(1, MyArray(i), ".", vbTextCompare) > 0 Or _
InStr(1, MyArray(i), ",", vbTextCompare) > 0 Or _
InStr(1, MyArray(i), """", vbTextCompare) > 0) _
Then
MyString = MyString + MyArray(i) + " "
Else
Exit For
End If
Next i
FSCD_GetMachineInfo = Trim(MyString + "Laptop")
End FunctionTöbbet sajnos nem tudok kihozni makróval...
UI: Elnézést, hogy nem hamarabb írtam, de ma is hajnali 4 körül értem haza egy melóból, csak most volt rá időm ...
-
#11686
Badb0y
addikt
Fire/SOUL/CD
#11684
Badb0y
addikt
válasz
Fire/SOUL/CD
#11684
üzenetére
Nagyon köszönöm, hogy juthatok a makróhoz
Nem küldöm el másnak, mert a lényeg meg van ha jól látom -
mr.nagy
tag
Sziasztok!
A Word körlevélvarázslójával kellene kinyomtatni ártáblákat, az adatokat Excelből veszi. Viszont tisztelet a kivételnek nagyon hozzá nem értőknek kellene vele dolgozni. Tudtok valami bolondbiztos megoldást? Lehetőleg egy gomb megnyomásánál többet nem kellene erőltetni.
-
#11684
Fire/SOUL/CD
félisten
Badb0y
#11661
válasz
Badb0y
#11661
üzenetére
Na végre elkészült a az egesített táblázat, ami nem más, mint a notebook tábla, és a csalamádéból kivarázsolt adatok (ez jó pár órát vett amúgy igénybe) összesítése.
Ha ezt a táblát használod bázisul, azaz ebbe írod be mindig az új gépeket, minden adatukat megfelelő oszlopba, akkor bármit elő lehet állítani a mezők alapján. Ha továbbra is csalamádé formátumban kapod/kezeled az adatokat, akkor abból csak kézi módszerekkel lehet kinyerni számos infót, mivel semmilyen mintát nem lehet felfedezni a csalamádéban.
Természetesen ha gondolod, küld el másnak is az eredeti táblákat, hátha más képes képlettel avagy makróval valamit alkotni.
-
pitman
őstag
válasz
Delila_1
#11677
üzenetére
Köszönöm, szétnéztem az oldalon megtaláltam, hol lehet átkapcsolni a számolást, és úgy tűnik, hogy nem emiatt lassú a feldolgozás.
Excel-ben ki lehet valahogy kapcsolni makró futása alatt a táblázat frissítését (azok a műveletek, amik a makróban a tábla újrarajzolásával járnak csak a végrehajtás után történjenek pl. cellaszínek változása stb.)
-
pitman
őstag
Nem egészen ebbe a topicba való a kérdésem, de hátha valaki tud segíteni.
A múltkori segítségetekkel sikerült makró írásával megoldani a feladatomat. A makró még openoffice alatt is működőképes, bár még egy kis finomításra szorul. Egy problémám van még vele, hogy openoffice alatt nagyon lassú. Excelben a futási időre a képletek frissítése és az események kezelése ki van kapcsolva, de szerintem openoffice alatt folyamatosan újraszámol futás közben. Nem tudok rájönni, hogy hogy vehetném rá, hogy ne tegye ezt.
A menüben sem látok olyan opciót, mint az excel-ben, amivel az automata számolást ki lehetne iktatni. -
Messss
csendes tag
ÜDV!
Egy gyors kérdésem lenne!
SZUMHATÖBB függvényben kellene segítség.
Szeretném összeadatni az egyik oszlopban lévő értékeket több feltétel megadásával.
Az egyik az, hogy egy megadott időintervallumban lévő mennyiségeket kellene szummázni. Tehát megadom az egyik cellában, hogy 1 (J1-es cella), egy másikban, hogy 6 (K1-es cella), így az első 6 hónap mennyiségeit kelle összeadni.
Kritériumtartományként megadom, hogy H:H, ez tartalmazza a hónapok sorszámát. Kritériumban pedig, hogy >=J1, másikban pedig ugyanígy H:H és <=K1.
Ez így 0-át hoz, ellenben ha beírom, hogy >=1 és <=6, akkor hozza szépen az összeget. Nekem viszont fontos lenne, hogy ezek változtathatóak legyenek.Remélem érthető volt
Köszi!
-
Delila_1
veterán
válasz
bozsozso
#11669
üzenetére
Alt+F11-gyel bejutsz a VB szerkesztőbe, bal oldalon kiválasztod a füzetedet, Insert menü, Module. A jobb oldalon kapott fehér lapra másolod.
Ha azt akarod, hogy a többi füzeted is elérje, a personal.xls-be másold be a kódot. Erről már többször volt szó itt a fórumon, keress rá a personal szóra.
Szerk.: megtalálod pl. a #6907-es hozzászólásban.
-
Delila_1
veterán
válasz
bozsozso
#11666
üzenetére
Egy új függvény megoldja.
Function Eleje(cella As String)
Dim b%
For b% = Len(cella) To 1 Step -1
If Mid(cella, b%, 1) = " " Then
Eleje = Left(cella, b% - 1)
Exit Function
End If
Next
Eleje = "Nincs szóköz a hivatkozott cellában"
End FunctionA cellába ezt kell beírnod: =Eleje(A10) , persze csak akkor, ha az A10-ben van a szöveged, aminek az elejét akarod képezni a függvénnyel.
-
#11667
Badb0y
addikt
Fire/SOUL/CD
#11662
Badb0y
addikt
válasz
Fire/SOUL/CD
#11662
üzenetére
Ok, majd elmagyarázod, mit kell hogyan, mert nekem ugye csak a nevek kellenek. Azt lehet ha meglátom valami más is érdekelni fog
-
bozsozso
őstag
Sziasztok!
Arra van valami függvény, hogy az adott cellában mondjuk az utolsó szóköz hányadik helyen van? Szeretném az utolsó szóköz előtti karaktereket egy másik cellába helyezni.
pl.:
A1 cellában ez van:
a b c 250
A B1 cellába csak annyit szeretnék látni, hogy a b c
-
gege71.hu
addikt
Sziasztok.
Van egy problémám egy text-time konvertálással.
Adott egy valag cella "TEXT" formátumban amiben okosan filmek hosszát adták meg 2:42 leosztásban.
Tehát 1 jegyű ÓRA, két jegyű PERC. és mindez bölcsen szövegként.Format cells-zel, egyéb custom formulákkal sem tudom HH:MM:SS formára alakítani. Olyan időformátum kéne ahol akár a filmhosszak összegével tudok kalkulálni, azaz: 39:56:24 is lehessen pl.
Van ötletetek?kösz előre is!
szerk:
megoldottam:
mind kijelöltem a cellákat és a ":"-ot ":"-tal replace-eltem. ez után már menta format cells time-ra....fura ez az excel) -
rtom
senior tag
Hello!
Olyan problémám van, hogy egy .csv fájlból kéne adatokat másolni egy kiértékelésbe, ha én nyitom meg a fájlt duplaklikkel, akkor tagoltan jelenik meg, azonban ha makró-ból a Workbooks.open paranccsal, akkor pontosvesszővel elválasztva, amit persze a kiértékelésem nem jól kezel. A vezérlőpulton belenéztem, a listaválasztónak a pontosvessző van beállítva, szal nem értem, mi lehet a gond?
-
#11662
Fire/SOUL/CD
félisten
Badb0y
#11661
válasz
Badb0y
#11661
üzenetére
Azt, hogy az easy populates-nek milyen formátum kell, azt majd Te legyártod. Én "csak", annyit teszek, hogy szétcincálom úgy, hogy le lehessen gyártani.
Ennyire már szétszedtem, jobban meg nem kell, mert Neked úgyis csak az ABCD oszlop kell pluszban, illetve ha gondolod, akkor a CPU oszlopokkal felülírható a notebook lista megfelelő oszlopa, mert ott csak plk Core i5 van, nincs órajel stb (már ha kell) -
#11661
Badb0y
addikt
Fire/SOUL/CD
#11653
Badb0y
addikt
válasz
Fire/SOUL/CD
#11653
üzenetére
Köszönöm
Az easy populates táblába látod mi a webshop feltöltési formátum -
VásRló
tag
válasz
Fire/SOUL/CD
#11657
üzenetére
Talán inkább neked kéne megcsinálni..
én már csináltam -
#11657
Fire/SOUL/CD
félisten
VásRló
#11656
válasz
VásRló
#11656
üzenetére
1. Szemléletes lett volna, ha megcsinálod, mert akkor láttad volna, hogy mennyi rekordról van szó és miért annyit ír ki az Excel, amennyit.
2. Teljesen mindegy, hogy szűrt-e a táblázat vagy sem, az ismétlődő elemek eltávolítása így is úgy-is ugyanannyi rekordot fog eltávolítani. Ha szűrve van a tábla, akkor annyiban mást fog alul kiírni, hogy az összes rekordból mennyi, a szűrésnek is eleget tevő, különböző sor(rekord) maradt.
3. "Harmadszor pedig a darab függvény a köztes, szűrő által kiszűrt sorokat is beleszámolja."
Ez így igaz, ezzel meg is válaszoltad magadnak, az egyik kérdésedet.
-
VásRló
tag
válasz
Fire/SOUL/CD
#11655
üzenetére
Mivel van autoszűrő, így olyan sorok vannak, hogy 3,5,6,9,12,14 így egymás után. Tehát ez nem megoldás. Meg ez a mód nem is íratná ki a számot. Harmadszor pedig a darab függvény a köztes, szűrő által kiszűrt sorokat is beleszámolja.
-
#11655
Fire/SOUL/CD
félisten
VásRló
#11654
-
VásRló
tag
Hi van egy kis gondom.
Van egy névlistám ismétlődő nevekkel.
Kell rajta végeznem egy autoszűrést előzetesen, utána el kell távolítanom az ismétlődő neveket.
Amint csinálok egy Ismétlődő értékek eltávolítását, többnek írj az eredetileg leszűrt elemeket, nem kevesebbnek! Viszont ha kijelölöm az oszlopot, a Cellák számát (amit az alsó csíkban jelöl az Excel) kevesebbnek írja, annyit ír, ami a valóságban van.
Ha darab függvénnyel számolom a neveket, akkor is nagyobb számot ír, mint amennyi cella a valóságban van ott..És szeretném, ha a valós cellaszámot automatikusan ki tudnám íratni az egyik cellába, hogy mutassa, hány nevem is van.
-
#11653
Fire/SOUL/CD
félisten
Badb0y
#11644
válasz
Badb0y
#11644
üzenetére
Hát jó kis csalamádét küldtél. Ebből egy hasznos sheet van, ami egész normálisan néz ki, de az az oszlopa, ahol ömlesztett formájában vannak a "konfigok", hát az aztán megint gyönyörűséges. Én azon csodálkozom, hogy egyáltalán eddig kiigazodtál ezen...
Majd lassan (de biztosan) átalakítom, lesz vele meló...
(Tegnap kellett volna már elküldened, akkor volt több időm...) -
#11652
Delila_1
veterán
m.zmrzlina
#11646
Delila_1
veterán
válasz
m.zmrzlina
#11646
üzenetére
A felhasználó szabja meg, hány szót választ ki.
Ha 10 kiválasztott szóból tud 2-t, az 20%. 100 közül 20 jó válasz szintén 20% lenne, de ez a 20 darab felszorozva pl. 1,3-mal már 26 helyes válasznak felel meg, javul az elért eredmény.
A szorzó mértéke a kiválasztott szavak számától függjön, minél több szót választ ki a felhasználó, annál nagyobb legyen a szorzó.
-
#11651
m.zmrzlina
senior tag
Mythunderboy
#11648
m.zmrzlina
senior tag
válasz
Mythunderboy
#11648
üzenetére
Csak ötletelek, a hogyanról fogalmam sincs.
Egymásba ágyazott számlálós ciklusokkal összeadnék minden méretet minden mérettel. Minden egyes összeadást addig folytatnék amíg már nem tudok egyetlen még meglévő méretet sem hozzáadni az eredményhez úgy, hogy az ne haladja meg a 6000-t. Ezeket a kombinációkat megtartanám, a 6000 feletti eredményeket eldobnám.
Aztán felülre rendezném azokat a kombinációkat amelyek értéke leginkább megközelíti a 6000-t (ezeknél legkevesebb a hulladék) és ezekből kiszedném azokat amelyekben pont annyiszor szerepelnek a különböző egyedi méretek ahányszor kellenek.
-
#11649
Oly
őstag
m.zmrzlina
#11645
Oly
őstag
válasz
m.zmrzlina
#11645
üzenetére
Szia
Ezt néztem már, de nem a
winfowindows beállítása, hanem az Office lesz, mert csak azokban ilyen. -
#11648
Mythunderboy
csendes tag
Mythunderboy
csendes tag
Valami ilyen formában...bocsánat a túlméretért
Üdv Tboy -
#11647
Mythunderboy
csendes tag
Mythunderboy
csendes tag
Tudnátok segíteni? Egy ilyenből szeretnék optimalizálni 6000 mm hosszra... -
#11646
m.zmrzlina
senior tag
m.zmrzlina
senior tag
Még mindig a szótanulós munkafüzet.
Szeretnék csinálni egy "Legjobb 10 eredmény" összesítést. Legegyszerűbb lenne az elért százalékok alapján rangsorolni csakhogy egyrészt különböző méretű szókészletek vannak (100 - 700-ig) másrészt kiválasztható, hogy hány kérdést kelljen megválaszolni.
Nyilván nem azonos értékű ha valaki egy százas szókészletből 10 szót válaszol meg hibátlanul azzal ha 700 szóból mindet. Százalék alapján ez egyenlő teljesítmény.
Van tehát 3 változó (szókészlet, megválaszolt kérdések száma, elért eredmény százalékban). Ezeket kellene valami alapján valahogyan súlyozni.
???
-
#11644
Badb0y
addikt
Fire/SOUL/CD
#11642
Badb0y
addikt
válasz
Fire/SOUL/CD
#11642
üzenetére
Check your mailbox
Elküldtem a 2 listát, amiből dolgozok. Amit vasárnap küldtem, az pedig a feltöltési formátuma a webshopomnak.
Egyébként nem tudom, de ha segít így szoktam megoldani linuxban:
cat listafájl |grep -i "dell\|apple"|sed 's,BONTOTT,,g'|sed 's,NB,,g'|awk '{print $1" "$2" "$3" Laptop"}'|sed 's,DELL,Dell,g'|sed 's,Dell Alienware,Alienware,g'
-
#11642
Fire/SOUL/CD
félisten
Badb0y
#11641
válasz
Badb0y
#11641
üzenetére
"Jó lenne nagykerekre egy egységet rájuk húzni"
Nem csak jó lenne, hanem másképp nem is fog menni...
Pont az a lényeg, hogy egy adott oszlopban, azonos tulajdonságok legyenek az összes termékről, pl a BONTOTT-nak semmi keresnivalója a GYÁRTÓ oszlopában.
Ha 1x megcsinálod rendesen, akkor utána már nagyon könnyű vele dolgozni/bővíteni stb.UI: Most úgy is van időm (gépeket telepítek), ha gondolod, akkor a a saját elképzelésem alapján gatyába rázom a dolgot (már ahogy lehet), csak ha amit küldtél tábla nem a teljes tábla, akkor előtte a teljes táblázatot küld el...
-
#11641
Badb0y
addikt
Fire/SOUL/CD
#11637
Badb0y
addikt
válasz
Fire/SOUL/CD
#11637
üzenetére
De rendesek vagytok
Amit csináltál már, ezt tök jó, végülis ha a latitude és a szám meg van, a végére kell biggyeszteni egy laptopot és az elejére egy dellt. Macbooknál meg ha nem megy, akkor max beteszem kézzel. Az nem olyan sok. De több 100 terméknél nehéz.Egyébként hogy szokták ezt megoldani? Valaki tudja pontosan ? Jó lenne nagykerekre egy egységet rájuk húzni
-
#11640
Mythunderboy
csendes tag
Mythunderboy
csendes tag
Sziasztok! Köszönöm a múltkori segítséget most már működnek a dolgaim...egy kérdés viszont még van illetve felmerült egy problémám Lapvédelem alatt nem műxik a makró van valami megoldás
Tboy -
#11638
Delila_1
veterán
Fire/SOUL/CD
#11637
Delila_1
veterán
válasz
Fire/SOUL/CD
#11637
üzenetére
Igen, rossz helyre kattintottam.
Szerintem tökéletes megoldás nem létezik. A DELL szöveget kellene talán keresni, és abból kinyerni a szükséges adatokat. A többi sorhoz egy külön oszlopban megjelölni, hogy nem található a szövegrész, azokat manuálisan lehetne feldolgozni.
Így Badb0y-t sem öli meg az unalom. -
#11637
Fire/SOUL/CD
félisten
Delila_1
#11636
válasz
Delila_1
#11636
üzenetére
Gondolom ezt a választ Nekem szántad. Hát igen, ezen a listán "fogást találni", nem hiszem hogy lehet, de azért pár elemét bemásolom, hátha Neked lesz valami ötleted (azon kívül, hogy valami egységes formába kellene hozni)...
Dell Latitude E6220 laptop - Intel Core i7 2620M 2.70GHz (Dual Core)<br /> 4GB DDR3 1333MHz (1*4GB)<br /> 12.5" UltraSharp HD Anti-Glare (1366x768) Slim LED + integrált HD kamera<br /> 320GB 7200rpm SATA HDD<br /> 64bit Windows 7 Professional SP1 HUN + Office Starter<br /> NO ODD<br /> integrált Intel HD 3000 grafikus vezérlő<br /> Dell Vezetéknélküli 5550 MiniCard Broadband modem<br /> Bluetooth 3.0<br /> Intel Centrino Advanced-N 6205 802.11a/b/g/n<br /> Gigabit LAN<br /> háttérvilágítású magyar billentyűzet integrált ujjlenyomat-olvasóval<br /> 6 cellás akkumulátor 60WHr<br /> mini-HDMI<br /> 2x USB2.0 (eSATA)<br /> SD-kártyaolvasó<br /> dokkolható<br /> ExpressCard foglalat<br /> Contactless SmartCard Reader<br /> 90W AC adapter<br /> 4 év helyszíni garancia
DELL NB XPS L702x 17.3" HD+, Intel Core i5-2410M 2.30GHz 4GB 750GB DVD-RW, GeForce GT 550M, Win 7 HPrem 64bit, 6cell, Ezüst<br><br>Képernyő átmérő: 17,3<br>Processzor: Intel Core i5<br>Memória: 4096<br>Merevlemez: 750<br>Optikai meghajtó: DVD-RW +/-<br>Operációs rendszer: MS W. 7 Home Premium 64bit HU<br>Akkumulátor: 6 cella<br>Felbontás: 1440 x 900 (WXGA) 16:10<br>LAN: 10/100/1000<br>WLAN: 802.11b/g/n<br>Modem: Nem<br>USB: 2<br>Beépített kártyaolvasó: Igen<br>Bluetooth: 3.0<br>Firewire: 0<br>Video: HDMI + Mini-Display Port<br>Hang: Igen<br>Kamera: 2<br>TV-Tuner: Nem<br>Súly: 3,36<br>Szín: Ezüst<br>Ujjlenyomat-olvasó: Nem<br>HSDPA: Nincs<br>Dokkolhatóság: USB porton<br>Garancia: 3 év
DELL NB Alienware M14x 14.1" HD+, Core i7 2720QM 2.20GHz, 8GB, 750GB, DVD-RW, nVidia GF GT555M, Win7 HPrem 64bit ENG, 8cell, Piros<br><br>Képernyő átmérő: 14,1<br>Processzor: Intel Core i7<br>Memória: 8192<br>Merevlemez: 750<br>Optikai meghajtó: DVD-RW +/- DL<br>Operációs rendszer: MS W. 7 Home Premium 64bit ENG<br>Akkumulátor: 8 cella<br>Felbontás: 1600 x 900 (WUGA) 16:9<br>LAN: 10/100/1000<br>WLAN: 802.11a/b/g/n<br>Modem: Nem<br>USB: 1<br>Beépített kártyaolvasó: Igen<br>Bluetooth: 3.0<br>Firewire: 0<br>Video: D-Sub + HDMI + Mini Displayport<br>Hang: Igen<br>Kamera: 2<br>TV-Tuner: Nem<br>Súly: 2,92<br>Szín: Piros<br>Ujjlenyomat-olvasó: Nem<br>HSDPA: Nincs<br>Dokkolhatóság: USB porton<br>Garancia: 3 év
BONTOTT DELL NB Inspiron M5040 15.6" HD, AMD DC E350 1.6GHz, 2GB, 500GB, DVD-RW, ATI HD6310, Linux, 6cell, Fekete Létrehozás oka: bontott<br><br>Képernyő átmérő: 15,6<br>Processzor: AMD Brazos<br>Memória: 2048<br>Merevlemez: 500<br>Optikai meghajtó: DVD-RW +/-<br>Operációs rendszer: Linux<br>Akkumulátor: 6 cella<br>Felbontás: 1366 x 768 (WXGA) 16:9<br>LAN: 10/100<br>WLAN: 802.11g/n<br>Modem: Nem<br>USB: 3<br>Beépített kártyaolvasó: 3-1<br>Bluetooth: 3.0<br>Firewire: 0<br>Video: D-Sub + HDMI<br>Hang: Igen<br>Kamera: 0,3<br>TV-Tuner: Nem<br>Súly: 2,73<br>Szín: Fekete<br>Ujjlenyomat-olvasó: Nem<br>HSDPA: Nincs<br>Dokkolhatóság: USB porton<br>Garancia: 3 év
Apple NB MacBook Pro 17" Quad-Core i7 2.2GHz, 4GB, 750GB, Radeon HD 6750M 1GB, SD, HU bill.<br><br>Képernyő átmérő: 17<br>Processzor: Intel Core i5<br>Memória: 4096<br>Merevlemez: 750<br>Optikai meghajtó: DVD-RW +/-<br>Operációs rendszer: Mac OS X Snow Leopard<br>Akkumulátor: Li-ion<br>Felbontás: 1920 x 1200 (WUXGA) 16:10<br>LAN: 10/100/1000<br>WLAN: 802.11b/g/n<br>Modem: Nem<br>USB: 3<br>Beépített kártyaolvasó: Nem<br>Bluetooth: 2.1<br>Firewire: 1<br>Video: Mini-Display Port<br>Hang: Igen<br>Kamera: 0<br>TV-Tuner: Nem<br>Súly: 2,99<br>Szín: Ezüst<br>Ujjlenyomat-olvasó: Nem<br>HSDPA: n.a.<br>Dokkolhatóság: USB porton<br>Garancia: 1 év
Dell Latitude E6220 laptop - Intel Core i7 2620M 2.70GHz (Dual Core)<br> 4GB DDR3 1333MHz (1*4GB)<br> 12.5" UltraSharp HD Anti-Glare (1366x768) Slim LED + integrált HD kamera<br> 320GB 7200rpm SATA HDD<br> 64bit Windows 7 Professional SP1 HUN + Office Starter<br> NO ODD<br> integrált Intel HD 3000 grafikus vezérlő<br> Dell Wireless 5550 MiniCard Broadband modem<br> Bluetooth 3.0<br> Intel Centrino Advanced-N 6205 802.11a/b/g/n<br> Gigabit LAN<br> háttérvilágítású magyar billentyűzet integrált ujjlenyomat-olvasóval<br> 6 cellás akkumulátor 60WHr<br> mini-HDMI<br> 2x USB2.0 (eSATA)<br> SD-kártyaolvasó<br> dokkolható<br> ExpressCard foglalat<br> Contactless SmartCard Reader<br> 90W AC adapter<br> 4 év helyszíni garancia
Dell XPS L502x Metalloid Aluminum laptop - Intel Core i7-2630QM 2.0GHz (Quad Core)<br> 4GB DDR3 1333MHz (1*4GB)<br> 15.6" FullHD TrueLife (1920x1080 fényes) B+RGLED TFT + integrált 2Mp HD kamera<br> 640GB 7200rpm SATA HDD<br> 64bit Windows 7 Professional HUN + Dell Stage<br> 2GB NVIDIA GeForce GT 540M<br> Blu-ray Disc BD-Combo meghajtó<br> 9 cellás akkumulátor 90WHr<br> magyar billentyűzet<br> Intel WiFi 1030 802.11 b/g/n + BlueTooth 3.0 Combo<br> Creative SoundBlaster X-FI MB 1.2 audio<br> Gigabit LAN<br> 9-1 kártyaolvasó<br> HDMI 1.4 (3D support)<br> mini DisplayPort<br> 2x USB3.0<br> 1x combo USB2.0/eSATA<br> TV-tuner nélkül<br> 130W AC adapter<br> 3 év helyszíni garancia
Dell XPS L511z Aluminum laptop - Intel Core i7-2620M 2.70GHz<br> 8GB DDR3 1333MHz (2*4GB)<br> 15.6" FullHD TrueLife (1920x1080 fényes) WLED TFT + integrált 1.3Mp kamera<br> 750GB 7200rpm SATA HDD<br> 64bit Windows 7 Home Premium SP1 HUN + Office Starter + Dell Stage<br> 2GB NVIDIA GeForce GT 525M<br> 8x DVD+/-RW DL meghajtó<br> 8 cellás akkumulátor 56WHr<br> háttérvilágítású magyar billentyűzet<br> Intel Centrino Advanced-N 6230 802.11b/g + BlueTooth 3.0 Combo<br> 90W AC adapter<br> 3 év helyszíni garancia
Dell Inspiron N5040 Apple Red (fedlap és csuklótámasz) laptop - Intel Core i3-380M 2.53GHz<br> 2GB DDR3 1333MHz (1*2GB)<br> 15.6" HD (1366x768 fényes) WLED TFT + integrált 0.3Mp webkamera<br> 320GB 5400rpm SATA HDD<br> Ubuntu Linux v10.10<br> integrált Intel GMA HD grafikus vezérlő<br> 8x DVD+/-RW meghajtó<br> 6 cellás akkumulátor 48WHr<br> magyar billentyűzet (chiclet)<br> Dell WLAN 802.11g/n + Bluetooth 3.0+HS Card<br> HDMI kimenet<br> 3-1 kártyaolvasó<br> 3x USB2.0<br> 3 év helyszíni garancia
Dell Inspiron N5110 Diamond Black (fedlap és csuklótámasz) laptop - Intel Core i3-2310M 2.10GHz<br> 4GB DDR3 1333MHz (1*4GB)<br> 15.6" HD TrueLife (1366x768 fényes) WLED TFT + integrált 1.0Mp HD webkamera<br> 320GB 5400rpm SATA HDD<br> Free DOS CD<br> integrált Intel HD 3000 grafikus vezérlő<br> SRS Premium hangrendszer<br> 8x DVD+/-RW DL meghajtó<br> 6 cellás akkumulátor 48WHr<br> új magyar billentyűzet (chiclet) + Numpad<br> Intel Centrino Wireless-N 1030 + Bluetooth 3.0 Combo<br> HDMI kimenet<br> 8-1 kártyaolvasó<br> 2x USB3.0 és 2x USB2.0 (eSATA)<br> 3 év helyszíni garancia
Dell Inspiron N5110 Diamond Black (fedlap és csuklótámasz) laptop - Intel Core i3-2310M 2.10GHz<br> 4GB DDR3 1333MHz (1*4GB)<br> 15.6" HD TrueLife (1366x768 fényes) WLED TFT + integrált 1.0Mp HD webkamera<br> 500GB 5400rpm SATA HDD<br> Free DOS CD<br> 1GB nVidia GeForce GT 525M grafikus vezérlő<br> SRS Premium hangrendszer<br> 8x DVD+/-RW DL meghajtó<br> 6 cellás akkumulátor 48WHr<br> új magyar billentyűzet (chiclet) + Numpad<br> Intel Centrino Wireless-N 1030 + Bluetooth 3.0 Combo<br> HDMI kimenet<br> 8-1 kártyaolvasó<br> 2x USB3.0 és 2x USB2.0 (eSATA)<br> 3 év helyszíni garanciaKarakter cserélgetéssel és szövegből oszlopokkal átalakítható ilyenné, itt jobban látszódik a probléma.
-
#11635
Delila_1
veterán
m.zmrzlina
#11633
Delila_1
veterán
válasz
m.zmrzlina
#11633
üzenetére
Ennek tényleg örülök, és gratulálok!
-
#11634
Fire/SOUL/CD
félisten
Badb0y
#11632
-
#11633
m.zmrzlina
senior tag
Delila_1
#11606
m.zmrzlina
senior tag
válasz
Delila_1
#11606
üzenetére
Minden válasz, vagy ellenőrzés után növeld az értéket egy cellában, a tartományt pedig rendezd a hibapontokat tartalmazó oszlop szerin csökkenő sorrendbe.
A szavak számától függően, de pl. 100 db válasz után a Randbetween értékhatárát 1 és X közé állítsd be.Ennek alapján csináltam és kiváló lett. Minden válasz után növelem /csökkentem a szóhoz tartozó mérőszámot és 10 válaszonként erre az oszlopra rendezem a táblát. Aztán csökkentem a Randbetween határát úgy hogy kiessenek azok a szavak amiknek már volt legalább két jó találatuk.
Tök jó lett köszi a segítséget!
-
#11632
Badb0y
addikt
Fire/SOUL/CD
#11630
Badb0y
addikt
válasz
Fire/SOUL/CD
#11630
üzenetére
Ment freemailra.
-
rTyler
csendes tag
hello
dinamikus template szeruseget szeretnek csinalni excelben
arra lenne szuksegem, hogy az elso sheeten legyen egy form vagy szoveg combo boxokkal
SHEET1
A1 (szoveg): valtozo1
B1 combo box1
-1opcio1
-1opcio2
-1opcio3A2 (szoveg): valtozo2
B2 combo box2
-2opcio1
-2opcio2
-2opcio3tovabb
valtozo3
valtozo4
... stba masodik sheeten a combo boxokhoz tartozo opciok es az opciokhoz tartozo ertekek
SHEET2
A1, B1 osszevonva (szoveg): valtozo1
A2 (szoveg): 1opcio1
B2 (szoveg): 1ertek1
A3 (szoveg): 1opcio2
B3 (szoveg): 1ertek2
A4 (szoveg): 1opcio3
B4 (szoveg): 1ertek3C1, D1 osszevonva (szoveg): valtozo2
C2 (szoveg): 2opcio1
D2 (szoveg): 2ertek1
C3 (szoveg): 2opcio2
D3 (szoveg): 2ertek2
C4 (szoveg): 2opcio3
D4 (szoveg): 2ertek3SHEET3
ez egy szoveg lesz, ugy megoldva, hogy a szoveg elkezdodik A1-ben, aztan megszakad
B1-ben pedig egy valtozo ertek lesz
annak alapjan, hogy SHEET1 B1-nek mi az erteke, SHEET2-n levo opcio-ertek parokbol a megfelelo ertek kerul itt beszurasra
C1-ben folyatodik a szoveg es igy tovabbpelda:
SHEET1-en, valtozo1 (combo box) opcioi
-tavasz
-nyar
-telSHEET2-n az opcio-ertek parok
tavasz (1opcio1) - csicseregnek a madarak es sut a nap (1ertek1)
nyar (1opcio2) - szep az ido es mindenki strandra megy (1ertek2)
tel (1opcio3) - sok ho esik ilyenkor (1ertek3)ha SHEET1-en, valtozo1-nek kivalasztom, hogy tavasz
SHEET3-on ez a szoveg jelenjen meg:
..............csicseregnek a madarak es sut a nap................azthiszem ez egy jo bonyolultan levezetett egyszeru kerdes
-
#11630
Fire/SOUL/CD
félisten
Badb0y
#11628
-
#11629
Badb0y
addikt
Fire/SOUL/CD
#11627
Badb0y
addikt
válasz
Fire/SOUL/CD
#11627
üzenetére
Legyen úgy, hogy pl.
DELL NB Latitude E5420
Az nb-ket ne vegye figyelembe, és innentől csak az első 3 szót nézze és a végére tegyen egy laptopot. 1-2 ctrl+f az ügy érdekébe belefér
-
#11628
Badb0y
addikt
Fire/SOUL/CD
#11627
Badb0y
addikt
válasz
Fire/SOUL/CD
#11627
üzenetére
Ha megkérhetlek készíts egyet, megnézzük milyen, mennyi utómunkát kell még utána végeznem, hogy kész legyen. Ha nem sok, akkor jó, ha nem, akkor valamit kitalálunk.
-
#11627
Fire/SOUL/CD
félisten
Badb0y
#11626
válasz
Badb0y
#11626
üzenetére
Oké, de lényegen nem változtat.
1. BONTOTT DELL NB Latitude E4310
Egységesen kell kezdődni, pl gyártóval, ez a BONTOTT mindet felborít.2. Ha a DELL NB Inspiron N5110-ból Dell Inspiron N5110 lesz, akkor a DELL NB Alienware M18x-ból miért Alienware M18x és miért nem DELL Alienware M18x?
-
#11626
Badb0y
addikt
Fire/SOUL/CD
#11623
Badb0y
addikt
válasz
Fire/SOUL/CD
#11623
üzenetére
Bocs, arról, hogy apple macbook air, arról nem kell kideríteni, hogy dell, az apple marad
-
#11625
Fire/SOUL/CD
félisten
Badb0y
#11624
-
#11624
Badb0y
addikt
Fire/SOUL/CD
#11623
Badb0y
addikt
válasz
Fire/SOUL/CD
#11623
üzenetére
Nem én készítettem, csak a termékeket töltöm én.
2 feltöltő is van, egy easy populate nevűt akarok most használni, mert a sima csv importtal nem lehet frissíteni. -
#11623
Fire/SOUL/CD
félisten
Badb0y
#11621
válasz
Badb0y
#11621
üzenetére
Ebben 1 buktatót látok, nevezetesen, hogy a Apple NB MacBook Air-ről hogy lehet kideríteni, hogy az Dell...(mármint egy proginak/alkalmazásnak, nem Nekd, aki tudod, hogy a dell gyártja)
Azt írtad ez egy WebShop, szóval jó eséllyel PHP és MySql adatbázisra épül.
Amúgy Te készíted a webshopot? (Mert ha igen, akkor lehet (sőt, biztos), hogy akkor felesleges az Excel-t ebbe bevonni.) -
#11621
Badb0y
addikt
Fire/SOUL/CD
#11620
Badb0y
addikt
válasz
Fire/SOUL/CD
#11620
üzenetére
Kéredezek még itt. Igazából már írtatok nekem egy makrót annó, nagyon is jól működik, de sajnos nem értek hozzá, így ha bármit szeretnék kérdeznem kell. Linux shellhez értek, ott nagyon könnyen tudnék dolgozni, de ott állandóan kimásolni, bemásolni vissza.... körülményes. Így ha lehet inkább függvényekkel oldanám meg amit szeretnék, ha nem megy akkor makró és kérdezés.
Amit lentebb írtam úgy néz ki megfelel most.
Amit most szeretnék. Még mindig a lenti webshopról van szó.
Vannak főkategóriák, és kinyíló menübe alkategóriák. Ehhez nekem ki kellene szednem a termékleírásból a következőt.Pl. Rövid termékleírás egy oszlopban:
DELL NB XPS L702x 17.3" HD+, Intel Core i5-2410M 2.30GHz 4GB 750GB DVD-RW, GeForce GT 550M, Win 7 HPrem 64bit, 6cell, Ezüst
Ebből nekem ki kellene nyerni ezt:
Dell XPS L702x Laptop
Na ez shellben egy darab awk paranccsak meg tudnám, ami a space-k alapján dolgozik, tehát ki tudnám vágni az 1 3 4 oszlopot és a végére odateszem, hogy Laptop.
Viszont amik megtalálhatók, nem csak dell és nem csak dellel kezdődik. A következő 4 ami esedékes, más jelenleg még nem:
DELL NB Inspiron N5110 15.6" 1366x768, Intel Core i3-2310M 2.1GHz, 4GB, 750GB, DVD-RW, nV GF GT525M, DOS, 6cell, Piros
BONTOTT DELL NB Latitude E4310 13.3" HD Intel Core i5-520M 2.4GHz 4GB 500GB, DVD-RW, Win 7 Prof / XP Prof 32bit, 6cell, Ezüst Létrehozás oka: enyhén karcos.
Apple NB MacBook Air 13" i5 Dual-core 1.7GHz, 4GB, 128GB SSD, Intel HD Graphics 3000, EN KB
DELL NB Alienware M18x 18.4" FHD Core i7 2820QM 2.3GHz, 16GB, 750GB, Blu-Ray Combo, Dual ATI 6970, Win 7 HPrem 64bit ENG, 12cell, Fekete
Ezekből sorban ami kellene:
Dell Inspiron N5110 Laptop
Dell Latitude E4310 Laptop
Apple Macbook Air 13 Laptop
Alienware M18x LaptopEzeket ő szépen kiszedi és bekerül egy cellába.
Utána:
Ebből az eredményből, egy másik cellába beteszi így:Dell Inspiron Laptop
Dell Latitude Laptop
Apple Macbook Laptop
Alienware LaptopÉs innen már tudnám elvileg használni azt a makrót, amit régebben írtatok, hogy egy másik táblából kiszedi a terméknevek alapján a hozzátartozó képeket.
-
#11620
Fire/SOUL/CD
félisten
Badb0y
#11619
-
#11619
Badb0y
addikt
Fire/SOUL/CD
#11618
Badb0y
addikt
válasz
Fire/SOUL/CD
#11618
üzenetére
Most egy ilyen szemétládával tudtam megcsinálni.
=A231&"<br><br>"&$G$2&": "&G231&"<br>"&$H$2&": "&H231&"<br>"&$I$2&": "&I231&"<br>"&$J$2&": "&J231&"<br>"&$K$2&": "&K231&"<br>"&$L$2&": "&L231&"<br>"&$M$2&": "&M231&"<br>"&$N$2&": "&N231&"<br>"&$O$2&": "&O231&"<br>"&$P$2&": "&P231&"<br>"&$Q$2&": "&Q231&"<br>"&$R$2&": "&R231&"<br>"&$S$2&": "&S231&"<br>"&$T$2&": "&T231&"<br>"&$U$2&": "&U231&"<br>"&$V$2&": "&V231&"<br>"&$W$2&": "&W231&"<br>"&$X$2&": "&X231&"<br>"&$Y$2&": "&Y231&"<br>"&$Z$2&": "&Z231&"<br>"&$AA$2&": "&AA231&"<br>"&$AB$2&": "&AB231&"<br>"&$AC$2&": "&AC231&"<br>"&$AD$2&": "&AD231&"<br>"&$AE$2&": "&AE231
Van valami elérhetőséged, ahol amikor van időd lehet kérdezni ?
-
#11618
Fire/SOUL/CD
félisten
Badb0y
#11617
válasz
Badb0y
#11617
üzenetére
Na, így már teljesen értelmet nyert a szándék.
3 kérdés1. Csak ez az 1 táblázat van az adott munkalapon és az pontosan ilyen felépítésű/így néz ki, ahogy a képen?
2. termékekként külön-külön kellene legyártani HTML kódot, avagy az összes termék mehet egymás alá 1 fájlba?
3. Milyen verziójú Officet (Excel-t) használsz? -
#11617
Badb0y
addikt
Fire/SOUL/CD
#11616
Badb0y
addikt
válasz
Fire/SOUL/CD
#11616
üzenetére
Webshopban folyamatosan szopok az árlista feltöltéssel, mire összerakom a komplett listát mindenhonnan, több óra. És ezt akarom lerövidíteni.
3 helyről szedem a listákat, és erre kellene valami megoldás, hogy feltöltésre alkalmas állapotba kerüljön.
Jelenlegi adott eset:
Ebből kellene valami ilyen.
-
#11616
Fire/SOUL/CD
félisten
Badb0y
#11615
válasz
Badb0y
#11615
üzenetére
Így nehezen fogunk előrébb jutni, mert korábban még sorok/oszlopok felcseréléséről érdeklődtél, most meg mintha excel-el szeretnél előállítani HTML kódot...
Szóval ne azt írd le, hogy Te hogy oldanád meg (mert láthatóan nem jön össze
), hanem hogy mit szeretnél kivitelezni. pl beraksz egy képet a tábláról és egy ilyen kinézetű HTML-t akarok, ezzel meg ezzel stb adatokból...
(Amúgy a mostani állapot alapján makró lesz a vége) -
#11615
Badb0y
addikt
Fire/SOUL/CD
#11614
Badb0y
addikt
válasz
Fire/SOUL/CD
#11614
üzenetére
Asszem rájöttem mit szeretnék. Ezt szeretném megvalósítani:
=CONCATENATE($G$2;": ";G3;"<br>";$H$2;": ";H3;"<br>";$I$2;": ";I3;"<br>";$J$2;": ";J3;"<br>";$K$2;": ";K3;"<br>";$L$2;": ";L3;"<br>";$M$2;": ";M3;"<br>";$O$2;": ";O3;"<br>";$P$2;": ";P3;"<br>";$Q$2;": ";Q3;"<br>";$R$2;": ";R3;"<br>";$S$2;": ";S3;"<br>";$T$2;": ";T3;"<br>";$U$2;": ";U3;"<br>";$V$2;": ";V3;"<br>";$W$2;": ";W3;"<br>";$X$2;": ";X3;"<br>";$Y$2;": ";Y3;"<br>";$Z$2;": ";Z3;"<br>";$AA$2;": ";AA3;"<br>";$AB$2;": ";AB3;"<br>";$AC$2;": ";AC3;"<br>";$AD$2;": ";AD3;"<br>";$AE$2;": ";AE3)
Csak excel nem engedi, mert túl sok paraméter. Lehet ezt egyszerűbben, hogy beleférjen ? Vagy erre valami megoldás ?
-
#11614
Fire/SOUL/CD
félisten
Badb0y
#11612
válasz
Badb0y
#11612
üzenetére
Transzponálással, bizonyos feltételekkel
Badb0y #11613
2 képet dobhatnál, hogy ilyenből és ilyet szeretnél, mert most csak annyit tudok mondani, hogy beszúrsz sorokat meg oszlopokat, aztán másol/beilleszt... -
-
#11611
biker
nagyúr
Fire/SOUL/CD
#11598
biker
nagyúr
válasz
Fire/SOUL/CD
#11598
üzenetére
Köszi! HA megjön újra a netem, leszedem
-
#11610
Delila_1
veterán
m.zmrzlina
#11609
Delila_1
veterán
válasz
m.zmrzlina
#11609
üzenetére
Igen.
-
#11608
Delila_1
veterán
m.zmrzlina
#11607
Delila_1
veterán
válasz
m.zmrzlina
#11607
üzenetére
Az újabb D1 határ után törölheted a D1 tartalmát, és indulhatsz nulláról, ABC szerint rendezett szavakkal.
-
#11606
Delila_1
veterán
m.zmrzlina
#11604
Delila_1
veterán
válasz
m.zmrzlina
#11604
üzenetére
Minden válasz, vagy ellenőrzés után növeld az értéket egy cellában, a tartományt pedig rendezd a hibapontokat tartalmazó oszlop szerin csökkenő sorrendbe.
A szavak számától függően, de pl. 100 db válasz után a Randbetween értékhatárát 1 és X közé állítsd be.Ez a számláló cella legyen pl. a D1 az aktuális lapon. Ha ennek az értéke 100 alatt van, akkor az Rnd legyen úgy, ahogy írtad. A rendezést minden válasz után megcsinálod.
Ha a D1=100, akkor töröld a hibapontokat (a rendezés marad), és legyen az Rnd 1 és 20 között. Újabb D1 határnál abc szerint rendezheted ismét a szavakat az A oszlop szerint. -
#11605
m.zmrzlina
senior tag
m.zmrzlina
#11604
m.zmrzlina
senior tag
válasz
m.zmrzlina
#11604
üzenetére
Ahány lecke annyi munkalap (mindegyiken csak A és B-ben szavak) és amelyiket kiválasztja a felh. a Comboboxban az aktiválódik és válik fehérré a betűszíne.
-
#11604
m.zmrzlina
senior tag
Delila_1
#11602
m.zmrzlina
senior tag
válasz
Delila_1
#11602
üzenetére
Abból kellene kiindulni, hogy a munkafüzet valójában úgy működik, hogy userformra (label.Caption) adja ki a RandBetween() a kérdést és textboxban kell bevinni a választ. A keresést fkeres() végzi. Magát a munkalapot a felhasználó úgy látja hogy ha kiválaszt egy munkalapot (lecke szavait) akkor a betűszínt háttér szinére állítom és az kommunikáció a userformon megy. Valahogy így néz ki (az A és B oszlopokban ott vannak a szavak és a megfelelőjük fehér betűszínnel)
A legfelső label.Captiont a köv. sor adja:
lb_kerdes.Caption = Range("A" & Application.WorksheetFunction.RandBetween(1, Range("A1048576").End(xlUp).Row)).Value
Az ellenőrzést a köv sor végzi:
If tb_valasz.Text = Application.WorksheetFunction.VLookup(lb_kerdes.Caption,Range("A:B"), 2, False) ThenEzután pár sor ami jó/rossz válasz esetén csinál bizonyos dolgokat. Ide jöhetne jó válasz esetén a C oszlopba egy eggyel növelt szám, és utána hogyan tovább?
-
#11603
Delila_1
veterán
m.zmrzlina
#11601
Delila_1
veterán
válasz
m.zmrzlina
#11601
üzenetére
Public sor%
Public WS1 As Worksheet, WS2 As Worksheet
Sub szavak()
Dim usor%
Set WS1 = Sheets("Munka1")
Set WS2 = Sheets("Munka2")
usor% = WS1.Range("A1").End(xlDown).Row
sor% = Int(Rnd() * usor%) + 1
WS2.Cells(1) = WS1.Cells(sor%, 1)
WS1.Cells(3) = sor%
End Sub
Sub ell()
Set WS1 = Sheets("Munka1")
Set WS2 = Sheets("Munka2")
sor% = WS1.Cells(3)
If WS1.Cells(sor%, 2) <> WS2.Cells(2) Then
WS1.Cells(sor%, 3) = WS1.Cells(sor%, 3) + 1
End If
End SubAz elsővel feldobod a szót a Munka2!A1-be, az Rnd-vel kiválasztott sor számát beírod a Munka1!C1-be. A másodikkal ellenőrzöd a Munka2!B1-be írt választ. Ha nem jó, a Munka1 lapon a 3. oszlop értékét növeled 1-gyel a Munka1!C1-edik sorában, ahonnan a szót kiválasztotta az Rnd.
Sok kérdés és ellenőrzés után ki tudod választani a Munka1 C oszlopából a legtöbbször tévesztett szavakat, ezeket másolod az eredeti szavak alá, és úgy irányítod a véletlent, hogy ezekre mutasson.
Szerk.: nem is kell másolni. Rendezed a Munka1 A:C tarományát a C oszlop szerint, és szűkíted az Rnd tartományát.
-
#11602
Delila_1
veterán
m.zmrzlina
#11601
Delila_1
veterán
válasz
m.zmrzlina
#11601
üzenetére
Helytelen válasz esetén a függvénnyel létrehozott sor egy cellájának az értékét növeled. X db kérdés után a randbetween alsó és felső határát ezeknek a számoknak a minimumával és maximumával határozhatnád meg.
Ez még nem az igazi, csak közelít. Az új értékhatárok előtt törlöd a helytelen válaszok oszlopát, az új határokkal megint feltöltöd az X kérdésre adott hibás válaszokkal. Így szűkítheted a tartományt, de biztosan van ennél jobb ötlet is.Úgy is csinálhatod, hogy a maximumot veszed alapul, és ezt bővíted fel- és le néhány sorral.
Szerk.:
A legtöbbször elhibázott szavakat a lista végére teszed, és a véletlen határait eszerint szabod meg. -
#11601
m.zmrzlina
senior tag
m.zmrzlina
senior tag
Ötlet kellene.
Csináltam egy szótanuló munkafüzetet amiben a megválaszolandó szavakat véletlenszerűen a =RANDBETWEEN() fv adja. A szavak az A a fordításuk a B oszlopban vannak egymás alatt.
Azt szeretném, ha a munkafüzet valamilyen formában "megtanulná" hogy a válaszoló mely szavakat hibázza el gyakrabban és ezeket nagyobb valószínűséggel hozná fel újra és újra, míg a (többször) helyesen megválaszoltakat pedig ritkábban.
![;]](http://cdn.rios.hu/dl/s/v1.gif)
Új hozzászólás Aktív témák
Hirdetés
Fferi50- sziku69: Szólánc.
- Windows: mi történik valójában Leállításkor, Alvó módban és Újraindításkor?
- Óra topik
- Luck Dragon: Asszociációs játék. :)
- sziku69: Fűzzük össze a szavakat :)
- Mikrotik routerek
- Fizetős szoftverek ingyen vagy kedvezményesen
- Hardcore pizza és kenyér topik
- Nyíregyháza és környéke adok-veszek-beszélgetek
- Milyen TV-t vegyek?
- További aktív témák...
- Bitdefender Total Security 3év/3eszköz! - Tökéletes védelem, Most kedvező áron!
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- Adobe Előfizetések - Adobe Creative Cloud All Apps - 12 Hónap
- Windows 10/11 Home/Pro , Office 2024 kulcsok
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.
- Samsung Galaxy A34 5G 128GB Kártyafüggetlen 1 év Garanciával
- Eladó karcmentes Realme 8 4/64GB / 12 hó jótállással
- HIBÁTLAN iPhone 12 Pro Max 128GB Gold -1 ÉV GARANCIA - Kártyafüggetlen, MS3106, 100% Akkumulátor
- Eladó karcmentes Apple iPhone 13 Pro Max 512GB / 12 hó jótállással
- Eladnád a telefonod? KÉSZPÉNZES OKOSTELEFON FELVÁSÁRLÁS azonnali fizetéssel!
Állásajánlatok
Cég: FOTC
Város: Budapest