- Samsung Galaxy Watch (Tizen és Wear OS) ingyenes számlapok, kupon kódok
- Apple iPhone 14 Pro Max - sziget fesztivál
- iPhone topik
- MIUI / HyperOS topik
- Samsung Galaxy Fit 3 - keveset, de jól
- Samsung Galaxy S23 Ultra - non plus ultra
- Xiaomi 14 - párátlanul jó lehetne
- Redmi Note 12 4G - valaki fizetni fog
- Milyen okostelefont vegyek?
- Samsung Galaxy S24 - nos, Exynos
Hirdetés
-
SGF24 - Remekül fest a Phantom Blade Zero
gp A Summer Game Fest utolsó játéka nem más volt mint a PC-re és PS5-re készülő játék, amelyhez még mindig nem kaptunk megjelenési dátumot.
-
Filléres Redmi érkezett
ma Az A3x nem kapott nagy bemutatót, egyszer csak felbukkant.
-
Spyra: nagynyomású, akkus, automata vízipuska
lo Type-C port, egy töltéssel 2200 lövés, több, mint 2 kg-os súly, automata víz felszívás... Start the epic! :)
-
Mobilarena
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
-
csferke
senior tag
Sziasztok!
Nem tudok rájönni, hogy hogyan könnyíthetném meg a képlet beírását.
Elkezdem beírni a képletet, lefelé nyil és kiválasztom a parancsszót amit szeretnék.
Most mit kell megnyomnom, hogy eljussak ide (ne kelljen végig bepötyögni a parancsszót) és folytatni lehessen a paraméterek megadását??köszi
[ Szerkesztve ]
-
csferke
senior tag
Sziasztok!
Itt megakadtam
Szeretném a táblázat C oszlopát Feltételes formázással (Conditional Formatting) színezni, Top10 és Botton10, az A oszlop értékei alapján.
Angol Excel 2007köszi
-
csferke
senior tag
-
csferke
senior tag
válasz Delila_1 #36868 üzenetére
Szia Delila!
Kijelölöd a C oszlop formázandó celláit. A feltételes formázás a 10 legnagyobb értékhez=$A2>=NAGY($A$2:$A$100;10)
Amikor Apply-t nyomok akkor a beírt kódot átírja a kijelölt tartományra a C oszlopban. Igaz, mivel angol Excel 2007, a Nagy-ot átírtam Top-ra.
Az A oszlopban a vizsgált tartomány($A$8:$A$19;$A$22:$A$91)
és a C oszlop ugyanazon tartományát kellene színezni($C$8:$C$19;$C$22:$C$91)
köszi[ Szerkesztve ]
-
csferke
senior tag
Sziasztok!
Megakadtam modernizálódás közben.
Eddig a HD-n Win7 32bit Office 2007 páros volt, mindkettő angol. Excel-ben a munkafüzeteim munkalapjain több vezérlőgomb van elhelyezve. Ezekre kattintva lefutott a hozzájuk rendelt macró (VBA kód).Beújítottam egy SSD-re. Erre felkerült a Win7 64bit és ismét az Office 2007, mindkettő angol.
Ha innen nyitom meg a munkafüzeteket akkor a "gombokra" hiába kattintok, nem indulnak el a macrók. VBA editor-ban ott vannak. ALT+F8, innen lehet indítani és le is fut a kód.
Munkafüzet beolvasásakor az auto_open macró lefut.Már turkálok napok óta a win, office és excel beállításaiban de nem sikerült megoldanom a problémát. Mivel a HD és SSD is a gépben van, ugrálok egyik rendszerből a másikba és próbálom megtalálni a különbséget a beállításokban.
Ja, a munkafüzetek továbbra is a HD-n vannak (G:\Google Drive\xyz...). HD vagy SSD esetén is az op.rendszer a C:\-n fut.Homályosítsatok fel, hogy hogyan tudnám ezt megoldani.
köszi
[ Szerkesztve ]
-
csferke
senior tag
válasz Delila_1 #36887 üzenetére
Szia!
Gombon jobb klikk, Makró-hozzárendelés. A feljövő listából kiválasztod a megfelelő makrót, OK.
Na ez nem működött. Sőt nem lehetett új ActiveX gombokat kirakni sem.AZ AGYAMAT ELDOBOM !!
Jelezte a win, hogy szeretne valamiket frissíteni (win, office ...). Nem szívesen, de engedtem. És láss csodát, mindenféle "trükközés" nélkül mostmár futnak a gombokhoz rendelt macrók -
csferke
senior tag
Sziasztok!
Két kérdésem lenne az alábbi kód-al kapcsolatban.Sub utvonal()
Dim PathName As String
PathName = Left((ActiveWorkbook.Name), (Len((ActiveWorkbook.Name)) - 5))
MsgBox PathName
ChDrive "G"
ChDir "g:\Google Drive\TRANSPORT\" & PathName
MsgBox ActiveWorkbook.Path
End Sub1. A létrehozott PathName változót hogyan lehet Public-nak definiálni, hogy másik macró is tudja értelmezni, használni?
2. A ChDir végére hogyan kell odailleszteni a PathName-t, hogy működjön is.
Angol Excel 2007
köszi
[ Szerkesztve ]
-
csferke
senior tag
válasz Fferi50 #36922 üzenetére
Szia!
Az 1.-re adott válaszod OK. Köszi.A 2.-ban viszont a PathName nevet én adtam (az aktív munkafüzet neve, kiterjesztés nélkül)
PathName = Left((ActiveWorkbook.Name), (Len((ActiveWorkbook.Name)) - 5))
és ez alapján kellene meghatározni/megváltoztatni a mappát (elérési útvonalat) ahová majd szeretnék adatokat kiíratni ChDir amely nem ugyanaz mint az aktuális mappa.ChDir "g:\Google Drive\TRANSPORT\" & PathName
üdv
[ Szerkesztve ]
-
csferke
senior tag
válasz Fferi50 #36924 üzenetére
Szia!
Igen, vannak almappák a Transport mappában.ChDir "g:\Google Drive\TRANSPORT\"
Mivel több munkafüzetem is dolgozik a rendszerben így a megnyitásukkor egy HovaMenteniMappa makróval szeretném megadni, hogy a megfelelő almappába kerüljenek a kiíratások.Tehát a kiírás helye
ChDir "g:\Google Drive\TRANSPORT\"+PathName
A PathName-t itt határozom meg az éppen aktuális/megnyitott munkafüzet neve alapján
PathName = Left((ActiveWorkbook.Name), (Len((ActiveWorkbook.Name)) - 5))
Ha így adom meg, fixen
ChDir "g:\Google Drive\TRANSPORT\MappaNeve"
akkor tökéletesen firkál a MappaNeve-be de ez változó kellene, hogy legyen az ActiveWorkbook.Name => PathName alapján.üdv
[ Szerkesztve ]
-
csferke
senior tag
Sziasztok!
Ez egyébként is egy "DOS-os" dolog, akkor használd, ha nosztalgiázni van kedved
Ezzel "jegelem" is az elképzelésemet. Egyébként sem kellene napi szinten de majd odafigyelek, hogy mit/mikor hová íratok.Pakliman & Fferi50
[ Szerkesztve ]
-
csferke
senior tag
válasz csoki46 #37557 üzenetére
Szia!
Ezt nagyjából sikerült megoldanom, viszont a gond, hogy kérdés nélkül felülírja a korábbi fájlt, ha ugyan azt az értéket írom be a C1-be.Sz.tem ne a C1 legyen a pdf neve.
Pl. AA-ban C1+dátum (vagy C1+dátum&time) és ez legyen a pdf neve. Így mindig egyedi lesz az elnevezés. -
csferke
senior tag
Sziasztok!
Egy munkalap (Kimutatás) bizonyos cellájába a Lista munkalapon lévő adatot szeretném megjeleníteni.
=Lista!$A$2:$A$200
Itt azonban szerepelnek ugyanazok az elnevezések az A oszlopban. Megkülönböztetni ezeket a B és C oszlop adatai alapján lehet. A->elnevezés B->csomagolás mérete (50, 75, 100 ...) C->mértékegység.Azt szeretném, hogy a legördülőben látható legyen az A, B, C oszlop tartalma.
Ezt hogyan lehet kivitelezni?
Angol Excel 2007köszi
-
csferke
senior tag
Sziasztok!
Ismét elakadtam.
B14 képlete=IF(ISBLANK(A14);;VLOOKUP(A14;Pesticidi!A:E;2;0))
Ha az A14 üres akkor nem kellene semmit tennie. Nem is tesz CSAK kiírja, hogy #N/A.
Régebben egy másik munkafüzetben kiküszöböltem, hogy ne jelenjen meg ez a hibajelentés de most sehogy sem sikerül megtalálnom a megoldást/beállítást.
Segítségre lenne szükségem.üdv
[ Szerkesztve ]
-
csferke
senior tag
Sziasztok!
Mennyire bonyolult képletet lehet megadni, hogy makróbol betegye 1 cellába?
Ezt "megeszi"Range("A13").Formula = "=A11+B11"
de ezt már nem
Range("A13").Formula = "=IF(ISBLANK($G11);"";VLOOKUP($G11;Pesticidi!$A:$F;2;0))"
Mi lehet a megoldás?
üdv, köszi
[ Szerkesztve ]
-
csferke
senior tag
Sziasztok!
#lappy used in VBE """"
#Delila Pontosvesszők helyett vesszőket írj!Köszi. E kettőnek a kombinációja lett a jó.
[ Szerkesztve ]
-
csferke
senior tag
Sziasztok!
Az alábbi kóddal az E oszlop éppen kiválasztott cellájába szeretnék adatot felvenni DE CSAK NAGYBETŰ mehet a cellába.
Az is megoldás lenne ha az egész E oszlopot le lehetne formázni NAGYBETŰS-re.Sub bevitel()
Dim xpos, ypos, Prompt, Title, Default, MyValue
Prompt = ""
Title = "ADATBEVITEL"
xpos = 5000
ypos = 5800
ActiveCell.Offset(0, 1).Select
Default = ""
Prompt = "Pesticid felhasználhatósága" + (Chr(13)) + (Chr(13)) + "H - RR - F - I - A - R - L - N - O"
MyValue = InputBox(Prompt, Title, Default, xpos, ypos)
ActiveCell = MyValue
End SubMi a legegyszerűbb megoldás arra, hogy az E oszlop celláiba csak ezeket a betűket lehessen megadni H, RR, F, I, A, R, L, N, O ?
Segítséget kérek.
köszi
-
csferke
senior tag
Sziasztok!
Fferivel egyetértve a legegyszerűbb megoldás a data validation (érvényesítés), mert ahhoz nem kell makrót írni.
Igazatok van. Ezt alkalmaztam.Köszi mindkettőtöknek
-
csferke
senior tag
Sziasztok!
Egy kicsit "regény" formátumban fogalmaztam meg a kérdésemet. Remélem, hogy értelmezhető.Sub ÚjTétel()
Sheets("Eladás").Select
Range("G9").Select
Selection.End(xlDown).Select
ActiveCell.Offset(1, 0).Select
Default = ""
Prompt = "A kiadott árú kódja"
MyValue = InputBox(Prompt, Title, Default, xpos, ypos)
'*******************************
' a kódot a Sheets("Áru") "A" oszlopában kell kell keresni a MyValue alapján
' IF kódot nem találta
' msgbox "Ezzel a kóddal "&MyValue&" nem találtam árút"
' exitsub
' endif
'*******************************
ActiveCell = MyValue
End SubA csillagozott sorok közötti részre kellene megoldás a segítségetekkel.
Köszi, üdv
[ Szerkesztve ]
-
csferke
senior tag
Sziasztok!
Szeretnék ugyanabban a "környezet"-ben dolgozni a laptopomon mint az asztali gépemen. Az asztalin ugyebár van egy csomó beállítás amit a z Excel biztosan tárol valahol egy sablon fájl-ban, mint a Word a Normal.dotx-ben és elég ezt átvinni az új helyre, hogy a megszokott környezet/beállítások legyenek.
Van ilyen az Excel-ben?
Hol találom ezt az Excel "sablon"-t?
Angol Excel 2007.üdv, köszi
-
csferke
senior tag
Szevasztok!
fName = Range("L1")
az L1-be ez a képlet=YEAR(A3)&"-"&TEXT(MONTH(A3);"0#")
, akkor OK, elfogadja fName-nak a makró isHa viszont makróban ezt írom be
fName=YEAR(A3)&"-"&TEXT(MONTH(A3);"0#")
akkor hibával elszállnem látom a hibát
[ Szerkesztve ]
-
csferke
senior tag
Sziasztok!
Ezt a tömbképletet szeretném ellátni még 1 feltétellel=IF(SUM((MONTH('PK2'!A$5:A500)=D74*1)*('PK2'!D$5:D500))=0;"";SUM((MONTH('PK2'!A$5:A500)=D74*1)*('PK2'!D$5:D500)))
D74=1 (január) és majd folytatódik decemberig (D75, D76...)
Szeretném összeadni a PK2 lapfülön lévőPK2!D$5:D500
oszlop értékeit ha aPK2!A$5:A500
oszlop értéke megegyezik D74 tartalmával (1=>január) és haPK2!E$5:E500
oszlop "b"-t tartalmazRemélem sikerült érthetően megfogalmaznom
köszi
[ Szerkesztve ]
-
csferke
senior tag
szumha képlet nem lett volna egyszerűbb?
Talán igen. De mivel a képletek előre be vannak írva a össz 12 hónaphoz és ha nincs értékelhető adat akkor hibajelzést ír a mezőbe.
Ez a tömbképlet azt is vizsgálja, hogy van-e értékelhető adat és ha nincs akkor üresen hagyja a mezőt.Tehát továbbra is várok 1 megoldást tőletek.
köszi
-
csferke
senior tag
Sziasztok!
1x már próbálkoztam itt, de nem jött összeEzt a tömbképletet szeretném kibővíteni még 1 feltétellel.
Csak azok az értékeket kell összeadni (PK2 D oszlop) amelyek megfelelnek annak a feltételnek is, hogy a PK2 munkalap E oszlopában a "b" betű szerepel.=IF(SUM((MONTH('Pk2'!A$5:A500)=D74*1)*('Pk2'!D$5:D500))=0;"";SUM((MONTH('Pk2'!A$5:A500)=D74*1)*('Pk2'!D$5:D500)))
Segítségeteket kérem.
köszi[ Szerkesztve ]
-
csferke
senior tag
Heló Mutt & Fferi50 !
Fferi50 második megoldása B => E oszlop és Mutt 1. képlete megegyezik és tökéletesen működik.
Mutt tanácsára változtattam a cella számformátumán, de mint később kiderült, felesleges volt mert úgy látszik, hogy a tömbképlet ez az egyszerűsített változata
=SUM((MONTH('Pk2'!A$5:A500)=D74*1)*('Pk2'!D$5:D500)*('Pk2'!E$5:E500="b"))
nem jelez hibát amikor null a cella értéke.Köszi mindkettőtöknek !
[ Szerkesztve ]
-
csferke
senior tag
Sziasztok!
Sehogyan sem sikerül összehoznom egy feltételes formázás képletét.Egy oszlopban (J) dátumok vannak. Azt szeretném, hogy kiszínezzem ebben az oszlopban, azt a mezőt amelyben 10 évnél régebbi a dátum a mai dátumtól (csak az éveket figyelembe véve).
Segítségeteket kérem.
köszi, üdv
[ Szerkesztve ]
-
csferke
senior tag
Sziasztok!
A segítségeteket kérem a következőhöz.
Egy cellában szeretném megjeleníteni a következőt. Szöveg+üres hely+aktuális munkafüzet neve, kiterjesztés nélkül. A munkafüzet neve mindig egy évszám pl.2018. Tehát Szöveg 2018
Az alatta levő cellában pedig Szöveg + üres hely + aktuális munkafüzet neve+1, kiterjesztés nélkül. Tehát Szöveg 2019Angol Excel 2007
köszönöm -
csferke
senior tag
válasz Delila_1 #39818 üzenetére
Delila, köszi.
Elsősorban ez nekem Angol Excel 2007-hez kellene.
A Workbook neve pl. 2018
E19 cellába ezt szeretném, szöveg+Workbook name - Leltár erre az évre 2018
E20 cellában viszont ezt szöveg+Workbook name+1 - Leltár a következő évre 2019De ha már az E19-es cella megoldódik akkor azzal is meg leszek elégedve
[ Szerkesztve ]
-
csferke
senior tag
Sziasztok!
Próbálgatom a Google Drive Táblázatok-at és lenne pár kérdésem. Később biztosan még több is.1. Hol lehet megadni, hogy Enter után lépjen/ne lépjen, hova lépjen a cella kijelölő? Most Enter után lefelé lép 1-et. Azt szeretném ha balra lépne vagy ha ezt nem lehet akkor sehova se lépjen.
2. Ne jelenítse meg a 0-át (nulla) ha a számítás eredménye nulla. Pl. ha a D3 cella =B3*C3 és ez a képlet végigfut egészen a D50-es celláig. Ha vannak üres sorok is akkor a D oszlopba beleírja a nullát. Ezt szeretném elkerülni.
köszi
-
csferke
senior tag
Sziasztok!
Hogyan tudnám a következőt kivitelezni?
Adott egy munkafüzet (pl. Book1) több munkalappal (pl. Sheet1, Sheet2, Sheet3...). Az újraszámítás automatikus-ra van állítva. Addig amíg nem történik semmi változás rajta, addig nincs újraszámolás.Azt szeretném, hogy ha bármikor kiválasztódik/aktiválódik pl. a Sheet1 akkor automatikusan újraszámolódjon (F9) ez a lap.
köszi a segítséget
Angol Excel 2007
-
csferke
senior tag
Sziasztok!
Egy feltételes számítást szeretnék végezni időegységgel (óó:pp)
G9 - munka kezdete
G10 - munka vége
G13 - pihenő
G18 - munkaidő
Eddig így számítódott G18 = G10 - (G9 + G13) ám most egy újabb feltétel is előjött.Nevezetesen ha a G13 nagyobb mint 00:45 akkor a G18 eredményben a 00:45 feletti időt bele kell számítani a munkaidőbe.
Valahogy így G18 = If(G13>00:45; G10-(G9+(G13-00:45)); G10-(G9+G13)) csak felakadtam az óó:pp (00:45) feltétel megadásánál.Ebben kérném a segítségetek.
köszi
[ Szerkesztve ]
-
csferke
senior tag
Ez lemaradtAngol Excel 2007
-
csferke
senior tag
Sziasztok!
Meg lehet-e oldani, hogy nagybetűkké alakítom a kisbetűket, egy macróban?Egy bizonyos cella tartalmát veszem Name=ActiveCell.Value amely ilyen formában van Xxxxx
Hivatkozok rá Prompt=Name....... ugye most itt is Xxxx a formátum.
Azt szeretném, hogy az InputBox-ban lévő Prompt nagybetűs legyen, XXXXX formában jelenjen meg. Az eredeti cella tartalma ne változzon.Name = ActiveCell.Value
Prompt = Name ........
MyValue = InputBox(Prompt, Title, Default, xpos, ypos)köszi
[ Szerkesztve ]
-
csferke
senior tag
Ez mindig lemarad. Angol Excel 2007 -
csferke
senior tag
Sziasztok!
Dátum bevitellel kapcsolatban, én ezt használom Pop-up Calendar
Igaz nem tudom, hogy iOS-on működik-e.[ Szerkesztve ]
-
csferke
senior tag
Sziasztok!
1.
Egy mezőben (N23) van egy képlet=VLOOKUP(I5;Kupci!A:N;14;0)
Azt szeretném elérni, hogy ha ez a keresés üres mezőt eredményez (nincs benne adat) akkor jelezze hanggal és színezze pl. pirosra az N23 mezőt.
Átlépve a Kupci fülre kitöltöm a hiányzó adatot akkor töltse ki az N23-at z adattal és szűnjön meg piros színezés.
2.
A Kupci fül 14. (N) oszlopában számok vannak. Van ami 0 (nullával) kezdődik és nem mindig azonos hosszúságú számsorból áll. Hogyan kell formáznom az N oszlopot, hogy benyelje az ilyen adatokat? Később ezekkel a számokkal nem végzek számítást csak meg kell jelenítenem.
köszi
Angol Excel 2007
Új hozzászólás Aktív témák
- Luck Dragon: Asszociációs játék. :)
- Alkoholista nevelde
- Nem a Microsoft gyártaná a következő Xbox konzolokat?
- Dell notebook topic
- Külpolitika
- Samsung Galaxy Watch (Tizen és Wear OS) ingyenes számlapok, kupon kódok
- Nem tudom a dal címét, előadóját
- PlayStation 5
- Xbox Series X|S
- Formula-1
- További aktív témák...
- Bitdefender Total Security 3év/3eszköz! - "Tökéletes védelem most kedvező áron..."
- Eladó Steam kulcsok kedvező áron!
- PC JÁTÉKOK (OLCSÓ STEAM, EA , UPLAY KULCSOK ÉS SOKMINDEN MÁS IS 100% GARANCIA )
- Canva Pro előfizetés - 1 éves
- Windows, Office licencek a legolcsóbban, egyenesen a Microsoft-tól - 2990 Ft-tól!
- Windows Server 2016, 2019, 2022 Standard, Datacenter, Essentials termékkulcsok - MEGA akció!
- GameStar / PC Guru játékmellékletek tokkal és borítóval 500Ft/db
- AVATAR: Frontiers of Pandora
- Vírusirtó, Antivirus, VPN licenckulcsok - kedvezményes ajánlatok (frissítve: 2024. 05. 01.)
- Windows 7 Home Premium, Pro, Ultimate és Windows 8, 8.1 Pro licenckulcsok 64, 32 bit - MEGA Akció!
Állásajánlatok
Cég: Ozeki Kft.
Város: Debrecen