- A KOReader ebook olvasó program
- Nagy "hülyétkapokazapróktól" topik
- Ingyen kellene, de tegnapra
- Érdekes történések a hardveraprón...(külön szám)
- Samsung Galaxy S24 FE - Megrendelve!
- Elektromos rásegítésű kerékpárok
- eBay-es kütyük kis pénzért
- Fűzzük össze a szavakat :)
- PLEX: multimédia az egész lakásban
- Asszociációs játék. :)
-
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
-
Balinov
titán
Uraim,
tudtok olyan oldalt ajanlani, ahol Excel 2007-hez vannak treninganyagok es ingyenes is egyuttal? (mint a total traininges, lynda.com-os cuccok,csak legalisan ingyen). Egeszen konkretan a Pivot tableket ill. a Vlookup-ot szeretnem gyakorolni es ezert keresnek olyan oldalt, ahol frankon bemutatjak ezeket a featureokat (is), letoltheto peldafajlokkal.
udv
Balinov -
Delila_1
veterán
válasz
VANESSZA1
#4897
üzenetére
A makrót a laphoz rendeld: lapfülön jobb klikk, Kód megjelenítése. A kapott üres lapra másold be.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 And Target.Value >= Date Then MsgBox "Figyelmeztetés"
End SubItt a C (harmadik) oszlop értékeit figyeltetem, a Target.Column = 3 -nál írhatod át. Ha az egész lapot akarod figyeltetni, a Target.Column = 3 And részt hagyd el.
[ Szerkesztve ]
-
#4896
Delila_1
veterán
Fire/SOUL/CD
#4895
Delila_1
veterán
válasz
Fire/SOUL/CD
#4895
üzenetére
(nem vagyok haragban a "t" billentyűvel, de az előbb kettőt is kihagytam) -
#4895
Fire/SOUL/CD
félisten
Delila_1
#4893
válasz
Delila_1
#4893
üzenetére
Hali!
Igen, megírhattam volna...de most a 2-órás "NEM AKAROK KÓDOT LÁTNI ÉS KÜLÖNBEN SE ÉRTEK HOZZÁ...." időmet töltöm...
Fire.
UI: Bocsi, hogy a nevedben megelőlegeztem a kódot, de "ismerlek" annyira, hogy tudtam, hogy hamar be fog kerülni a makró a topicba...
[ Szerkesztve ]
-
#4894
gyga
senior tag
Fehér Mancs
#4890
gyga
senior tag
válasz
Fehér Mancs
#4890
üzenetére
nem nyert egyikőtök sem, nincs beragadt bill se lenyomva semmi ... rejtélyes
-
#4893
Delila_1
veterán
[HUN]Tyson
#4891
Delila_1
veterán
válasz
[HUN]Tyson
#4891
üzenetére
Egy-egy cella 32767 karakter bír el. A 100 cím 3-4000 karakternél nem lesz több.
Itt a makró hozzá, ami Fire beígért
Mintha ő nem tudná megírni!Sub email()
Dim a, b, c, d As Long
c = 1: d = 100
For a = 1 To 28
For b = c To d
Cells(a, 2) = Cells(a, 2) & "; " & Cells(b, 1)
Next
Cells(a, 2) = Right(Cells(a, 2), Len(Cells(a, 2)) - 2)
c = a * 100 + 1: d = d + 100
Next
End Sub -
#4892
Fire/SOUL/CD
félisten
[HUN]Tyson
#4891
válasz
[HUN]Tyson
#4891
üzenetére
Hali!
A makrót majd pillanatok alatt elkészíti Delila_1 vagy FehérMancs....
(vagy valaki más...
)Nem tudom hányas verziót használsz(2007, 2003, vagy korábbi)
A 2007-ben egy cellában 32k karakter fér el illetve ennyit is tud megjeleníteni.
A 2003-ban egy cellában 32k karakter fér el de csak 1024-et jelenít meg. (Ha jól emlékszem)
(a még korábbiakban(2000 elöttiek) meg azt hiszem, hogy csak 255 karakter fért el)Fire.
[ Szerkesztve ]
-
#4891
[HUN]Tyson
senior tag
[HUN]Tyson
senior tag
Sziasztok!
Adott egy táblázat, melyben az A oszlop tartalmaz kb 2800 email címet (1cím/cella, tehát A1-től kb A2800-ig van kitöltve a táblázat.
Arra lenne szükségem, hogy egy cellába 1-100 címet egymás után összemásoljon, majd a következőbe a 101-200, ... a címek közé pedig egy ; és egy szóköz kerüljön.
Az odáig megoldható, hogy a ;+szóközt hozzáfűzöm az A oszlophoz.Tehát 2800 cím esetében a végeredmény a B1-B28 cella 100asával feltöltve.
Belefér ennyi karakter egyáltalán egy cellába?Köszi a segítséget.
-
#4884
Fehér Mancs
tag
RoGGRR
#4878
Fehér Mancs
tag
A kód tökéletesen működik, csak a replace-elt konverzió magyar excelben hibára fut, azt ki kell irtani belőle (valószínűleg máshol meg az előző a jó)
Function SumNum(ByVal txt As String) As double
With CreateObject("VBScript.RegExp")
.Pattern = "\d+(,\d+)?"
.Global = True
For Each m In .execute(txt)
SumNum = SumNum + CDbl(m.Value)
Next
End With
'SumNum = Replace(CStr(SumNum), ".",",")
End Function[ Szerkesztve ]
-
#4883
Speeedfire
félisten
Fire/SOUL/CD
#4882
Speeedfire
félisten
válasz
Fire/SOUL/CD
#4882
üzenetére
öcsém
nemis néztem h ott is van beállítási lehetőségköszönöm a segítséget
-
#4882
Fire/SOUL/CD
félisten
Speeedfire
#4881
válasz
Speeedfire
#4881
üzenetére
Hali!
PNG-be mindenképp így: [link]
Nekem most 2007-es van, ott így is lehet(nem emlékszem, de lehet hogy 2003-ban is műxik)
A mentés másként-nél megjelenő ablakon van az ESZKÖZÖK gomb, azon belül WEBES BEÁLLÍTÁSOK itt lehet állítgatni, ahogy láthatod is
Fire.
[ Szerkesztve ]
-
#4881
Speeedfire
félisten
Speeedfire
félisten
olyan kérdésem lenne h nekem office 2003 van fent a gépemen és 1 excel táblázatot szeretnék weblapként menteni
nos elis menti csakhogy a képeket gif formátumba menti és elég csúnyák
van arra lehetőség h esetleg át lehessen ezt vhol állítani jpg-re vagy png-re? esetleg vmi más programmal meglehet ezt oldani? -
-
#4879
Fire/SOUL/CD
félisten
RoGGRR
#4878
Hali!
Tegyél be egy képet a munkafüzetről, amin látszik minden(vagy legalábbis a lényeg), ha el tudok rajt igazodni, akkor tudok segíteni, csak így visszaolvasva azt sem tudom ki-kivel van...
(Delila_1 is látom segít rendesen, csak mindig valami "apróságról" megfeledkezel, aztán az egész kódot lehet megint módosítani vagy újrairni...![;]](//cdn.rios.hu/dl/s/v1.gif)
)Fire.
[ Szerkesztve ]
-
RoGGRR
csendes tag
Igen, köszi, így működik. Viszont így is egyenként végig kell menni minden cellán, mert ha olyan oszlopot is jelölök, amin nincs adat, akkor Érték hibát jelez. Tehát a képletet nekem kell az adattal teli oszlopok számához igazítanom, és így kissé lassú lenne a számolás.
De kaptam egy makrót is, csak nem tudom, miért nem működik.
=SumNum(cella) a képlet
Function SumNum(ByVal txt As String) As double
With CreateObject("VBScript.RegExp")
.Pattern = "\d+(,\d+)?"
.Global = True
For Each m In .execute(txt)
SumNum = SumNum + CDbl(Replace(m.Value, ",","."))
Next
End With
'SumNum = Replace(CStr(SumNum), ".",",")
End Function[ Szerkesztve ]
-
Delila_1
veterán
Vedd egyenként a függvényeket.
Az A1-ben van a haho-3,45
B1-be: =szöveg.keres("-";a1)
Ennek 5 lesz az eredénye. A képlet végére írd be a +1-et, a B1 értéke 6 lesz, innen, a 6. karaktertől kell majd a szám.Most a C1-be:
=közép(a1;b1;20)
Ez 3,45-öt ad majd, de szövegként, balra igazítva.
Írd át a képletet =(közép(a1;b1;20)*1 -re, ez számként hozza a 3,45-öt. -
#4870
RoGGRR
csendes tag
Fehér Mancs
#4861
RoGGRR
csendes tag
válasz
Fehér Mancs
#4861
üzenetére
pl itt ez a cella:
haho-3,45; gert-3,31; salon-4,44
ezen számok összege kellene egy másik cellában kiíratva. És a számokat csak pozitívként kell kezelni.
-
-
gyga
senior tag
Sziasztok. Van egy rettentő széles táblám, egy részletet kiragadva igy fest:
A____B____C____D______E_____stb
1____2_____3____4______5_____6
1____1_____1____1______1_____3
2____2_____2____2______2_____3
3____3_____3____3______3_____5
stbÁt kellene rendeznem ilyenre:
A____B____C____D_____stb
1____4____1_____1_____
2____5____1_____1_____
3____6____1_____3_____mint modtam igen sok az adat szóval ha neki állok manuálisan akkor sosem végzek.
nincs vmi trükje?[ Szerkesztve ]
-
Pötyi
őstag
A képen látható vörös démon egy nagyon kedves ismerősöm, az ő nevében adom fel ezt a kis ujjgyakorlatot:
Gazdasági informatikának álcázott feladatok, de amúgy semmi gazdaság nincs benne, csak excel képletek.
Nem átverés! Srácok, aki megoldja az öt munkalapot és elküldi neki a sznicole@freemail.hu címre, azzal a kisasszony megejt egy közös fagyizást! Május 15-ig kell leadnia...
Hát tessék, róla lenne szó:
[ Szerkesztve ]
-
-
#4863
Fire/SOUL/CD
félisten
Lac99
#4862
Hali!
A leírásod alapján elképzelhető, hogy vírus garázdálkodik a gépeden, ez tipikus és több(sok) vírus eljátsza, hogy 0-ra állítja a fájlhosszt XLS esetén is. Nem feltétlenül makróvírusra kell gondolni, vannak direkt az XLS-re "szakosodott" kártevők is.
Rögtön ess neki online scannereknek, nézesd át többel is a géped, és véletlenül sem mentsd el a látszólag ép excel táblákat sehova, mert csak mégnagyobb bajt okozhatsz(adott esetben) mint ami esetleg van.(magyarul másik gépen nehogy megnyissa valaki, mert akkor még az azon lévő táblák is el fognak tünögetni)Azt, hogy vissza-e lehet állítnai, azt nem tudom. Az első a vírusírtás(ha van), majd a HDD hibaellenőrzése. Erre azért van szükség, mert ha csak 0-ra állította a fájlhoszt, akkor a lemezellenőrzés egyszerűen vissza tudja állítani a helyes fájlméretet(szerencsés esetben).
Ha ennél nagyobb a gond, akkor meg a "milyen program, ami..." topicba írjál, ott majd javaslok olyan progit, ami az utolsó esélyed lehet...
Fire.
[ Szerkesztve ]
-
Lac99
tag
Sziasztok!
Talán jó helyre írom... A következő lenne a problémám: van 3 excel file, amelyeket napi rendszerességgel használok. Tegnap is ezt tettem, minden rendben volt. Ma, mikor meg akartam nyitni az egyiket, ezt a hibaüzenetet kaptam. Ha az 'igen'-re nyomok, akkor megjelenik egy teljesen üres táblázat. Mindháromnál ez a helyzet. TC-ben megnéztem, mindegyiknek 0 kb a mérete. Az összes többi excel file megnyitható, működnek, van méretük. Ezek viszont nagyon fontosak lennének, mert biztonsági másolat sincs róluk mostanában... Helyre lehet valahogy hozni?
-
Enton
addikt
Hali! Excelben vagyok ilyen az egyik oszlopom:
NT-00172/1
NT-00272
NT-00372
NT-00472
NT-00516/M/1
NT-00520
NT-00554/F
NT-00554/M
NT-00569és ilyet szeretnék kapni belőle:
00172/1
00272
00372
00472
00516/M/1
00520
00554/F
00554/M
00569a lényeg lenne ugyebár a "NT-" eltüntetése minnél gyorsabb módon és a nullák megőrzése mert ált visszaszedi a 00 a számok elejéről mert csak szöveg ként tudnak megmaradni.
Valaki tudna ebben segíteni?
-
#4857
RoGGRR
csendes tag
Fehér Mancs
#4856
RoGGRR
csendes tag
válasz
Fehér Mancs
#4856
üzenetére
Kösz a segítséget, de tizedes törtekről lenne szó, nem csak egész számokról.
-
#4856
Fehér Mancs
tag
RoGGRR
#4855
Fehér Mancs
tag
-
RoGGRR
csendes tag
Sziasztok!
Hogy lehetne megoldani, hogy egy olyan cellából összeadja a számokat, ahol betűk is vannak? És annak összegét kellene átírni a tőle jobbra levő cellába. És a kötőjelet nem szabadna figyelembe venni, mert csak pozitív számokról van szó, amik mellett kötőjelek is vannak.
A másik kérdés: hogy lehet rávenni az excelt, hogy az ékezetes szövegeket ne különböztesse meg a nem ékezetesektől? (Azért kellene, hogy ne vigyem be kétszer ugyanazt a nevet, és ki tudja írni, hogy már van ilyen név)
-
#4854
Fehér Mancs
tag
gyga
#4807
Fehér Mancs
tag
-
#4853
Nowhere
tag
Fehér Mancs
#4849
Nowhere
tag
válasz
Fehér Mancs
#4849
üzenetére
Kösz! Pont ezt a megoldást kerestem először!
-
#4852
Delila_1
veterán
Fehér Mancs
#4849
Delila_1
veterán
válasz
Fehér Mancs
#4849
üzenetére
A képletből véletlenül kimaradt egy * az XYZ előtt.
Helyesen: =szumha(a1:a100;"=*XYZ*";b1:b100)
Nagyon jó, nem ismertem. A feltételes formázásnál pedig nem jutott eszembe az ÜRES függvény használata. Köszi.
-
Delila_1
veterán
A CheckBox-ot elneveztem Jelölő-nek.
A makró a Jelölő jelölt állapotában összeadja az L1 és M1 értékét, jelöletlen állapotában pedig összeszorozza azokat. Az eredményt az N1 cellába – Cells(1,14) – írja.Sub keplet()
If CheckBoxes("Jelölő").Value = xlOn Then
Cells(1, 14).Formula = "=L1+M1"
Else
Cells(1, 14).Formula = "=L1*M1"
End If
End Sub[ Szerkesztve ]
-
Delila_1
veterán
A csere a Szerkesztés menüben van. Az oszlop kijelölése után a Mit keres-hez pontot, a Mire cseréli-hez vesszőt írj, és a Mindet gombbal hajtasd végre a cserét.
Ezt a műveletet rögzíted egy makróban, és egy gombhoz, vagy az eszköztáron egy ikonhoz rendeled.
Az R oszlopban némelyik szám dátumként jelenik meg a füzetedben, azokkal lesz baj. Pl. van közöttük 18.nov.; 23.márc. és 29.ápr.
Meg kell nézned az eredetiben, valószínűleg 18,11; 13.30 és 29,40. -
-
válasz
Delila_1
#4832
üzenetére
De igazából az érdekelne, hogy a D oszlopba kiket nem helyezett el a kollega.
Az is lehet hogy bizonyos cellákban nem lesznek nevek, azért kellene egy táblában( p.l: A1:A88) található névsort összehasonlitani egy másik tábla ( D1: D70) értékeivel.
És az kellene eredményül, hogy Kovács Istvánné...., ( azok akik nem találhatók a D oszlopban.
Nem mindig ugyanoda kerülnek a nevek, pl az is lehet, hogy egyik nap Kovács Istvánné a D12 cellában lesz, és az is lehet ,hogy másnap a D70-ben . -
Badb0y
addikt
válasz
Nowhere
#4831
üzenetére
Ez a hiba.
Az adatok az mti-s szerverről vannak lekérve, és nem akarja valamiért elfogadni az adatot. Pedig ha minden igaz kiolvassa, amikor a hibán megyek végig.
Itt van erről is egy kép.
A hiba meg valami olyasmi, hogy nem megfelelő adattípusú a képletben használt érték.
[ Szerkesztve ]
-
Badb0y
addikt
Találtam egy ideiglenes másik megoldást. Ezt, viszont nem tudok hivatkozni az adatokra amiket betesz a táblázatba. most már bent vannak, de olyan mint ha nem érzékelné az excel.
Így tettem be: adatok/külső adatok átvétele weblapról. És facán ott vannak az árfolyamok, de nem lehet rájuk hivatkozni
-
Badb0y
addikt
-
Badb0y
addikt
Egy számomra rettentően fontos kérdésem lenne tőletek
Ez naponta, vagy naponta többször frissül.
Olyan kérdésem lenne, meg lehet-e valahogy oldani, hogy amikor elindítom excelt, azon belül a használni kívánt táblázatot, indításkor mindíg lekérje a $ -t ? Vagy esetleg mást is ? Vagy ez esélytelen?
Ha esélytelen, hogy lehet ilyen jellegű problémát megoldani ?
Ugyanezt szeretném ezzel is.
-
-
-
#4820
Fire/SOUL/CD
félisten
kraftxld
#4794
válasz
kraftxld
#4794
üzenetére
Hali!
Kösz a választ, én is rengeteget kutakodtam, szerintem sem lehet...
Csak az zavar az egészbe, hogy egy nagy erőforrás-zabáló alkalmazás az Office 2007, ami egyáltalán nem baj, mert van mögötte tartalom is.
De egy ilyen apró dolgon, mint ez a max 31 karakteres munkalapnév, nem igazán kellene spórolni....
Na majd megkérdem MS barátunkat, hogy mi is a helyzet...
Mégegyszer kösz a "megerősítést"...
Fire.
-
Delila_1
veterán
válasz
roomgrey
#4812
üzenetére
Egy kicsit összetett lesz.
Az Irányítószámok lapon kijelölöd az A oszlopot, és az irsz nevet adod neki (Beszúrás> Név> Név megadása> a Munkafüzetben lévő nevek rovatba beírod: irszám. Lent, a Hivatkozásnál látod, ez van megadva: =Irányítószámok!$A$A).
A másik lapon az F17-et ugyanígy elnevezed Kért_szám-nak.
Most újra belépsz a névadáshoz, a név Tel lesz, a hivatkozáshoz bemásolod ezt a hosszú képletet.=OFSZET(INDIREKT(CÍM(HOL.VAN(Kért_szám;irsz;0);2;;;"Irányítószámok"));0;0;DARABTELI(irsz;Kért_szám);1)
A G7 cellán állva az Adatok> Érvényesítésnél a listát választod, a Forráshoz ezt írod:
=Tel -
-
Nowhere
tag
Ja világos már.
Én azt csinálnám, hogy az előbbi képleteket felhasználva:
E1 cella: =IF(C1=0;B1;0)
F1 cella: =IF(D1=0;C1;0)Ezeket lehúzod addig ahány sorod van és az alján szummázva az E azt a végösszeget adja ahol nem egyezett az A és B (jelen esetben 13), az F meg ahol nem (28).
Szépnek nem szép, de megoldás.
-
Nowhere
tag
C oszlopba:
=IF(EXACT(A1;B1);A1+B1;0)
D oszlopba:
=IF(EXACT(A1;B1)=FALSE;A1+B1;0)A c összeadja az egyformákat (ahol A=B) a D pedig ahol nem egyenlő A B-vel.
Delila_1: igazad van, kicsit elbénáztam a bemásolást, de amúgy jól csináltam azt a részt én is (kivételesen
) Kösz![ Szerkesztve ]
-
gyga
senior tag
sziasztok guruk.
következőt kellene megoldani.
A oszlop__________B oszlop
3________________3
4________________5
5________________5
6________________6
7________________8
stb
összekellene adni a B oszlopban azokat a számokat amik nem egyenlőek a melletük levő A oszlopéval
tehát jelen esetben az 5 és a 8 az.
Jah és azokat is össze kell adni külön amik megegyeznek.
köszönet.[ Szerkesztve ]
-
Delila_1
veterán
válasz
Nowhere
#4801
üzenetére
Az =Részösszeg(9;B2: B1000) [=Subtotal(9,B2: B1000)] megadja a B oszlopban (1000-ig) található számok összegét.
Most szűrd meg a tartományt az A oszlop szerint. Az Egyéni kategória Név legördülőjében a "tartalmaz"-nál (utolsó előtti választható paraméter) írd be a jobb oldali mezőbe az XYZ-t. A subtotal-os cella csak a látható cellák összegét mutatja.
Nem tudom az angol megfelelőjét, de biztosan megtalálod.
A B1000 előtt természetesen nincs szóköz, utólag tettem be a vigyori pofák miatt.
[ Szerkesztve ]
-
Nowhere
tag
Sziasztok!
Nem hagy nyugodni a dolog, ezért megkérdezem az okosabbakat.
Szóval van egy A oszlop ami tartalmaz egy terméket, B oszlop pedig egy hozzátartozó számot. A termékek nevei eltérőek, de mondjuk 10-ből 5 tartalmazza az XYZ szót is.
A c oszlopba csak azoknak az összege kellene amely tartalmazza ezt az XYZ-t.Erre csináltam egy ilyet: =IF(ISERROR(IF(FIND("Joint";A10;0)>0;B10;0));0;IF(FIND("Joint";A10;0)>0;B10;0))
De ez szerintem bonyolult (nekem), úgy gondolom van erre valami egyszerűbb módszer is.
Alapvetően nem is így kellene ez az egész, hanem amelyik A oszlopban lévő cella tartalmazza az XYZ-t annak mennyi lesz a totalja a B szerint.
Köszi előre is, ha van valakinek ötlete.
Mintha ő nem tudná megírni!
)
![;]](http://cdn.rios.hu/dl/s/v1.gif)
)
;1;0));"Nics a D-ben";"")
Új hozzászólás Aktív témák
Fferi50- Le Mans Ultimate
- Január 30-tól Magyarországon is kapható a Vivo X200 Pro
- Futás, futópályák
- Vezeték nélküli fülhallgatók
- Ukrajnai háború
- Végre bemutatkozott a Google Pixel 4a
- Bemutatta az Apple az iPhone 16e-t
- AliExpress tapasztalatok
- Szeged és környéke adok-veszek-beszélgetek
- Milyen okostelefont vegyek?
- További aktív témák...