- Felháborodott az Apple, a Meta az iPhone-felhasználók üzeneteit akarja olvasni
- A luxusmárkáknak kell a bitcoin, az USA jegybankjának nem
- Letiltja az USA a politikusokat a telefonhívásokról és szöveges üzenetekről
- Nagy áttörés jön a napelemek piacán, nem kell annyi hely a paneleknek
- Belenyúlt az USA az Epic Games igazgatótanácsába, nyomoz az NVIDIA
-
IT café
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.
-
#21496
Delila_1
veterán
littleNorbi
#21494
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.
-
#21495
alfa20
senior tag
littleNorbi
#21494
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)
-
#21494
littleNorbi
aktív tag
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? -
#21492
alfa20
senior tag
sutyimatyi
#21491
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)
-
#21486
Delila_1
veterán
macilaci78
#21485
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.
-
#21485
macilaci78
nagyúr
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 -
#21478
Sasos
senior tag
sutyimatyi
#21475
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... -
#21477
alfa20
senior tag
sutyimatyi
#21475
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)
-
#21476
slashing
senior tag
sutyimatyi
#21475
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.
-
#21474
pdw_ph
tag
sutyimatyi
#21471
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.
-
#21473
Sasos
senior tag
sutyimatyi
#21471
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. -
#21469
pdw_ph
tag
sutyimatyi
#21463
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 ]
-
#21465
Sasos
senior tag
sutyimatyi
#21463
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.
-
-
#21463
sutyimatyi
csendes tag
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
-
#21462
lappy
őstag
kőbaltazár
#21461
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!
-
#21461
kőbaltazár
tag
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á.
Köszönöm az ötleteket,Ü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.
-
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.
-
#21446
retesz147
addikt
marchello1
#21445
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.
-
#21444
PistiSan
addikt
marchello1
#21443
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.
-
#21443
marchello1
csendes tag
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!!!!
-
#21441
Sasos
senior tag
Apollo17hu
#21440
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.
-
#21440
Apollo17hu
őstag
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
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 B1
20 tartományban megfelelő számok nullánál (0) nagyobbak, a C1
20 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)
-
#21419
Sasos
senior tag
stairmaster
#21409
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...
-
#21418
Sasos
senior tag
seederking
#21412
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.
-
#21416
lappy
őstag
stairmaster
#21409
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.
-
#21412
seederking
őstag
seederking
#21410
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
-
#21410
seederking
őstag
seederking
őstag
Sziasztok
Segítsetek légyszives.
2003 Excel-ben próbálnék bérszám feladatot csinálni.Összes bért számolnék de hibát ír.
Próbáltam egy egyszerű műveletet.Az órabért össze adtam az óradíjjal majd enter-t de szintén hiba.
Van tippetek mi lehet a baj?
-
#21409
stairmaster
tag
-
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.
-
#21401
Delila_1
veterán
PindurAnna
#21400
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.
Üdültem.
Én meg kevés vagyok ide olykor-olykor. 
) kell neked hanem HKERES.
20 tartományban lévő megfelelő számok pedig 10-nél kisebbek, a következő képletet használhatja"
Új hozzászólás Aktív témák
Fferi50
- AKCIÓ! Microsoft szoftverek, vírusírtó szoftverek, egyéb szoftverek széles választéka!
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.
- Windows 10/11 Home/Pro , Office 2024 kulcsok
- Karácsonyi akció: ESET termékek hivatalos forgalmazója / NOD32 / Internet Security / stb.
- Microsoft licencek KIVÉTELES ÁRON AZONNAL - UTALÁSSAL IS AUTOMATIKUS KÉZBESÍTÉS - Windows és Office
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest