- Nagy "hülyétkapokazapróktól" topik
- PLEX: multimédia az egész lakásban
- Keringető szivattyú vezérlése: még okosabb fűtés
- Asszociációs játék. :)
- Fűzzük össze a szavakat :)
- CTEK akkumulátor töltő és másolatai
- Drive! - Az utolsó gurulás idén a Quadrifoglio-val
- Euro Truck Simulator 2 & American Truck Simulator 1 (esetleg 2 majd, ha lesz) :)
- Egy korszak vége
- Szólánc.
-
LOGOUT.hu
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
-
-
bteebi
veterán
válasz bteebi #21497 üzenetére
Mégse az a sor a baja, mert ha kiveszem, akkor is küldi a hibaüzenetet, bár megcsinálja azt, amit kell. Azt hittem, hogy a ConsecutiveDelimiter:=False a baja, ezért áttettem True-ra, de úgyis küldi a hibaüzenetet.
Cancel all my meetings. Someone is wrong on the Internet.
-
bteebi
veterán
Sziasztok!
Vágólapra helyezett, szóközökkel tagolt táblázatot szeretnék Excelbe importálni, és a végén az oszlopokat auto szélességűre állítani.
Sub TextToColumns()
ActiveSheet.Range("A1").Select
ActiveSheet.Paste
Range("A:A").SpecialCells(xlCellTypeConstants).TextToColumns _
Destination:=Range("A1"), _
DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, _
ConsecutiveDelimiter:=False, _
Space:=True
ActiveSheet.UsedRange.Columns.AutoFit
End SubAz ActiveSheet.UsedRange.Columns.AutoFit sorig úgy működik, ahogy szeretném, utána viszont 400-as kódú hibaüzenettel leáll. Ha külön makróként lefuttatom ezt az egy sort, akkor működik. Mi lehet a baj?
Cancel all my meetings. Someone is wrong on the Internet.
-
Delila_1
veterán
válasz littleNorbi #21494 üzenetére
Vegyük, hogy a Munka1 lapon van a hosszabb-, és a Munka2-n a rövidebb névsorod, mindegyiken az A oszlopban, és mindkét lapon van címsor.
A Munka1 B2 cellájának képlete =DARABTELI(Munka2!A:A;A2)
Ez nullánál nagyobb értéket ad, ha a név szerepel a Munka2 lapon, és nullát, ha nem.
Autoszűrővel kiszűröd a nullánál nagyobb értéket tartalmazó sorokat, és az összeset törlöd.Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
alfa20
senior tag
válasz littleNorbi #21494 üzenetére
Szia,
Hát szerintem FKERES függvénnyel keresd összes (többhöz a kevesebbet), majd ahol van találat az kuka, aminél meg #HIÁNYZIK van az marad.
"Az agy olyan, mint az ejtőernyő: csak akkor működik, ha nyitott." (Thomas Dewar)
-
littleNorbi
aktív tag
Sziasztok!
Adott 2 táblázat/dokumentum, amikben névjegyzék található. Az egyikben több a másikban kevesebb. Hogy lehet megcsinálni, hogy a többől kivonjam a kevesebbet, és ami nincs bent a kevesebben az maradjon meg, szóval az azonos nevek törlődjenek a különbözőek pedig megmaradjanak? -
pdw_ph
tag
n00b VBA kerdes:
Van egy ilyenem:
Sub SaveAsPDF()
ThisWorkbook.Sheets(Array("Sheet1","Sheet2","Sheet3")).Select
Selection.ExportAsFixedFormat _
Type:=xlTypePDF
End SubEz szepen lefut, viszont csak feherseget ment le PDF-be, viszont ha a kovetkezot irom:
ActiveSheet.ExportAsFixedFormat _
Akkor jo minden.
Ebbol nekem az jon le, hogy a .Select kijeloli a Sheeteket, de a Selection. nem azok tartalmara vonatkozik.
Ez igy van? Vagy vmi mast sem ertek? -
alfa20
senior tag
válasz sutyimatyi #21491 üzenetére
azt másnak készítettem, de most egyet az alapján összedobtam itt eléred:
[link]
pár napig fent hagyom, hátha mást is érdekel.
remélem segít vagy legalább is ötletnek jó lesz."Az agy olyan, mint az ejtőernyő: csak akkor működik, ha nyitott." (Thomas Dewar)
-
Delila_1
veterán
válasz macilaci78 #21485 üzenetére
A címsoron állva bekapcsolod az autoszűrőt, pontosan erre találták ki.
Kezdőlap | Szerkesztés | Rendezés és szűrés | Szűrő.Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
macilaci78
nagyúr
Hali!
Office 2007, Excel.
Van egy táblázatom, az 1. sor az oszlop megnevezése.
A 2. sorba szeretnék egy legördülő listát minden oszlophoz, ami alapján az adott oszlopból kiszűri a kiválasztott értéknek megfelelő sorokat.Például osztálynévsorból a márciusban születetteket mutatja csak.
Ezt hogy tudom megvalósítani?
Üdv
Ha minden kötél szakad, nem kell félni az akasztástól!
-
Sasos
senior tag
Azért nem, mert táblázatnak formázod, és olyankor a címsor automatikusan szöveg formátumot kap. A keresési adatnál is állítsd át a cellát szöveg formátumra és menni fog (remélem, mert nálam megy).
=VKERES(A1;Táblázat4[#Mind];DARAB2(Táblázat4[[#Mind];[1]]);HAMIS)
Ezzel a függvénnyel dolgozik. Munka1 1. sor szöveg formátum. Másodikba jön a képlet. -
Caipi
tag
Szia,
A képlettel rendben vagyok, de nekem számolnom kell, hogy honnan vegye az értéket, mivel, ha változik a táblázat sorainak száma, akkor, ha fix számot adok, már fals adat kerül az összesítőbe...
A darab2()-vel ezért számoltatom ki,hogy éppen melyik sorból kell, hogy kivegye az adatot.Üdv,
Caipi -
Salex1
őstag
Valahogy meg lehet azt csinálni, hogy egy cellába szeretném beíratni egy másik táblázat adott sorának D celláját, ha az M sorban lévő cella "igaz", de ezt összefűzve, mivel több is lehet igaz.
x táblázat egyik fájlban
D M
A igaz
B hamis
C igaz
D hamisy táblázat egy másik fájlban
K1 cellája = A, C -
Sasos
senior tag
válasz sutyimatyi #21475 üzenetére
Vagy... egy oszlopban (vagy sorban, nem tudom milyen elrendezésű a tábla) rögzíted az adott dolgozóra vonatkozó munkaidőt, egy másikban pedig a ledogozott időt. Ha az utóbbi nagyobb mint az előbbi, akkor pirosozzon feltételes formázással.
Mondjuk így teljesen vakon valóban nehéz tanácsot adni... -
alfa20
senior tag
válasz sutyimatyi #21475 üzenetére
Szia,
Csak a ledolgozott órák szerepelnek a táblában vagy van munka kezdés/vége?
nemrég készítettem egy hasonlót abban az alábbi oszlopok voltak:| név | dátum | helyszín | munka kezdés | munka vége | ebéd idő | ledolgozott órák | óra bér | napi bér |
csak az érkezést és a távozást kellett (lehetett) beírni, a többit képlet számolta, szerintem így neked is kivitelezhető, bár attól függ hogy néz ki a táblád.
nem tudsz készíteni egyet az eredeti alapján, arról meg egy képet megosztani, csak hogy lássuk mivel kellene dolgozni?"Az agy olyan, mint az ejtőernyő: csak akkor működik, ha nyitott." (Thomas Dewar)
-
slashing
senior tag
válasz sutyimatyi #21475 üzenetére
hát ha semmi alapján nincs megkülönböztetve hogy ki jár 8-ban meg ki jár 12-ben akkor elég nehéz lesz a dolgod. Ha csak így ömlesztve van mindenki és vegyesen szerepelnek. Maximum annyit tehetsz hogy mindenkire külön írsz egy feltételes formázást de az elég macerás.
Nem tudom hogy néz ki a táblázat de miért nincs egy külön oszlop vagy sor a túlórának és akkor ott tökmindegy hogy 8 vagy 12 vagy 4 óra szerepel azt beszínezi mert az lesz a túlórás óraszám.
-
pdw_ph
tag
válasz sutyimatyi #21471 üzenetére
Es mi lenne ha csak a tulorat tartanatok nyilvan? Ergo feltetelezed h a 8 orat mindenki dolgozik, mert ugye kell es csak a tulorak szamat irnad be. Amugy mint irtak felteles formazasnal megelehet adni fuggvennyel: IF(tulora>8) akkor pirosozzon.
-
Sasos
senior tag
válasz sutyimatyi #21471 üzenetére
Mondtam én, hogy nem biztos, hogy értem...
Akkor feltételes formázással színezd. Ha nagyobb mint 8, akkor piros. már ha napi bontásban vannak az adatok, és 8 órás a műszak. -
pdw_ph
tag
válasz sutyimatyi #21463 üzenetére
A1=8, A2=A1, Conditional Formattingnal meg beallitod egy keplettel hogy A2<>"" akkor pirosozzon.
-
Sasos
senior tag
Semmilyenből, mert nincs olyan.
FKERES (VLOOKUP) és VKERES (HLOOKUP) van.
Ez meg a megoldás: =VKERES(A1;Munka2!$A$1:$G$12;12;HAMIS)
Ez megy a Munka1 B1-be elé A1-be a sorszám (1-8), mivel a mellékelt képen úgy láttam, hogy a szum-ok a 12. sorban vannak ehhez csináltam meg, ha nem így van akkor a VKERES tábla, és sorszám értékén kell variálnod.Szerk: Értelem szerűen a függvényt lefelé elhúzod 8-ig, és megkapod az összesítést mind a 8 értékre.
[ Szerkesztve ]
-
Sasos
senior tag
válasz sutyimatyi #21463 üzenetére
Az elsőt nem biztos, hogy értem... A2-be begépeled, hogy =A1 , majd beállítod a betűszínt pirosra.
A második: Azokon a cellákon amelyikbe hagyni akarod a módosítást/adatbevitelt leveszed a zárolást (jobbklikk-->cellaformázás-->védelem-->zárolt-->pipa ki), majd lezárod a munkalapot (Véleményezés fül -->Lapvédelem). Ha kiveszed a pipát a "zárolt cellák kijelölése" elől, akkor nem hogy írni, de kijelölni sem lehet őket.
-
sutyimatyi
csendes tag
Üdv!
A kérdésem a következő: hogyan lehet azt megcsinálni excel 2010-ben, hogy ha A1-es cellába beírom, hogy pl. p 8, akkor az A2-es cellába beírja pirossal, hogy 8.Hogyan lehet úgy levédeni egy munkafüzetet, hogy az első két sor adatbeviteli mező legyen, a többi pedig védett amiatt, hogy a beírt függvényeket ne tudja senki kitörölni. Köszi
-
lappy
őstag
válasz kőbaltazár #21461 üzenetére
Szia!
Nem lehet tudomásom szerint szegélyt rakni.
Az élőfejet meg úgy tudod hogy a munkalap nevét be lehet állítani hogy azt kiírja.Bámulatos hol tart már a tudomány!
-
kőbaltazár
tag
Sziasztok!
Excel 2003 ban be lehet keretezni az élőfejet valahogy?
Valamint hogyan lehetne azt megcsinálni, hogy egy munkafüzetben van 12 munkalap, és az élőfej jobb oldalába az első munkalapon beírnám, hogy január, és a többibe nem kéne beírni, hogy február stb. hanem beírná magától.
Üdv, és kösziÜdv: Kőbaltazár
-
Caipi
tag
[Sziasztok,
A következő kérdésem lenne. Excel 2013-t használok. Adott egy munkafüzet két munkalappal. A két munkalapon egy-egy excel táblázat, amelye az excel által definiált táblázat formában van.
Munka2 tartalmazza az összesíteni kívánt adatokat, az alábbi formátumban.
A táblázat 8 oszlop hosszú, az oszlopok neve sorszámok 1-8-ig. Alatta számok, majd legalul oszloponként szumma érték.
A Munka1 lapon összesíteni szeretném az alábbi formában:
A táblázat 2 oszlopból áll. Első oszlop sora a Munka2 táblázatának oszlop nevei, azaz 1-8-ig számok.
A melletük lévő cellába vkeres() függvénnyel szeretném átemelni a Munka2-n lévő táblázat legutolsó sorában szereplő szummákat.
VKERES([@szám];Táblázat14[#Mind];DARAB2(Táblázat14[[#Mind];[1]]);0)
De valamiért mindig #HIÁNYZIK üzenetet kapok, míg ha megnézem külön a darab2()-t, akkor megszámolja rendesen.
Csatoltam egy képet hozzá.Üdv,
Caipi[ Szerkesztve ]
-
bteebi
veterán
válasz Salex1 #21457 üzenetére
Sub osszefuz()
Dim i As Integer, lastrow As Integer
lastrow = Range("B" & Rows.Count).End(xlUp).Row
Range("K1") = ""
For i = 1 To lastrow
If Cells(i, 13).Value = True Then
Range("K1") = Range("K1") & Cells(i, 2).Value & ", "
End If
Next i
Range("K1") = Left(Range("K1"), Len(Range("K1")) - 2)
End Sub[ Szerkesztve ]
Cancel all my meetings. Someone is wrong on the Internet.
-
Salex1
őstag
Valahogy meg lehet azt csinálni, hogy egy cellába szeretném beíratni egy másik táblázat adott sorának D celláját, ha az M sorban lévő cella "igaz", de ezt összefűzve, mivel több is lehet igaz.
x táblázat
D M
A igaz
B hamis
C igaz
D hamisy táblázat
K1 cellája = A, C -
alfa20
senior tag
Ha az egyik makró változó értékét szeretném egy másik makróban elérni, azt hogyan tudom elérni.
pl:Sub valami1()
Dim x As Integer
x = Cells(1, 1).Value
valami2
End Sub
Sub valami2()
MsgBox x
End Subpersze nem ezt akarom, de így egyszerű megérteni
mind két makró egy modulban lenne."Az agy olyan, mint az ejtőernyő: csak akkor működik, ha nyitott." (Thomas Dewar)
-
alfa20
senior tag
válasz retesz147 #21450 üzenetére
Ha minden oszlopban van szám akkor csak ennyi kell:
=HA(B2>0;B2;A2)
legalábbis ha jól értelmezem amit írtál, ami ma nem biztos
"A": régi ár
"B": 0 vagy új ár
"C": új ár ha van "B"-ben, ha nincs akkor "A".[ Szerkesztve ]
"Az agy olyan, mint az ejtőernyő: csak akkor működik, ha nyitott." (Thomas Dewar)
-
retesz147
addikt
válasz alfa20 #21447 üzenetére
Köszi, de szerintem ez nem lesz jó, mert mindegyikbe van szám, csak az épp lehet nulla.
Ha csak A-ban van 0-tól különböző szám, akkor A-t adja vissza. Ha csak B-ben van 0-tól különböző, akkor B-t adja vissza. Ha mindkettőben van 0-tól különböző, akkor viszont csak B-t, mert ez az új, aktuális ár.
Eladó Xiaomi 13 üvegfólia és Samsung S23 Nilkin tok és üvegfólia.
-
retesz147
addikt
válasz marchello1 #21445 üzenetére
Sziasztok!
Kérnék egy kis segítséget tőletek.
Van két oszlopom(A,B), melyben számok vannak elvétve. Meg kellene vizsgálni, hogy ha a két oszlop soraiban van szám, akkor azt a 3.(C) oszlopban adja vissza. Ha mindkét oszlopban van szám, akkor a B oszlopot adja eredményül.
"A" oszlop régi árak, "B" oszlop új árak és a "C" oszlop lenne ennek a kettőnek az összefésülése úgy,hogyha van új ár (B), akkor az lenne a C oszlopban, ha nincs új ár, akkor a régi lenne a C oszlopban.
Meg lehet ezt oldani makró nélkül?Köszönöm szépen!
Eladó Xiaomi 13 üvegfólia és Samsung S23 Nilkin tok és üvegfólia.
-
PistiSan
addikt
válasz marchello1 #21443 üzenetére
Jelöld ki az összes oszlopot, A-D-ig, majd menj a szűrésre, így tudsz mindegyikre szűrést végezni, nyilván neked csak az "A" és a "D" lesz az érdekes.
-
marchello1
csendes tag
Sziasztok,
Egy olyan kérdésem volna, hogyan tudok különböző oszlopokban szűrni? Mert vagy csak egy oszlopot ("A") vagy összeset tudom, megoldani, hogy legyen is legördülő választéklista
Tehát a kép esetében mondjuk szeretném szűrni az 'A' oszlopot és a 'D'-t.
(Ha kijelölöm ezeket az oszlopokat és rányomom, hogy szűrés hibaüzenetet kapok - Többszörös kijelölésen nem hajtható végre a parancs)Köszönöm a segítséget!!!!
-
Sasos
senior tag
válasz Apollo17hu #21440 üzenetére
Fájl-->Beállítások-->Képletek-->Hiba-ellenőrzési szabályok-->"Szövegként formázott vagy aposztróffal kezdődő számok" elől a pipát vedd ki.
-
Apollo17hu
őstag
2013-as Excel: szövegre formázott cellába telefonszámot írok: +3670 123 4567, majd berak egy aposztrófot a string elé. Bármit csinálok, mindig beszúrja, és jelzi, hogy szövegként bevitt számot tartalmaz a cella. A cella alatt hasonló telefonszámok szerepelnek, azokba sehova nem szúrja be az aposztrófot. A "rejtett" aposztróf miatt az oszlopomban az első telefonszám balra rendeződik, míg a többi jobbra.
Hogy tudom elérni, hogy ne szúrja be automatikusan az aposztrófot?
-
Sasos
senior tag
válasz lallalla #21436 üzenetére
Ja... Annyi az eltérés, hogy én a Wikipédiát használtam az adatok beszerzéséhez, és ott ezek az értékhatárok: 0, 1, 7, 12, 20, 30, 40, 51, 63, 76, 88, 103, 120. Egy-két ponton van eltérés a te általad megadotthoz képest, de hogy melyik a pontos azt nem tudom. Mondjuk viszonylag egyszerűen átgépelhető.
-
Sasos
senior tag
válasz lallalla #21436 üzenetére
Igen, utánaolvastam, mielőtt megkreáltam, és nálam működik hiba nélkül. Az adott képletet másod be a B2 cellába, és A2-be mehet a Km/h. Ha több adatod van, akkor a B2-tő lefelé végighúzod a képletet:
A logika egyszerű, 0-tól indulva vizsgáljuk az értéket. Ha 0 akkor az eredmény 0, ha kisebb mint 7 akkor az eredmény 1 stb...
-
lallalla
újonc
Köszi a marathon képletet, kissé gyanítom, hogy hogyan működne, de beillesztettem, és nem működik. Egyébként a Beaufort skála 0-tól 12-ig megy, a 0 a teljes szélcsend, a 12, pedig a tornádó, amit mindent, amit ér, tarol.
A 12-nél nagyobb már értelmetlen, mint a földrengéseknél is a max. érték, amikor annak a hatása már oly mérvű, hogy a táj-átrendezésnél rosszabb már nem lehet...
A skála így néz ki:Bft km/ó nmil/h (nautical miles/hour)
min max min max
0 0 0 0 0
1 1 5 1 3
2 6 11 3 6
3 12 19 6 10
4 20 28 11 15
5 29 38 16 21
6* 39 49 21 26 sárga jelzés (lassan kivonulni a vízről, pl. Balaton)
7 50 61 27 33
8** 62 74 33 40 piros jelzés (minden rosszra készülj fel, vitorlákat be, ha kikötő nincs...)
9 75 88 40 48
10 89 102 48 55
11 103 117 56 63
12 118 133 64 72 -
slashing
senior tag
Milyen módszerrel lehet megoldani a következő dolgot:
Adott egy mérőgép ami egy mérési folyamat alatt(1 termék) produkál 20<>50*2 értéket jelenleg PDF-be ez átállítható CSV-re amire biztos át kell majd állni a probléma megoldása miatt.
Minden értéknek van egy X és egy Y koordinátás értéke, standerdtől való különbözősség.
Jelenleg minden egyes terméknek van 20<>50*2 excel táblája (*2 mivel X és Y érékeket kell felvinni és abból statisztikákat csinálni.
Jelenleg ez olyan mérhetetlenül szarul van megoldva hogy műszakonként akár 4 órát is igényel mire az értékeket egyesével felviszi valaki minden egyes érték excel táblájába (szerintem ha akarnék se tudnék ilyen szart kitalálni). A helyzetet tovább bonyolítja hogy a mérőgép " . " pontot használ tizedesjegyként amit tudom hogy át lehet állítani a windowsban de nem tudom hogy ezt átállíthatjuk-e a mérőgép miatt vagy sem.
Szóval a gép kidob egy pdf-et vagy egy csv-t ami tartalmaz úgy 50-100 értéket amit a következő könyvtár/excel fájlstruktúrába kell felvinni:
Termék1:
- 1_x.xlsx
- 1_y.xlsx
- 2_x.xlsx
- 2_y.xlsx
- .
- .
- .
- 50_x.xlsx
- 50_y.xlsxés termékből is van vagy 50 vagyis 1 termék csak 50 variációban.
a táblázatban az A oszlopba kell rögzíteni lefele lépkedve a termék mért értékét.
Az egy csv-ből az adatokat akár 100 excel táblába kéne szétdobálni automatikusan úgy hogy lehet nem lesz szabad átállítani a tizedesjegyet pontról vesszőre ami tuti hogy számít az excelben és szinte 100% hogy nem szabad majd egyszerűsíteni az excel fájlokat hogy 50-100 tábla helyett csak 1 legyen. Jah és nem frissülő táblázat lenne hanem mondjuk adott termék mappában lenne egy csv mappa és mindig a következő csv adatait kéne mindig a következő 1_x.xlsx stb... a1 majd a2 a3 celláiba írni, szóval bonyolítja még a fájlnév is.szóval meg lehet ezt oldani szerintetek? Ami bonyolítja a dolgokat összefoglalva: CSV automatikus tagolása hogy dolgozhasson valahogy az excel, a tizedesjegy pontról vesszőre alakítása, a csv növekvő száma és a legegyszerűbb része amit még én is tudok hogy egy fájlból hivatkozunk egy adott cellára.
-
Sasos
senior tag
válasz lallalla #21432 üzenetére
Nem tudom, hogy pontosan mit is szeretnél, de ha a Km/h adatokból szeretnél Beaufort adatokat kapni, akkor egymásba ágyazott HA függvények sorával simán hajszál pontosan megkaphatod. Én így csinálnám:
Az A oszlopba mennek a Km/h adatai számmal, a B oszlopon pedig az alábbi képletet húznám végig:=HA(A2=0;0;HA(A2<7;1;HA(A2<12;2;HA(A2<20;3;HA(A2<30;4;HA(A2<40;5;HA(A2<51;6;HA(A2<63;7;HA(A2<76;8;HA(A2<88;9;HA(A2<103;10;HA(A2<120;11;HA(A2>119;12;"Rossz adat!")))))))))))))
Jelen esetben az A2-be megy az első Km/h adat, és a B2-be kapod meg a Beaufort megfelelőjét. Hibás adatokra (szöveg, mínusz számok stb.) nincs felkészítve, de még egy két HA, és "hülyebiztossá" tehető, ha nem te fogod használni.
-
lallalla
újonc
Bocsi, a kiindulási pont a 21290 volt....
-
lallalla
újonc
Mivel kérésemre senki sem reflektált, a matematikai megoldást jó sok órányi munkával, próbálkozási alapon, egy hatványfüggvény hatványkitevőjének és szorzójának variálásáva piros jelzésig (Boufort 8. fokozat-minimumig) sikerült jól passzítani.
Aztán már mindegy, hogy hogy tépi szét a vitorlát a szél.... -
Zomb€€
őstag
Sziasztok!
Ismét segítséget kérnék.
Adott az előző QR kód generálós makró, és mivel többen is használnák, szeretnék beépíteni egy olyan funkciót, hogy a kód generálását követően, ha 5mp-en belül nem történik újabb kódgenerálás, bezáródik a munkafüzet.Próbáltam hogy a Timer-rel játszok, és 5mp késleltetéssel bezárom, illetve az Application.Wait paranccsal is, de mindkettőnél azt tapasztaltam, hogy lockoljál a formot, így nem is lehet újra kódot generálni, mindenképpen bezáródik a munkafüzet.
Tehát a kérdés az, hogy lehet valami tétlenség figyelőt beépíteni úgy, hogy attól még lehessen használni az egyéb makrókat?
"Egyszer fent...egyszer fent!"
-
akyyy
senior tag
tudok olyat csinálni (és ha igen, hogy), hogy van egy excvel táblám mindenféle adatokkal, a második lapon meg ennek az exel táblázat néhány eredménye.
ezt a második lapot egy második kijelzőre (monjduk monitor kiterjesztéssel vagy valamivel meg van oldva a 2 kijelző), ott teljes képernyőn mutassa a második lapot. lehetőleg csak a lapot, tehát se start menü, se eszköztár, semmi más nem kéne.
és ha az első monitoron frissítek egy adatot, akkor automate frissítse magát a második lapon.
másik kérdésem, hogy nem csak a 2. lapon vannak ilyen adatok, hanem a 2,3,4,5 lapon, és azt szeretném ha a kijelző 30 másodpercenként váltakozzon a 2-5 lap között.
gondolom makróval meg lehet oldani.
(esetleg ha valaki tud másik programot. egy autóverseny eredmény kijelzője lenne így megoldva maszekba )
-
cousin333
addikt
Azért lesz nulla az eredmény, mert a SZUMHATÖBB függvény egy tartomány elemeit összegzi, de csak akkor, ha minden kritérium teljesül. Te pedig a jelek szerint azt szeretnéd, ha vagy-vagy teljesülés esetén is összegezne, de ezek szerint a te esetedben nincs olyan sor, ahol minden feltétel egyszerre igaz lesz, tehát a metszet nulla.
"A függvény az összegtartomány argumentum egyes celláit csak akkor adja össze, ha az adott cellára az összes meghatározott feltétel igaz." (Office súgó)
[ Szerkesztve ]
"We spared no expense"
-
lappy
őstag
Idézet "Google":
"A SZUMHATÖBB függvényTeljes tartalomTeljes tartalom
Ez a témakör a Microsoft Office Excel SZUMHATÖBB függvényének képletszintaxisát és használatát mutatja be.Leírás
Egy adott tartomány több feltételnek is eleget tevő celláit adja meg. Ha például az A1:A20 cellatartománybeli számokat szeretné összeadni, de csak abban az esetben, ha a nekik a B120 tartományban megfelelő számok nullánál (0) nagyobbak, a C120 tartományban lévő megfelelő számok pedig 10-nél kisebbek, a következő képletet használhatja"Bámulatos hol tart már a tudomány!
-
user112
senior tag
válasz Delila_1 #21239 üzenetére
Kedves Delila_1!
Már régebben volt egy kicsit, mikor küldted segítségül a makrót!. Most az a bajom vele, hogy ha szöveges adatok helyére törzsszámok kerülnek, akkor ezt a hibát kapom:
Run-time error '1004':
WorksheetFunction osztály Match tulajdonsága nem érhető el:
és a követkeő sorra áll: sor1 = Application.WorksheetFunction.Match(ertek, Columns(6), 0)
A cellaformátum általános.
Mi a baja?
Köszönöm! -
mexel
veterán
Azt hogyan kell pontosan? Akkor 2 szumha függvényt is össze tudok adni? Mert a szumhatöbb éppen arra lenne, legalábbis azt hittem.
Szerk: igazad volt. Simán összeadtam a függvényeket, és úgy jó. A sima SZUMHA függvényt. ( de akkor minek a SZUMHATÖBB?)
Köszi[ Szerkesztve ]
-
mexel
veterán
Fentebb megoldódott ha egy kritériumot keresek és a mellette lévő oszlop összegeit úgy összeadom akkor a SZUMHA függvény jó. Most olyat szeretnék, hogy több kritérium is legyen amit összead, erre ott a SZUMHATÖBB függyvény. Sajnos nekem viszont valamiért nem megy.
Megadom az összegtartományt, az első kritériumtartományt és kritériumot (pl "nem") és akkor ki is számolja. Második kritériumtartománynak megadom ugyanazt, beírom a kritériumot és mindig nulla lesz az eredmény. Nem lehet ugyanazt a kritériumtartományt megadni többször?
Akkor hogy tudok ugyababból a tartományból több kritétium alapján összeadni? -
Nartan
újonc
Sziasztok!
Következö a megoldandó probléma:
Van két excel fájlom. Az egyik egy adatbank, ami 4,9 MB. A másik fájlban egy FKERES függvénnyel hivatkozok az említett adatbankba, aminek az eredményeképpen a 271 KB-os fájlomból 3,5 MB lesz.
A hivatkozások számának további növelésével már nem növekszik drasztikusan a fájlméret.
A két fájl egy meghajtón van, viszont különbözö mappában.
Ha valaki tud arra megoldást, hogy megörizzem a kis fájlméretem, azt elöre köszönöm!(Excel 2013)
-
Sasos
senior tag
válasz stairmaster #21409 üzenetére
A másodikra itt a megoldás, csak át kell alakítanod kicsi, de mivel úgyis a tanulás a cél...
-
Sasos
senior tag
válasz seederking #21412 üzenetére
Ha megvan a megoldás, megírhatnád ide is, hátha jól jön később valakinek.
Feltételezem a B oszlopban megadott óraszámok formátuma okozta a hibát.
-
lappy
őstag
-
mexel
veterán
válasz Geryson #21414 üzenetére
Függőlegesen kell összeadni őket. Ha 10 sorban szerepel a "nem" szó akkor azokban a sorokban lévő számokat kell összeadni. A többivel ne csináljon semmit. De lehet hogya HA az jó lesz, megnézem, köszi!
Szerk: a SZUMHa jó is volt, köszi! Nem tudom miért nem ugrott ez be Túl akartam bonyolítani.
[ Szerkesztve ]
-
Geryson
addikt
Nem tudom, hogy jól értem-e. Egy oszlopban van csak szám? Akkor ezt mivel szeretnéd összeadni (merthogy nálam 2 szám kell ahhoz, hogy "összeadjam" őket). A másik kérdés, hogy mit csináljon akkor ha nincs ott a "nem" szó? Semmit?
Én így csinálnám:
A oszlop = egyik szám
B oszlop = másik szám
C oszlop = "nem" szócska (ha ott van)HA(C1="nem";A1+B1;"")
Rinderkennzeichnungsfleischetikettierungsüberwachungsaufgabenübertragungsgesetz
-
mexel
veterán
Sziasztok! Azt milyen függvénnyel tudom 2007-ben megoldani, hogy ha az egyik oszlopban szerepel egy szó ( pl: nem) akkor abban a sorban egy másik oszlopban lévő számokat összeadja?
Tehát van két oszlopom, az elsőben számok, a másodikban szöveg. Ott ahol nem van írva, azokat a számokat össze kellene adni.
-
seederking
őstag
válasz seederking #21410 üzenetére
Rájöttem,balf voltam...vagyis inkább figyelmetlen.
[ Szerkesztve ]
-
Geryson
addikt
Sziasztok! Van egy jó pár külső hivatkozás egy Excelben. Mit kell tennem ahhoz, hogy frissítsen (merthogy én frissítettem a külsőben)? Valami F5-szerű frissítésre gondoltam, de úgy látom, hogy ez itt mást okoz...
Rinderkennzeichnungsfleischetikettierungsüberwachungsaufgabenübertragungsgesetz
-
Pulay
csendes tag
Sziasztok!
Egy összetett problémám van, nagyon hálás lennék érte ha valaki válaszolni tudna rá.
Szituáció:
Van egy excel file-om amit pendrive-on szeretnék megmutatni valakinek. Viszont és itt - jön az első kérdés - meg tudom-e oldani, hogy a pendriveról ne tudja átmásolni a file-t a saját gépére? Ha igen, akkor hogyan?Második kérdés: meg tudom-e oldani, hogy ha megnyitotta a file-t akkor se tudja lementeni a gépére? Az írásvédettség védelem a mentés ellen, de a Mentés máskénttel simán kijátszható. Találtam egy scriptet amit ha bemásolok a fejlesztő módba (alt+f11) a ThisWorkbook alá akkor "kiiktatja" a mentés másként funkciót de ha bezárom és újra megnyitom az excel-t akkor elfelejti ezt a scriptet és megint lehet menteni. Erre van valakinek ötlete?
Itt a script:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Cancel = True 'Cancels any request to save the file
End SubPrivate Sub Workbook_BeforeClose(Cancel As Boolean)
Application.ThisWorkbook.Saved = True 'Tells Excel that the file has already been saved (this prevents Excel from requesting that you save the file when you close it)
End SubHarmadik kérdés: meg lehet-e oldani, hogy az adott munkafüzetből ne tudja kimásolni az adatokat egy üres excelbe? Ha igen, hogy?
Összességében olyan megoldás kellene, hogy ne lehessen sehogy az adatokat kimenteni (persze tudom, hogy a print screen ellen nincs mit tenni, de azt leszámítva sehogy)
Kérem aki tud segítsen Előre is köszi!
-
PistiSan
addikt
Sziasztok!
A probléma a mellékelt táblázatban van szemléltetve.A lényeg, van egy jó hosszú táblázatom a következő adatok (oszlopok)
A: Sorszám
B: Dátum
C: ÁllapotÖssze kellene számolni, hány azonos olyan dátum van "B" oszlopban, amelynél a "C" oszlop (állapot) cella üres, és ezt csoportosítva szeretném megjeleníteni.
pl: 3db - 2014.05.13
5db - 2015.03.23
Szeretem az excelt, de nem használom túlságosan bonyolult dolgokra, remélem lesz itt ügyes ember[ Szerkesztve ]
-
Delila_1
veterán
válasz alfa20 #21404 üzenetére
Szívesen.
Még egy apró tanács: a kulcsszavakat - for, next, do, loop, if, then, else, case, exit, open, stb. - érdemes kisbetűkkel írni, a makró szerkesztő átírja nagyra, amit kell. Ha látod, hogy kisbetűs maradt egy kulcsszó, azonnal tudhatod, hogy elütöttél egy billentyűt.
Majdnem minden kulcsszóra igaz, néhányat kisbetűkkel is elfogad.Ilyen például az
ActiveSheet.Protect userinterfaceonly:=TrueA fenti sor makróból engedélyezi a védelemmel ellátott lapon a zárolt cellákba történő írást.
[ Szerkesztve ]
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Delila_1
veterán
válasz alfa20 #21402 üzenetére
A Select Case sorban adod meg, hogy mit figyeljen. Mivel előtte már az L1 változóba beadtad a Cells(a,1) értéket, itt a sort így is írhatod:
Select Case L1
A Case sorokban már nem kell megadni az L1-re történő hivatkozást, mert azt már tudja. Elég a
Case >L1 (és itt automatikusan átíródik a sor Case Is >L1 -re)A helyfoglalásnál minden változóhoz meg kell adni a típust, ennek hiányában Variant-nak veszi, és nagyobb helyet foglal le a memóriában.
A With - End With párost akkor szokás alkalmazni, mikor a With sorban meghatározott objektumra több paramétert adunk meg. 1 paraméternél, mint most a szín megadásánál, felesleges.
A Select utasítást is kerüljük, ha lehet, mert lassítja a futást, anélkül is lehet hivatkozni egy cellára, sorra, bármire.
Ezeknek megfelelően átírtam a makrót.
Sub szelekt1()
Dim c As Integer, i As Integer, a As Integer
Dim L1 As Integer, L2 As Integer
c = 4
For i = 1 To 5
Cells(i, 1) = i
Cells(i, 2) = i + c
c = c - 2
Next
For a = 1 To i - 1
L1 = Cells(a, 1)
L2 = Cells(a, 2)
Select Case L1
Case Is > L2
Cells(a, 1).Interior.Color = 65535
Case Is < L2
Cells(a, 1).Interior.Color = 5287936
End Select
Next
End SubProgramozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Delila_1
veterán
válasz PindurAnna #21400 üzenetére
Szívesen.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
Új hozzászólás Aktív témák
- Nagy "hülyétkapokazapróktól" topik
- Autós topik
- PlayStation 4
- Horgász topik
- Sorozatok
- Mikrokontrollerek Arduino környezetben (programozás, építés, tippek)
- Interactive Brokers társalgó
- Amatőr csillagászat
- Házi barkács, gányolás, tákolás, megdöbbentő gépek!
- PLEX: multimédia az egész lakásban
- További aktív témák...
- Microsoft licencek KIVÉTELES ÁRON AZONNAL - UTALÁSSAL IS AUTOMATIKUS KÉZBESÍTÉS - Windows és Office
- Vírusirtó, Antivirus, VPN kulcsok
- Game Pass Ultimate előfizetések 1 - 19 hónapig azonnali kézbesítéssel a LEGOLCSÓBBAN! AKCIÓ!
- Microsoft Office Home & Business 2024 PC/Mac EP2-06638
- Adobe Creative Cloud - 2024. 04. 05 - 2025. 04. 05-ig
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest