-
Fototrend
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
-
morgusz
csendes tag
Sziasztok!
Segítsetek!
Hogy lehet dátumot tartalmazó cellát beállítani, vagy egy újat létrehozni (szövegként) körlevél alapjául szolgáló táblázatban úgy, hogy az ÉÉÉÉ.HH.NN formátumban jelenjen meg Word körlevél készítésénél.
Most úgy jelenik meg, hogy: N/H/ÉÉÉÉKösz!
-
Winner_hun
félisten
Két azonos dokumentum tartalmát össze lehet vonni? Ugyanaz a dokumentum, csak más tartalommal és kéne egy összesítő: ha az egyikben K3-ban 5 van, a másikban K3-ban 8, akkor az legyen 13 az összevont dokumentumban.
► "Kicsit olyan webcaritas" ◄ ヅ
-
lappy
őstag
válasz Winner_hun #45505 üzenetére
Egy harmadikba lehet osszevonni majd tartományt kijelölöd és másolás beillesztés érték így csak az összeguk marad
Bámulatos hol tart már a tudomány!
-
Winner_hun
félisten
Ezt nem igazán értem. Ha az új dokumentumban nyomok egy jobb gombot, ott irányított beillesztés - értékek-re nyomok rá, akkor az első beírt adatot a második, beillesztendő adatokkal simán felülírja, nem adja össze a számokat. Hogy kell ezt csinálni?
► "Kicsit olyan webcaritas" ◄ ヅ
-
hódmaci
senior tag
Sziasztok!
Van arra megoldás, hogy az elkészített munkafüzetet jelszóval védjem?
Mármint az megtaláltam hogyan védjem jelszóval a szerkesztését de a nyomtatást lehet valahogyan zárolni?
Vagyis azt szeretném ha csak olvasható lenne és más jog nincs.
Vagyis se szerkesztés se nyomtatás.Van erre mód?
365
Hölgyeim! Azt tesszük a kirakatba ami eladó.:)
-
lappy
őstag
válasz Winner_hun #45507 üzenetére
Közvetlenül nem lehet
Csinálsz egy másolatot az egyikről onnan kitörlöd az adatokat.
Ha ez megvan akkor a két számokat tartalmazó adatokat itt fogod összeadni.
Vagy csinalhatod úgyis hogy minden adat mellé beszúrász egy oszlopot ide bemasolod az értéket majd ezt egy következő oszlopban összeadod és ennek az eredménye lesz az első oszlopba beillesztve de csak mint értek ezután törlöd a másik 2 oszlopot.Bámulatos hol tart már a tudomány!
-
lappy
őstag
válasz hódmaci #45508 üzenetére
Alt + F11-el elő tudod hozni a kódot, dupla klikkel a Bal oldalon kiválasztod a Workbookot (ha esetleg ez magyar nyelvű lenne, akkor a Munkafüzetet), a fönti kis lenyíló ablakokban pedig kiválasztod a Workbook-ot illetve a BeforePrint eseményt.
Végül ennyi lesz maga a kód:
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Cancel = True
End SubBámulatos hol tart már a tudomány!
-
hódmaci
senior tag
Szuper köszönöm.
Bár ha valaki ismeri a trükköt akkor elég csak kitörölnie a sort.
Na de bőven jó így is. Sőt....Csak el ne felejtsem.
Ezt menteni csak Makróbarát kiterjesztéssel hagyta, "régebb"i excel verziók is tudják ezt a formátumot kezelni?
[ Szerkesztve ]
Hölgyeim! Azt tesszük a kirakatba ami eladó.:)
-
Fferi50
őstag
válasz Winner_hun #45512 üzenetére
Szia!
Mindkét munkalapot átmásolod a harmadik (összesítő) munkafüzetbe.
Ezután az összesítő lapon a két munkalapból képlettel tudsz összeadni, pl.
A1 cella ---> =Munka2!A1+Munka3!A1
Ez így húzható is lefelé és oldalra.
Majd kijelölöd az összesítő munkalap adattartományát, másolás - irányított beillesztés értéket ugyanoda.
A már nem szükséges átmásolt munkalapokat törlöd.
Hamarabb megvan, mint amennyi idő alatt elolvastad.
Üdv. -
Lokids
addikt
válasz Delila_1 #45500 üzenetére
Munkahelyen végre ki tudtam próbálni, de sajnos akárhogy próbálom EMPTY-vel tér vissza.
IttVan = Application.Match(Workbooks(MainWBName).Worksheets(s_wsName).Cells(sor, 1), Workbooks(FteWBName).Worksheet(1).Range("A:A"), 0)
If you chase two rabbits you will lose them both.
-
Fferi50
őstag
válasz Lokids #45514 üzenetére
Szia!
Talán ez lehet a probléma:
IttVan = Application.Match(Workbooks(MainWBName).Worksheets(s_wsName).Cells(sor, 1), Workbooks(FteWBName).Worksheet(1).Range("A:A"), 0)
Helyette:
IttVan = Application.Match(Workbooks(MainWBName).Worksheets(s_wsName).Cells(sor, 1), Workbooks(FteWBName).Worksheets(1).Range("A:A"), 0)
Üdv. -
lappy
őstag
válasz Winner_hun #45516 üzenetére
A következő módon tudod összehozni
Ha függvény kell majd hozzá.
Ha(szum>0;szum;"") így ha nulla az eredmény akkor nem fog látszik majd a nulla. A két " szóköz legyen.Bámulatos hol tart már a tudomány!
-
Fferi50
őstag
válasz Winner_hun #45516 üzenetére
Szia!
Ha már nincs képlet a cellákban csak az eredmény (átalakítottad értékké), akkor Ctrl F
Keres 0, Cserél üresen hagyod Egyebek - bejelölöd a Ha ez a teljes cella tartalma kockát.
Az összes cseréje.
Ha még a képleteid vannak, akkor az új képlet Ha függvény Lappy szerint, a két idézőjel (macskaköröm) között ne legyen semmi.
Üdv.[ Szerkesztve ]
-
daddy9
tag
Sziasztok!
Bocsi a béna kérdésért, de elakadtam.
Van egy folyamatom, amit megírtam Module1-ben egy SUB-ba. Ez alatt található ez a Function:Function Sheet_Exists(WorkSheet_Name As String) As Boolean
Dim Work_sheet As Worksheet
Sheet_Exists = False
For Each Work_sheet In ThisWorkbook.Worksheets
If Work_sheet.Name = WorkSheet_Name Then
Sheet_Exists = True
End If
Next
End Function
Ez ilyen formán rendben működik.A táblázatomban úgy szeretném használni ezt a folyamatot, hogy több másikkal együtt egy Userform-on helyezek el gombokat és azokkal indítom a fent már megírt folyamatot.
Ha a Formhoz kapcsoltan (View Code) egy gombra bemásolom a fent megírt SUB teljes kódját és odamásolom a Function-t is, akkor nem "látja" a SUB az oda bemásolt Function-t.
A kérdésem az lenne, hogy hogyan tudnám ezt a legegyszerűbben megoldani?
A másik, amire sajnos nem tudtam rájönni (nem olvastam ezek szerint még eleget), hogy egy Modulban megírt SUB-ot (vagy Function-s) hogyan tudok "meghívni" a Userform egy gombjával?A válaszokat előre is nagyon köszönöm!
[ Szerkesztve ]
-
Fferi50
őstag
válasz daddy9 #45520 üzenetére
Szia!
Először a második kérdésedre a válasz:
"egy Modulban megírt SUB-ot (vagy Function-s) hogyan tudok "meghívni" a Userform egy gombjával?"
Ha általános modulban vannak az eljárásaid, akkor egyszerűen az eljárás nevét kell megadnod, de használhatod a Modulnév.Eljárásnév formát is.sub Gomb_click
eljárásnév
end sub
A fentiekből következik, hogy nem kell a Userform kódlapjára átmásolnod a modulokban levő eljárásokat, ha használni szeretnéd azokat.
Egyébként mit jelent az, hogy nem látja a SUB a bemásolt Function-t? Mi a hibaüzenet?
Üdv. -
daddy9
tag
válasz Fferi50 #45521 üzenetére
Szia!
Sikerült meghívnom a Moduloknál megírt SUB-ot, így nagyban leegyszerűsödött a dolgom, csak a publikus változókkal kellett még gyors ismeretséget kötnöm, hogy minden jól működjön.
A hiba egyébként az volt, hogy egyszerűen amikor a Function-t használta volna a SUB, akkor szimplán átugrotta, viszont emiatt nem jött létre egy lapfül, amit a Function eredményétől függően (létezik-e már) hoztam volna létre.
Nagyon szépen köszönöm a segítséget! -
Lokids
addikt
Ismét szeretnék segítséget kérni, de ezúttal függvényekben.
Feltételes formázás lenne a cél:Van a korábban említett 1500 ember. Ezek mindegyike egy szervezeti egységhez (B oszlop) tartozik, amiből van mondjuk 40-50 darab. Továbbá mindegyik ember 100% (C oszlop, 1 ember 1 havi munkája = 100%), a lényeg, hogy színezni kellene azon emberek nevét (A oszlop), vagy az egész sort, akiknek a szervezeti egysége 80% feletti!
Azaz. ha egy szervezeti egység 10 embert tartalmaz, az ugye 100 * 10, azaz 1000%. Tehát, ha 800% feletti.pl:
Ádám V01 100%
Béla V02 100%
Éva V01 50%
Géza V03 70%
Peti V02 90%Ha jól sejtem, meg kell számoltatni, hogy 1 szervezeti egység hány embert tartalmaz, ezt felszorozni 100-al. Majd összeadni ezen emberek %-át, és utána elosztani őket. Emberek% / teljes% > 0.8 akkor színezés
Azt nem tudom, hogy tudunk megszámoltatni minden egyes szervezeti egységet/embert, hogy utána az eredményét lehessen szorozni/osztani.
If you chase two rabbits you will lose them both.
-
Lokids
addikt
válasz Fferi50 #45526 üzenetére
Arra sajna nem jöttem rá. Akár hogy próbáltam, folyamatosan empty-vel tért vissza.
Próbáltam .Value-t is, hátha értékkel menni fog, de úgy se.
Köszi a képletet. El is felejtettem, hogy létezik SUMHA. Utána kell néznem mit csinál.If you chase two rabbits you will lose them both.
-
chigisch
újonc
Sziasztok!
Elakadtam, szépen kérlek segítsetek!
Adott egy munkalap Munka2 és Munka3
lapja. A Munka2 lapon vannak a kivitelek cikkszámonként, a Munka3 lapon pedig a cikkszámonkénti alapanyag lista, az alapanyag cikkszámokkal. A Munka2 lapon göngyölítem a kiviteli cikkszámok alapján az alapanyag felhasználást.
Amit nem tudok megoldani, hogy ha a Munka2 lapon bírom a késztermék cikkszámát (függőleges oszlop), akkor a vízszintes sorban szereplő alapanyag cikkszámokhoz beírja a Munka3 lapon szereplő normáknak megfelelő anyagszükségletet....
Ez a két munkalap közötti átjárás nagyon nem akar sikerülni!
Köszönöm szépen! Szia![ Szerkesztve ]
-
chigisch
újonc
Az 1 táblán a göngyölítést a HA(C6="" ;"" ;SZUM(C$5:C6)) függvénnyel csinálom, a 2. Táblán is ugyanúgy szeretném, de ott bekavar az alapanyag szükséglet.
Ha a c oszlopba beírom pl. 3398.006.836 cikkszámot, akkor a 3.táblának megfelelően a 2.sorban szereplő alapanyag cikkszámokhoz kellene értéket adnia az adott sorban. -
Lokids
addikt
válasz Fferi50 #45532 üzenetére
Nyert. Elnéztem, hogy amit próbára beírtam, az hány sorból áll. Persze, hogy nem találja meg, ha nem töltöm fel mind. Jesszus. Nem is tudom, hogy tudtam így benézni. Ez a napi 5-6 óra alvás megárt az embernek.
[ Szerkesztve ]
If you chase two rabbits you will lose them both.
-
Lokids
addikt
A feltételes formázás tud olyant, hogy ha egy cella színe sárga ÉS módosítják, akkor állítsa vissza fehérre?
If you chase two rabbits you will lose them both.
-
Lokids
addikt
Nem így értem.
Macroval hozom létre a WB-t és másolok/állítok be rajta mindent.
Viszont ennek a ws change makrónak a létrehozott WB-n kell futnia.
Az a cél, hogy egy gombra rányomva majd az asszisztens kislány is képes legyen előállítani. Ő nem fog utólag a létrehozott excelbe makrót illeszteni.
Ezért kérdem, hogy makróval hogyan tudok makrót illeszteni egy létrehozott WB-be.If you chase two rabbits you will lose them both.
-
Fferi50
őstag
válasz Lokids #45540 üzenetére
Szia!
"Viszont ennek a ws change makrónak a létrehozott WB-n kell futnia."
Úgy érted, hogy amikor bezárják és újra megnyitják, akkor a "saját" makrója fusson?"makróval hogyan tudok makrót illeszteni egy létrehozott WB-be"
Elvileg lehet a VB projektben makróval makrókat módosítani, újakat beleírni, törölni stb. DE nem javasolt - bármelyik vírusírtó veszélyesnek ítélheti és kigyomlálhatja - és nem is egyszerű.
Megoldható például úgy, hogy mented az alap munkafüzetet más néven, kitörlöd belőle azokat a munkalapokat, amelyek nem kellenek bele, hozzáadod az újakat, formázod stb.
A mentéssel mentődnek a makrók is - természetesen makróbarát vagy bináris munkafüzetként kell menteni. Mindezt megteheted az alap munkafüzet makróiból.
Ráadásul mivel más néven mented, az eredeti mindig megmarad és újra felhasználható.
Aztán lehet sablont is létrehozni, amiben benne vannak a makrók és az új munkafüzetet a sablonból megnyitni.
Üdv.
Mentsd -
Fferi50
őstag
válasz Lokids #45535 üzenetére
Szia!
Ha cella egy feltétel teljesülése miatt sárga, akkor a benne levő érték módosítása esetén továbbra is a feltételnek megfelelően fog színeződni. Ha megfelel a feltételnek, marad sárga, ha nem felel meg, akkor visszaáll az alapszín.
Ha egy cellánál az érték változtatást szeretnéd színnel is jelölni, ahhoz viszont makró kell.
Üdv. -
Lokids
addikt
válasz Fferi50 #45541 üzenetére
Márpedig azt kell, hogy a makró írjon makrót a létrehozott munkafüzetbe.
Csak azt a fenti 3 sort kéne hozzáadni. Hogy mikor létrehozta az új munkafüzetet és elküldi mailen akárkinek, akkor ott a másik végén megnyitva ezt, már úgy működjön, hogy átszínezze fehérre a módosított cellákat. És nem opció, hogy a mail küldés előtt manuálisan beleírjam.If you chase two rabbits you will lose them both.
-
Fferi50
őstag
válasz Lokids #45543 üzenetére
Szia!
Az miért nem opció, hogy abban a munkafüzetben, amiből létrehozod az újat, van egy olyan munkalap, amiben már benne van ez az eseménykezelő makró a munkalap kódlapján. Ezt a munkalapot másolod át új munkafüzetbe és küldöd el - persze makróbarátként?
Egyébként az is megoldható, hogy nálad ne fusson le ez a "fehérítés", csak ott amikor használják.
Üdv.[ Szerkesztve ]
-
Fferi50
őstag
válasz Fferi50 #45544 üzenetére
Szia!
Ebben a fájlban
az ujlap makró a Munka1 munkalapot kimásolja egy új munkafüzetbe.
A Munka1 munkalapon nem színezi a cellákat változáskor, de a létrehozott új munkafüzetben a megnyitás után igen.
(Megjegyzés: most pirosra színezi, mert nem sárga a cella és a colorindex=0 esetén nem látszik a változás.)
Kicsit várj a letöltéssel, mert még víruskergetés folyik odafenn a Data.hu-n.
Üdv.[ Szerkesztve ]
-
Lokids
addikt
válasz Fferi50 #45544 üzenetére
Sajnos az sem.
Viszont megvan a megoldás!!!codeString = " Target.Interior.ColorIndex = 0"
With ActiveWorkbook.VBProject.VBComponents(newSheet.CodeName).CodeModule .CreateEventProc "Change", "Worksheet" .InsertLines .ProcBodyLine("Worksheet_Change", 0) + 1, codeString End With
Ez hozzáadja azt az 1 sort. Működik rendesen.
[ Szerkesztve ]
If you chase two rabbits you will lose them both.
-
Pakliman
tag
válasz Lokids #45540 üzenetére
Szia!
Private Sub Kód_írása_programból()
Dim c As Long
'Új munkafüzet létrehozása
Workbooks.Add
c = Application.VBE.ActiveVBProject.VBComponents("ThisWorkbook").CodeModule.CountOfLines
'Az új munkafüzetbe beírunk egy kódot!!!
With Application.VBE.ActiveVBProject.VBComponents("ThisWorkbook").CodeModule
.InsertLines c + 1, "'Ezeket a sorokat programból hoztuk létre!!"
.InsertLines c + 2, "Private Sub Workbook_BeforeClose(Cancel As Boolean)"
.InsertLines c + 4, "End Sub"
End With
End SubItt egy részletes és "teljesen érthető" leírás.
Én is ebből (is) tanulgattam. -
szricsi_0917
tag
Sziasztok
Segítséget szeretnék kérni.
Van egy excel fájl aminek az indítása után elméletileg nem jelenne meg a táblázat hanem azonnal egy userformot indít, de sajnos az indításnál feldobja a biztonsági figyelmeztetést, hogy letíltotta a makrókat. Van erre mód, hogy csak ennél az excel táblázatnál ne vegye figyelembe ezeket a biztonsági beállításokat? -
Cicero
őstag
Sziasztok! Ötletre lenne szükségem a következővel:
adott egy táblázat, aminek az A oszlopában minden sorhoz egyedi azonosító tartozik. A sor B oszlopában szöveg van, ami ismétlődhet a sorokban.
A C oszlopban szeretném összegyűjteni, hogy az adott sor B cellájának a szövege hol ismétlődik, az A cella egyedi azonosítók felsorolásával. Tehát valahogy így szeretném:
A B C
1 alma 1, 3, 5
2 körte 2
3 alma 1, 3, 5
4 narancs 4
5 alma 1, 3, 5
Új hozzászólás Aktív témák
- Samsung Galaxy Z Flip5 - ami kint, az van bent
- AMD Ryzen 9 / 7 / 5 / 3 5***(X) "Zen 3" (AM4)
- HiFi műszaki szemmel - sztereó hangrendszerek
- Androidos fejegységek
- Linux - haladóknak
- Kodi és kiegészítői magyar nyelvű online tartalmakhoz (Linux, Windows)
- War Thunder - MMO Combat Game
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- Parfüm topik
- Motorola Moto G24 Power - hol van az erő?
- További aktív témák...
- Windows, Office licencek a legolcsóbban, egyenesen a Microsoft-tól - 2990 Ft-tól!
- Steames kulcsok jó áron eladóak!
- Warhammer Online - Age of Reckoning (DE) Collectors Box (Figurával!)
- Adobe Creative Cloud - 2024. 04. 05 - 2025. 04. 05-ig
- PC JÁTÉKOK (OLCSÓ STEAM, EA , UPLAY KULCSOK ÉS SOKMINDEN MÁS IS 100% GARANCIA )