Hirdetés
- sziku69: Fűzzük össze a szavakat :)
- GoodSpeed: A RAM-válság és annak lehetséges hatásai
- bambano: Bambanő háza tája
- ubyegon2: Airfryer XL XXL forrólevegős sütő gyakorlati tanácsok, ötletek, receptek
- gban: Ingyen kellene, de tegnapra
- Luck Dragon: Asszociációs játék. :)
- Gurulunk, WAZE?!
- Sub-ZeRo: Euro Truck Simulator 2 & American Truck Simulator 1 (esetleg 2 majd, ha lesz) :)
- potyautas: A Magyar Néphadsereg emlékére
- D@reeo: Pi-hole és a Telekom Sagemcom F@st 5670 DNS beállítása
-
LOGOUT
A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
Kérdés felvetése előtt olvasd el, ha még nem tetted.
Új hozzászólás Aktív témák
-
Delila_1
veterán
válasz
atillaahun
#25087
üzenetére
Nincs mit.

-
Delila_1
veterán
válasz
atillaahun
#25065
üzenetére
A RÉSZÖSSZEG függvényt nézd meg.
-
lappy
őstag
válasz
atillaahun
#22161
üzenetére
Szia!
Nézd meg ezt! -
Delila_1
veterán
válasz
atillaahun
#21703
üzenetére
Igen, a csere funkcióval, minden ékezetesre külön.
-
Delila_1
veterán
válasz
atillaahun
#21655
üzenetére
Szívesen.

-
Delila_1
veterán
válasz
atillaahun
#21652
üzenetére
C1-be
=HA(DARABTELI(B:B;B1)>1;SZUMHA(B:B;B1;A:A);"") -
Louro
őstag
válasz
atillaahun
#21652
üzenetére
Ha jól értem egyik oszlopban egy feltételvizsgálat lenne, míg, ha megfelel a feltételnek, akkor a mellette levő számot összeadja.
Ez a függvény a COUNTIF. Magyarul SZUMHA .
-
atillaahun
veterán
válasz
atillaahun
#21603
üzenetére
Közben megoldottam FKERES-sel.

-
joe86t
újonc
válasz
atillaahun
#19666
üzenetére
Igen, valami olyasmi.
-
joe86t
újonc
válasz
atillaahun
#19664
üzenetére
A te példádon a feladat:
Az A oszlop elemeire:
A 0 lefedi a C-t, a 2 a C-t, a 4 a C-t, a 6 D-t, a 8 a D-t. Tehát az A oszlop elemei által le van fedve a C és a D oszlop, azaz a fedés a 2. Ez nem egy sima darabteli, hanem több függvény valahogy egymásba ágyazva. -
Delila_1
veterán
válasz
atillaahun
#19637
üzenetére
A másik gomb makrójában az első gomb visible tulajdonsága legyen true.
-
flierqqq
tag
válasz
atillaahun
#19634
üzenetére
Köszi!

-
hallgat
csendes tag
válasz
atillaahun
#19602
üzenetére
Nincs mit! 
-
Delila_1
veterán
válasz
atillaahun
#19630
üzenetére
A sort elrejtő makró végén
Me.Gomb.Visible=False -
hallgat
csendes tag
válasz
atillaahun
#19596
üzenetére
Va ez így néha

2003-ban:
Jobb egérgomb a parancsikonok felett, majd a Visual Basic eszköztár bepipálása. "Vezérlők eszközkészlete" gomb, feladja a kipakolható elemeket tartalmazó ablakot.Másként: Nézet -> Eszköztárak -> Visual Basic
-
Delila_1
veterán
válasz
atillaahun
#19583
üzenetére
Kiteszed a gombot, amit az Excel elnevez CommandButton1-nek. Ezen duplán klikkelve a VB szerkesztőben beírja a hozzá tartozó makró első-, és utolsó sorát. Már csak e kettő közé kell írni a feladatot. Együtt a sorok
Private Sub CommandButton1_Click()
If Rows("5:10").Hidden = True Then
Rows("5:10").Hidden = False
Else
Rows("5:10").Hidden = True
End If
End SubEz a makró az 5-től 10-ig sorokat rejti, ill. fedi fel.
-
Delila_1
veterán
válasz
atillaahun
#19580
üzenetére
Nincs mit.

-
Delila_1
veterán
válasz
atillaahun
#19575
üzenetére
A beállításoknál kapcsolhatod ki. Régebbi verziókban Cellarácsok, 2007-től Rácsvonalak megjelenítése.
-
Mutt
senior tag
válasz
atillaahun
#17552
üzenetére
Hello,
3534 Miskolc Kossuth utca 13.
És ebből szeretnék egy oszlopot folytonosan egymás alá név, város, utca, irányítószám,A kapott minták alapján lehet azt mondani, hogy az első szóközig van az irányítószám, a másodikig a város és a többi a cím. Tehát
Ir. szám = BAL(input;első szóköz helye-1)
=BAL(B2;SZÖVEG.KERES(" ";B2)-1)
Város = KÖZÉP(input; első szóköz helye; első és második szóköz közötti karakterek-1)
=KÖZÉP(B3;SZÖVEG.KERES(" ";B3)+1;SZÖVEG.KERES(" ";B3;SZÖVEG.KERES(" ";B3)+1)-SZÖVEG.KERES(" ";B3)-1)
Cím = KÖZÉP(input;második szóköz helye; maradék karakterek)
=KÖZÉP(B2;SZÖVEG.KERES(" ";B2;SZÖVEG.KERES(" ";B2)+1)+1;HOSSZ(B2))Ezek után már csak össze kell fűznöd a kívánt sorrendben őket, sortörést a KARAKTER(10) függvény ad.
Szöval: =Város & KARAKTER(10) & Cím & KARAKTER(10) & Irszám
üdv.
-
lappy
őstag
válasz
atillaahun
#17552
üzenetére
Szia!
Ha úgy vannak a nevek ahogy írtad akkor én helyetted azt csinálnám hogy kijelölöm az A és B oszlopot majd másolás és egy másik munkalapra irányított beillesztés transzponálással így az 1 sorban a nevek a 2 sorban a cím (igaz elől van az irányítószám), de erre szerintem létezik megoldás! hogy átkerüljön a 3 sorba mondjuk
-
Mutt
senior tag
válasz
atillaahun
#17532
üzenetére
Hello,
Üdv, szükségem lenne valami nyerő ötletre hogy rakok sorba Dr.-okat, Prof. Dr.-okat, meg sima nevű embereket, egy kb. 500-as táblába, úgy hogy a rendezési elv ugye mindenkinek a normál vezetékneve, címzések nélkül.
A szűk keresztmetszet itt, hogy hogyan tudod eltávolítani a nevekből a titulusokat.
Excelben sok szöveg függvény van, a HELYETTE például ezt csinálja, de egyszerre csak 1 cserét csinál meg.
Ezért készítettem egy UDF-et amely egyszerre több cserél csinál csak sorold fel vhova azokat amiket le kell cserélni.Itt a kód:
Function HelyetteTobb(Eredeti, rngKereses As Range)
Dim szoveg_regi As Range
Dim szoveg
HelyetteTobb = "N/A"
szoveg = Eredeti
For Each szoveg_regi In rngKereses
szoveg = Replace(szoveg, CStr(szoveg_regi.Value), "", compare:=vbTextCompare)
Next szoveg_regi
HelyetteTobb = Trim(szoveg)
End FunctionLépések:
1. A fenti függvényt használva megkapod a sima neveket.
2. DARABTELI függvénnyel meghatározod hogy a név ABC-sorrend szerint hanyadik helyre kerül.
3. Az elöző függvény eredményét felhasználva ABC-sorrendbe kiíratod a listát. Itt sok megoldás lehet, pl. ELTOLÁS, INDEX, FKERES.üdv.
-
Delila_1
veterán
válasz
atillaahun
#17532
üzenetére
Az első kérdésre:
Az A oszlopban vannak a nevek.
B1 ->
=HA(BAL(A1;2)="dr";JOBB(A1;HOSSZ(A1)-4);HA(BAL(A1;4)="prof";JOBB(A1;HOSSZ(A1)-6);A1))C1 ->
=HA(BAL(A1;2)="dr";B1&" dr.";HA(BAL(A1;4)="prof";B1&" prof.";B1))A másodikat próbáld meg a Szövegből oszlopok funkcióval megoldani, ahol határolójelnek a szóközt adod meg. Nem lesz tökéletes, mert pl. az utca neve több szóból is állhat.
-
Delila_1
veterán
válasz
atillaahun
#17040
üzenetére
Excelbarát 17042-es válasza remek, azzal a különbséggel, hogy ne @-ot, hanem pl. egy pontot írj az üres cellákba. Az Ugrás menü a Ctrl+g kombinációval jön elő 2003-tól a 2010 verzióig.
-
Excelbarat
tag
válasz
atillaahun
#17040
üzenetére
Ha az üres cellákba írsz @-ot egyesével akkor arra van gyorsabb módszer. Kijelölöd az adatbázist, Keresés és kijelölésre katt - Ugrás - Irányított üres cellák pipa Ok, nyomsz egy F2-t beírod a kívánt szöveget és Ctrl+Enter így feltölti az összeset.
-
Delila_1
veterán
válasz
atillaahun
#17032
üzenetére
Az üres sorok után – ha feltétlen kellenek üres sorok – újabb autoszűrőt rakj be.
Ha csak valami csicsás forma miatt hagysz üreseket, az egyik cellába írj valamit, és a karakter színét állítsd a háttér színére. Akkor a szűrő 1 táblának veszi az adatokat. -
Delila_1
veterán
válasz
atillaahun
#16959
üzenetére
Gratu.
-
Delila_1
veterán
válasz
atillaahun
#16956
üzenetére
=ha(hibás(ide_jön_a_függvény);ezt_tegye_hiba_esetén;ez_legyen_ha_nem_fut_hibára)
-
Delila_1
veterán
válasz
atillaahun
#16933
üzenetére
Mikor leáll, Ctrl+g-vel hozd be a VB szerkesztőben az Immediate ablakot. Írd be
?CV.row
Erre válaszként kapsz egy számot, a ciklusváltozónak a sorát. Lépj az Excelbe, és nézd meg ezt a sort. Akár billentyűzetről is kijavíthatod, majd futtathatod tovább a makrót. -
Mutt
senior tag
válasz
atillaahun
#16876
üzenetére
Hello,
Olyan függvény van, ami megszámolja, hogy bizonyos karakter/kifejezés hányszor szerepel egy cellában?
Erre a megoldás, hogy megszámolod mennyivel lett rövidebb a szöveged, ha törőlted belőle a kivánt karakter(eke)t.
A képlet (A1-ben az eredeti szöveg, B1-ben a keresendő karakter(ek):
=(HOSSZ(A1)-HOSSZ(HELYETTE(A1;B1;"")))/HOSSZ(B1)üdv.
-
Delila_1
veterán
válasz
atillaahun
#16904
üzenetére
Lehet, hogy tényleg gyorsabb szövegfüggvényekkel.
B1: =KÖZÉP(A1;SZÖVEG.KERES("<";A1)+1;256)
C1: =BAL(B1;SZÖVEG.KERES(".hu";B1)+2) -
Delila_1
veterán
válasz
atillaahun
#16899
üzenetére
Előbb pucold ki a szemét karaktereket.
Az előbbi makró végére:Columns("A:A").Select
Selection.Replace What:=")", Replacement:="", LookAt:=xlPart
Selection.Replace What:=":", Replacement:="", LookAt:=xlPart
Selection.Replace What:=">", Replacement:="", LookAt:=xlPartstb. Ez sok szemetet eléget.
-
Delila_1
veterán
válasz
atillaahun
#16899
üzenetére
A makró végére írd be, hogy a Munka2 A oszlopában ezeket a karaktereket cserélje üres stringre.
-
Delila_1
veterán
válasz
atillaahun
#16896
üzenetére
Milyen szemét karakterek vannak benne?
-
Delila_1
veterán
válasz
atillaahun
#16891
üzenetére
Ímé a makró hozzá:
Sub email()
Dim ter As Range, CV, WS As Worksheet, sor As Integer
Cells(1).Select
Selection.CurrentRegion.Select
Set ter = Selection
Set WS = Sheets("Munka2")
sor = 1
For Each CV In ter
If InStr(CV, "@") Then
WS.Cells(sor, 1) = CV
sor = sor + 1
End If
Next
End SubA Munka1 lapon oszlopokba szétszedett adatokból a Munka2 lap A oszlopába gyűjti ki a címeket (@-ot) tartalmazó cellák tartalmát.
-
Delila_1
veterán
válasz
atillaahun
#16891
üzenetére
Segít, ha feltételes formázást adsz rá?
A formázás képlete =SZÖVEG.TALÁL("@";A1)>0Esetleg egy makró, ami végigfut a területen, és egy másik helyre egymás alá beteszi a @-ot tartalmazó cellák tartalmát...
-
válasz
atillaahun
#16882
üzenetére
ja s most látom hogy ez egyik fülből a másikba nem tud tagolni?

mert fülön belül megcsinálja, de ha a végeredményt másik fülre akarom kiíratni hibát ír -
válasz
atillaahun
#16882
üzenetére

ennyi idő alatt nem ér megmondani

de az ilyennek mi a parancssora?
mert automatikus kellene ami csak arra vár legyen a cellákba adat legyen (az nem számít hogyha nincs adat hibát ír) -
Delila_1
veterán
válasz
atillaahun
#16878
üzenetére
Nem tudom, honnan veszed a szöveget, de ha 1 oszlopba jut 1-1 hosszú, címekkel tarkított szövegrész, akkor a szövegből oszlopok funkcióval szét tudod szedni, szóköz tagolóval.
Gondolom, az előbbi képlettel a @ jelet számlálod.Ha szövegrész előfordulását akarod számlálni egy szövegben, akkor a
=SZORZATÖSSZEG(--(KÖZÉP(B2;SOR(A1:INDIREKT("A"&HOSSZ(B2)));1)="a"))
úgy módosul, hogy a képleten belül lévő egyenlőségjel előtti 1-et átírod annyira, ahány karakter hosszú a keresett szövegrész.
=SZORZATÖSSZEG(--(KÖZÉP(B2;SOR(A1:INDIREKT("A"&HOSSZ(B2)));4)="alma"))
-
Delila_1
veterán
válasz
atillaahun
#16876
üzenetére
=SZORZATÖSSZEG(--(KÖZÉP(B2;SOR(A1:INDIREKT("A"&HOSSZ(B2)));1)="a"))
Ez a B2 cella szövegében számolja meg az a betűket.
-
Delila_1
veterán
válasz
atillaahun
#16840
üzenetére
A darabteli függvény minden adatod mellé odaírja, hány db van belőle a kérdéses oszlopban. [=darabteli(A:A;A1)].
Erre az oszlopra teszel egy autoszűrőt, és kiszűröd az 1-nél nagyobbakat.Kijelölöd az összes látható sort, kitörlöd.
-
Excelbarat
tag
válasz
atillaahun
#16840
üzenetére
Hi! Írtam egy makrót:
Sub torol()
For i = 1 To ActiveSheet.UsedRange.Rows.Count
If WorksheetFunction.CountIf(Range(Cells(1, 1), Cells(ActiveSheet.Cells(Rows.Count, "A").End(xlUp).Row, "A")), Cells(i, "A")) > 1 Then
a = Cells(i, "A").Value
For j = ActiveSheet.UsedRange.Rows.Count To 1 Step -1
If Cells(j, "A").Value = a Then
Cells(j, "A").EntireRow.Delete
End If
Next j
End If
Next i
End Sub
Kihangsúlyozom hogy ez minden olyan SORT töröl amiben az A oszlopban van azonos és nem hagy egyet sem. (ergo aminél talál legalább kettőt abból egyet sem hagy!)
használata:
lapfülre jobb gomb - kód megjelenítése oda bemásolod és nyomsz egy F5-t (vagy felül a zöld kis play nyilacskára katt). és ha minden jól ment akkor csak egyedi értékek maradtak.
Azért mielőtt megcsinálod csinálj egy másolatot a fájlból mert a makrókat nem lehet visszavonni! (amit lefuttatsz és változtat(töröl) azt már nem tudod előhozni. (persze úgy igen h nem mented el a végeredményt, bezárod és újra megnyitod) -
Excelbarat
tag
válasz
atillaahun
#16788
üzenetére
Hi!
2010-es excelnél nézd meg a Beállítások - Képletek - Számítási beállításoknál - Munkafüzet kiszámítása: jelöld be a csak kérésre. (én a hibaellenőrzést is kiszedem mert csak idegesít ha mindig bejelöli zöldel ha "nem logikus" képletet észlel) ő sztem 2007 nél is hasonló dolgot keress. -
Pille69
tag
válasz
atillaahun
#16655
üzenetére
Mi az a szerkesztési nézet?
Szerk.: Ha PDFCreatorral pdf-et nyomtatok belőle, az fekvő lesz.
-
Delila_1
veterán
válasz
atillaahun
#16646
üzenetére
Szívesen.

-
Delila_1
veterán
válasz
atillaahun
#16638
üzenetére
Ha pl. az A oszlopban keresed, és címsor is van, a
=DARABTELI($A$2:A2;A2)
függvényt végig másolva mindegyik adatod mellett megjelenik, hányadik alkalommal szerepel az oszlopban.Ügyelj a $ jelekre!
-
pero19910606
csendes tag
válasz
atillaahun
#16582
üzenetére
Sikerült is, köszönöm a segítséget

-
Sixkiller6
őstag
válasz
atillaahun
#16528
üzenetére
elég sok megoldás van neten:
pl:>>link<< -
pero19910606
csendes tag
válasz
atillaahun
#14481
üzenetére
ááh ez az
köszönöm szépen a gyors választ!Üdv!
-
r3dsnake
nagyúr
válasz
atillaahun
#14422
üzenetére
Szia!
Köszi szépen, ez nagyon jó, működik! : )
-
válasz
atillaahun
#14387
üzenetére
A példádnál maradva
1. vidd a cellakurzort a B oszlop bármely cellájára (ami tartalmaz képletet, ne üres legyen), majd CTRL+C
2. vidd a cellakurzort az A oszlopba, majd CTRL + Kurzormozgató LE(így az A oszlop utolsó, adatot tartalmazó cellájára áll a cellakurzor)
3. vidd a cellakurzort ebben a sorban maradva a B oszlopba, majd CTRL+SHIFT+Kurzormozgató FEL, majd CTRL+V és ESC -
lappy
őstag
válasz
atillaahun
#13961
üzenetére
Szűrő! és törlöd az üres sorokat sortörléssel!

-
lappy
őstag
válasz
atillaahun
#13959
üzenetére
Szövegből oszlopok elnevezésű dologgal szétszeded oszlopokra!
Az Adatok menüben válasszuk a Szövegből oszlopok parancs! -
atillaahun
veterán
válasz
atillaahun
#13382
üzenetére
Na végül megoldottam .csv formátumban, úgy hogy minden adatot kitöröltem, kivéve az e-mail címeket, így már egy fokkal egyszerűbb volt, szóval tárgytalan.
Lenne itt viszont egy másik apróság.
Mappaszerkezetet hogyan tudok exportálni? A beérkező üzeneteken belül hoztam létre vagy 50-et, amit nagyon nem szeretnék minden gépen megcsinálni. Végülis a szűrőkhöz/szabályokhoz tartozó mappák ezek, ahova automatikusan kerülnek a bejövő üzenetek. -
Delila_1
veterán
válasz
atillaahun
#11802
üzenetére
Nem olvastam vissza, de feltételezem, hogy makró is van a füzetedben. Az
Application.DisplayAlerts=False
sor letiltja a kérdést. Érdemes óvatosan bánni vele, sokszor hasznos a rákérdezés.
-
bugizozi
őstag
válasz
atillaahun
#11800
üzenetére
Automatic update and no message
2003:
On the Tools menu, click Options, and then click the Edit tab.
Click to clear the Ask to update automatic links check box.2007:
Click Microsoft Office Button, and then click Excel Options.
Click Advanced.
Under General, click to clear the Ask to update automatic links check box. -
bugizozi
őstag
válasz
atillaahun
#11789
üzenetére
Szerkesztés/Csatolások -> Indító rákérdezés...
Esetleg?
-
válasz
atillaahun
#11797
üzenetére
Akkor nem, mert ez biztonsági beállítás, amit minden gépen a registry-ben meg kellene tenni.
Mint írtam, ez csak tipp volt részemről, az sem biztos, hogy ez segített volna a dolgon. Lehet, hogy valaki más tud majd segíteni... -
válasz
atillaahun
#11789
üzenetére
Nem tudom, hogy ez kihatással-e van a "problémádra", de talán megér egy próbát. [link]
Arra ügyelj, hogy ne a letölthető fix-et használd, hanem kézzel állítsd be a registry-ben, amit kell. Ha nem jönne össze a dolog, akkor ez a fix vissza már nem állítja dolgokat (régebben legalábbis nem tette)Faterkam
Ne viccelj már, ez általános iskolai matek... [link] -
válasz
atillaahun
#11785
üzenetére
Ja bocsesz, fáradt vagyok már azt hiszem, van egyszerűbb is:
=PLAFON(A1;50) -
válasz
atillaahun
#11785
üzenetére
-
atillaahun
veterán
válasz
atillaahun
#11761
üzenetére
Áh, nemszóltam, én voltam a hülye. Mert úgy adtam meg a feltételt, hogy ha teljesül beírja az értéket, ha nem akkor egy szünetet ír. És nem tudta szummázni a szüneteket. Most kijavítottam semmire, és így már gurul.

Viszont a cellavédelmet nem mentette át az eredeti fájlból, és nem is találom benne.
Ezek szerint itt egyáltalán nem is lehet bizonyos cellákat zárolni, vagy csak én vagyok vak?
-
bugizozi
őstag
válasz
atillaahun
#11758
üzenetére
"az elkészített Excel programomat kitegyem netre, és azzal bárki tudjon számolni (a megfelelő értékeket megadva), de letölteni, vagy a képleteket megnézni ne tudja?"én a vagy utáni mondatrészre válaszoltamjaj, ezt a mondatot félreértettem

amivel volt tapasztalatom, csak a google docs-ot tudnám javasolni...
amivel nem volt tapasztalatom az volt jópár, pl az Editgrid..illetve a hawerunk kiad még jópár találatot amivel lehet próbálkozni
-
perfag
aktív tag
válasz
atillaahun
#11755
üzenetére
az "Excel programomat kitegyem netre, és azzal bárki tudjon számolni (a megfelelő értékeket megadva), de letölteni, vagy a képleteket megnézni ne tudja?"
A net-es verzióhoz nem tudok hozzászólni, de az Excel védelemhez igen.
Ez egy érdekes probléma, hogy mit és miért akarunk mások elől elrejteni, ill. érdemes-e ezzel vesződni. A felhasználók nagyon nagy többsége fennakad bármilyen védelmen. Egy kisebb csoport viszont okos kis programocskák segítségével bármilyen védelmet megkerül. A kérdés az, hogy mekkora annak az esélye, hogy az Excel fájlodat valaki érdemesnek tartsa feltörni, és ehhez rendelkezik a megfelelő jártassággal. -
bugizozi
őstag
válasz
atillaahun
#11755
üzenetére
Hogyha levéded a cellát akkor nem lehet látni a képletet ami benne van, nem?
[link] -
bugizozi
őstag
válasz
atillaahun
#11753
üzenetére
most hitelen nem találom neten, meg nincs is időm rá, de ezeket olvasd el...
szerk:
így működnie kell
Új hozzászólás Aktív témák
- Witcher 1 Collector's Edition
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- Játékkulcsok olcsón: Steam, Uplay, GoG, Origin, Xbox, PS stb.
- Árváltozás + játék DVD: Watch Dogs Deadsec Edititon
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- ÁRGARANCIA!Épített KomPhone i5 14600KF 16/32/64GB RAM RTX 5070 12GB GAMER PC termékbeszámítással
- Xiaomi Watch S4, 1 Év Garanciával
- BESZÁMÍTÁS! MSI B550M R9 3900X 32GB DDR4 500GB SSD RX 7800XT 16GB Corsair 4000D Cooler Master 750W
- Apple iPhone 14 Pro Silver ProMotion 120 Hz, 48 MP kamera, Dynamic Island 128 GB 95%
- Új Dell 5330 Latitude 13.3 FHD IPS Touch i5-1235U 4.4Ghz 16GB 512GB Intel Iris XE Win11 Pro Garancia
Állásajánlatok
Cég: ATW Internet Kft.
Város: Budapest
Cég: BroadBit Hungary Kft.
Város: Budakeszi








Fferi50
