Tényleg!!! Köszönöm szépen!

Freedom, Nature, Love & Music

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.

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Kösz! Pont ezt a megoldást kerestem először!

Ezt is meg lehet oldani egy összetett SZUM HA függvénypárossal és tömbképlettel:

=SZUM(HA(A1:A8<>B1:B8;B1:B8;0))

a végén SHIFT+CTRL+ENTER-rel (ha egyenlőt akarunk, akkor egyenlőségjellel).

+ a SZORZATÖSSZEG is jó erre:

=SZORZATÖSSZEG((A1:A8<>B1:B8)*B1:B8)

[ Szerkesztve ]

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)

Ha csak 1 jegyű számokat kell összeadni, akkor tömbképlettel meg lehet oldani (pl 12a-nál 1+2-t kell venni, nem pedig 12-t):

=SZUM(HA(HIBA(KÖZÉP($A$1;SOR(B1:B256);1)*1);0;KÖZÉP($A$1;SOR(B1:B256);1)*1))

(Ctrl+Shift+Enter -> 256 betűig nézi, de ezt lehet állítani).

Kösz a segítséget, de tizedes törtekről lenne szó, nem csak egész számokról.

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
00569

a 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?

"mert gyakorlatilag megszámolhatatlan mennyiségű papucsállatka használ gazdatestként internetezésre humanoidokat és ez követhetetlen."

A
=JOBB(A1;HOSSZ(A1)-3)
képlet megoldja (ha az adataid az A oszlopban vannak).

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Köszike sikerült!

"mert gyakorlatilag megszámolhatatlan mennyiségű papucsállatka használ gazdatestként internetezésre humanoidokat és ez követhetetlen."

Írj példákat, mert így elég nehéz kitalálni, mire is gondolsz pontosan.

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?

De az is lehet, hogy dupla kiterjesztést kapott valamitől, pld. valami.xls.xlsx, csak mondjuk nem látod a másodikat, mert a windows intézőben a mappa beállításainál be van kapcsolva az, hogy "Ismert fájltípusok kiterjesztéseinek elrejtése"...

QNX is cool!

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:

[link]

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 ]

QNX is cool!

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 ]

A kisebbség is számíít, teszkó.

Jóképű fiú ismerősöd nincs ilyen egyszerű problémával?

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Hát ööö, nekem nincs excel problémám, de ha Pöst felé jársz, nagy szeretettel várlak egy fagylaltkehelyre!

----------------------------------------------------------------

/Nyomtasd ki, tedd el, bármikor beválthatod!/

[ Szerkesztve ]

QNX is cool!

OK
Nézd meg a privátodat.

[ 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.

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.

Feltéve, hogy a szövegeid az A1:A3 tartományban vannak:

=(KÖZÉP(A1;SZÖVEG.KERES("-";A1)+1;20))*1+(KÖZÉP(A2;SZÖVEG.KERES("-";A2)+1;20))*1+(KÖZÉP(A3;SZÖVEG.KERES("-";A3)+1;20))*1

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Egyelőre Érték hibát jelez. Pedig a1-től a3-ig írtam példákat.

[ Szerkesztve ]

Nézd át a beírt képletedet.
Még egyszerűbb, ha Ctrl+c, Ctrl+v-vel bemásolod.
Nálam hibátlanul működik.

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Pedig másolással csináltam.

Gondolom ez lenne az első cella értéke:
=(KÖZÉP(A1;SZÖVEG.KERES("-";A1)+1;20))*1

de az se működik.

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.

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

A helyzet az, hogy én nem úgy írtam, hogy az A1-ben a haho-3,45 van, hanem a
"haho-3,45; gert-3,31; salon-4,44". Ez mind egy cellában van, és ezen össszes szám értéke kellene.

Hali!

Adatok - Szövegből oszlopok menüponttal szedd szét az egy cellába írt értékeket. Határoló karakternek esetedben a pontosvessző látszik jónak. Aztán már működni fog Delila gurunk képlete.

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 ]

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... )

Fire.

[ Szerkesztve ]

Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)

Lehdog módszerével a adataid az A1: C1 tartományba kerültek.
D1-be:

=HA(HIBÁS((KÖZÉP(A1;SZÖVEG.KERES("-";A1)+1;20))*1);0;(KÖZÉP(A1;SZÖVEG.KERES("-";A1)+1;20))*1)

Ezt húzd jobbra az F oszlopig.
G1-be: =szum(d1:f1)

[ 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.

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?

Fotóim https://fb.com/toth.szabolcs.art || IG: http://instagram.com/_tothszabolcs_ || Weblapom http://szabolcs-toth.com

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 ]

Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)

öcsém
nemis néztem h ott is van beállítási lehetőség

köszönöm a segítséget

Fotóim https://fb.com/toth.szabolcs.art || IG: http://instagram.com/_tothszabolcs_ || Weblapom http://szabolcs-toth.com

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 ]

sziasztok
volna 1 láma kérdésem:
1 munkalapon belül, hogyan tudom beállítani, hogy az 1 oldal és az utolsó két oldal álló kivitelű legyen a többi fekvő?

A kisebbség is számíít, teszkó.

minden fülre külön oldalbeállítás van
fájl->oldalbeállítás

MO. RIP. - az utolsó kapcsolja le a villanyt.

Lúzer válaszából következik, hogy a különböző nyomtatási beállításokhoz tedd külön lapokra, amiket különböző beállításokkal akarsz nyomtatni. Azonos munkalapon lévő adatokat csak azonos beállításokkal nyomtathatsz.

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

jaja lesett kösz nektek.
DE elő jött egy olyan jelenség amikor simán kattintok 1 cellára akkor kijelöli az alattalevő 3 cellát is. kicsit idegesítő mit ne mondjak. valaki találkozott már vele?

A kisebbség is számíít, teszkó.

Valószínűleg a Scroll Lock billentyűd volt lenyomva.

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Inkább az F8 (extension mód), a Scroll lock-ra a képernyőt lehet mozgatni.

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.

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 ]

Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)

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

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

nem nyert egyikőtök sem, nincs beragadt bill se lenyomva semmi ... rejtélyes

A kisebbség is számíít, teszkó.

(nem vagyok haragban a "t" billentyűvel, de az előbb kettőt is kihagytam)

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Lehet olyan makrót irni ami riaszt? Olyanra gondolok, hogy ha egy oszlop cellái közt bármelyik cella eléri az aktuális dátum értékét akkor riaszt valahogy?

Precision M7710_&_Precision M7740- CPU: 9980HK, RAM: 32GB/3200MHz, GPU: RTX5000, IGZO 4K-UHD, SSD: 2TB Force MP510, 2TB ADATA XPG SX8200 PRO, 1TB SK HYNIX Class 50 SSD

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 Sub

Itt 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 ]

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Pedig az F8 pont ilyet csinál -> nyiss egy excelt, rendesen működik. Miután megnyomod az F8-at "meghülyül" (az általad leírd hatás). Újra megnyomva az F8-at megint rendbe lesz.

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

6yrs, 19.5kg :) Realme X2 Pro 12/256, Fizetési elvárás: hát, én már a Google-ban is sokat kerestem.... Flickr fotoim: http://www.flickr.com/photos/magdabalinko/