- D1Rect: Nagy "hülyétkapokazapróktól" topik
- sziku69: Szólánc.
- sziku69: Fűzzük össze a szavakat :)
- Luck Dragon: Asszociációs játék. :)
- Sub-ZeRo: Euro Truck Simulator 2 & American Truck Simulator 1 (esetleg 2 majd, ha lesz) :)
- gban: Ingyen kellene, de tegnapra
- LordAthis: Ismét egy "Idióta" A.I. Projekt, hogy meglovagolja az aktuális trendeket...
- Ndruu: Segíts kereshetővé tenni a PH-s arcképeket!
- btz: Internet fejlesztés országosan!
- bambano: Bambanő háza tája
-
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
-
Mutt
senior tag
válasz
bandus
#19898
üzenetére
Hello,
Használd ezt a függvényt, amely a hét kezdetét adja vissza (ha nem hétfővel akarod kezdeni akkor a vbMonday-t módosítsd a kívántra).
Function HetiDatum(ev As Long, het As Long) As Date
'előállítjuk a megadott év január 1-ét, majd korrigáljuk a legközelebbi hétfőre és hozzádjuk az eltelt napokat
HetiDatum = DateSerial(ev, 1, 1) - (Weekday(DateSerial(ev, 1, 1), vbMonday) - 1) + (het - 1) * 7
End FunctionA többi napot megkapod ha 1-et, 2-öt stb adsz hozzá.
üdv
-
válasz
Delila_1
#19897
üzenetére
igen, de az akkor lenne jó, ha ugyanarra a cellára alkalmaznék több esetet. mindegy végülis, megoldottam if-fel, jól működik így is.
a másik dolog, amivel gondban vagyok az a dátumok kezelése vba alól. cask az év és a hét száma van meg, ebből kellene 7 cellába legenerálnom az adott héthez tartozó 7 db dátumot, de nem akar sehogysem összejönni, pedig a google is a barátom, de valahogy nem sikerül a dolog
ebben tudna-e valaki segíteni?
leginkább a szokásos yyyy.mm.dd. formátumban kellene a dolog.
-
sziasztok!
2*X db cellára vizsgálok egy feltételt, páronként, amely ha igaz, akkor meghívásra kerül egy 3 db paraméterrel rendelkező függvény. minden cellapár esetén más paraméterekkel kellene ezt a fv-t meghívni. van-e erre valami egyszerű lehetőség, vagy minden cellapárra külön írjak egy if parancsot?
egy for ciklussal egyszerű megoldani, hogy nézze meg a feltételt a cellapárokra, más kérdés, hogy a változó paramétereket itt hogyan lehetne alkalmazni. remélem érthetően sikerült feltennem a kérdést
-
#19893
lappy
őstag
the radish
#19892
lappy
őstag
válasz
the radish
#19892
üzenetére
megoldás erre, ami akár negatív, akár pozitiv érték és ha közben van üres cella is
=INDIREKT(CÍM(HA(HOL.VAN(-100000000;E:E;-1)>HOL.VAN(0;E:E;-1);HOL.VAN(-100000000;E:E;-1);HOL.VAN(0;E:E;-1));5))
ahol E az ötödik oszlop, amiben keresünk.
-
#19892
the radish
senior tag
the radish
senior tag
Sziasztok!
Szeretném, ha egy cella tartalma egy másik munkalap, mondjuk "A" oszlopának az utolsó, adatot tartalmazó celláéval legyen azonos. Persze az említett "A" oszlop adatai változnak, hol több, hol kevesebb sort tartalmaz, de mindig a legutolsó adat kellene.
Előre is köszönöm.
-
#19891
dugandorges
újonc
dugandorges
újonc
Sziasztok,
van-e arra mód, hogy egy grafikon esetében adott napokat adott színnel jelenítsen meg automatikusan a kimutatás.
Tehát adva van egy adatbázis, ahol mindig frissítve vannak az adatok, és a lejáró napok szerint a hétvége más színű oszlop, mint a hétköznap. Ezt én manuálisan szoktam átállítgatni mindig, de roppant boldog lennék, ha ezt be lehetne állítani, és tudná magától
-
Kobe
veterán
A B oszlopban egy kalkulált dátum van mm/dd/yyyy formátumban, illetve van ahol egy szöveg, amit bizonyos sorokra a dátum helyett ír be a makró (XYZ) más feltételek alapján. Az lenne a lényeg, hogy törölje azokat a sorokat, ahol valami XYZ től eltérő szöveges érték, vagy a (mai nap + X) dátumon túli dátum van benne.
Mivel egy elég komplex makróról van szó, gyanítom akkor elég sok helyen át kell írni ezeket. Van egy menü, egy űrlap, ahol a user beadja az X értékét, úgy emlékszem ott is annak a rublikának az értéke
Format(Now + Menu.TextBoxDaysAfter.Value, "mm/dd/yyyy")
ként van definiálva, akkor ott is át kéne írni date diffre ?
-
Mutt
senior tag
Hello,
1. A B-oszlopban a dátum van vagy "XYZ"?
Az IF részben egyszer szöveget, keresel másszor dátumot.
2. A Format-os rész Datediff függvénnyel helyettesítendő.
3. Now helyett Date adja meg az aktuális dátumot.
4. Hátulról kell kezdeni a tőrlést.
5. Select-et érdemes mellőzni.Itt az én változatom (A-oszlopban dátum, B-ben szöveg):
If Menu.CheckBoxDateRangeFilter.Value = True Then
lastrow = Cells.Find(what:="*", searchorder:=xlByRows, searchdirection:=xlPrevious).Row
Do
If (Cells(lastrow, "B").Value <> "" And Cells(lastrow, "B").Value <> "XYZ") _
Or DateDiff("d", Date, Cells(lastrow, "A").Value) > Menu.TextBoxDaysAfter.Value Then
Rows(lastrow).Delete
End If
lastrow = lastrow - 1
Loop Until lastrow = 1
End IfAmi nem volt tiszta, hogy igazából mely sorokat kell törölni, a fenti kód azokat tőrli ahol
- van szöveg a B-ben és az nem XYZ (üres szöveges sorokat meghagyja)
- és ahol a dátum kívül van a megadott napokon.üdv.
-
-
Kobe
veterán
sziasztok
kellene egy kis segitseg, egy makro debuggolasaban. Van egy egesz komplex makro, ami 4 kulonbozo dokumentumot megformaz, csinall belole egy filet, elmenti amolyan backup copykent ezt a nyersvaltozatot, majd tovabb porogve a makro ezen az aggregalt nyersfileon vegez formazast.
A formazas egyik lepese az, hogy a felesleges sorokat kitorli. Felesleges sorok azok, ahol a datum a user altal az urlapon meghatarozott idointervallumon kivul esik.
Pl a user azt mondja, hogy a kovetkezo X napra esedekes teteleket szeretne latni. Ilyenkor a makro egyik funkcioja megvizsgalja, a tablaban levo datum kisebb-e mint (mai nap + X), es ha a feltetel teljesul, torli azt a sort / rekordot a tablabol.
Sajnos valamilyen problema miatt a makro jelenleg keptelen kezelni az evvaltast, ha pl olyan teteleket kellene filterelni, ahol a datum mar jovo ev januar 1 re vagy az utan esik, akkor rengeteg potencialis tetelt kitorol.
Ha ezt a reszletet a makronak mai nap (dec 18) + 13 napra futtatom, jot mutat, ha mai nap + 14 re, akkor rosszat, kevesebb rekord marad az eredmeny listan mint kellene:
If Menu.CheckBoxDateRangeFilter.Value = True Then
lastrow = Cells.Find(what:="*", searchorder:=xlByRows, searchdirection:=xlPrevious).Row
Range("B2").Select
Do Until ActiveCell.Row > lastrow
If Range("B" & ActiveCell.Row).Value <> "" And Range("B" & ActiveCell.Row).Value <> "XYZ" And Format(Range("B" & ActiveCell.Row).Value, "mm/dd/yyyy") > Format(Now + Menu.TextBoxDaysAfter.Value, "mm/dd/yyyy") Then
Rows(ActiveCell.Row).Delete
lastrow = lastrow - 1
Else
ActiveCell.Offset(1, 0).Select
End If
Loop
End IfHa ezt a reszet kihaygom a futtatasbol, a tobbi formazos resz tokeletesen elfut. A menuben / urlapon gyakorlatilag ugyanez a formatum lett definialva a cellanak, tehat nem 2 kulonbozo formatum akad ossze.
Otlet, mi okozhatja ezt ? -
Mutt
senior tag
válasz
cube70
#19878
üzenetére
Hello,
Próbáld ki a képletet a munkalapon vhol egy cellába beírva, hogy lásd milyen eredményt ad.
Ha így működik, akkor nem a képlettel van a hiba.A megadott képlet a H7-es cella formázására van, tehát előbb odavidd be és onnan terjeszd ki, hogy mely cellákra legyen érvényes. (Az Excel a feltételes formázásokban is használja a relatív és abszolút hivatkozásokat, de ha egy másik cella formázását nézed, akkor is az eredeti celláét mutatja. pl. K12-es cellánál is a H7-et fogja kiírni, de közben valójában a K12-essel számol.)
Próbálj meg egy mintát átküldeni és ránézünk, hogy mi lehet a gond.
üdv
-
viqviq
csendes tag
Sziasztok,
Olyan problémám van, ha megnyitok egymás után nagyméretű excel táblákat, (20, 5,1 MB, előzőeket bezárom, de maga a program nyitva marad), akkor az utolsó (1MB-s) nagyon lassan nyílik meg. (a procit használja nagyon).
A táblák sharepoint szerverhez kapcsolódnak, onnan frissítenek adatokat, és egy makró nyitja meg egymás után őket.
Nem tudjátok ez mitől lehet, vagy hogy lehet kiküszöbölni? -
cube70
újonc
-
#19876
lappy
őstag
psycroptic
#19875
lappy
őstag
válasz
psycroptic
#19875
üzenetére
Szia!
itt van hasonló ezt nézd meg és ezt át lehet alakítani. -
#19875
psycroptic
őstag
psycroptic
őstag
Sziasztok!
Teljes hiteldíj mutató számításhoz szeretnék segítséget kérni. Olyan táblázatra lenne szükségem amibe belelehetne írni az összes változót(hitelösszeg, hitelkamat, kezelésiktg, havi szlavezetési díj, egyéb egyszeri díjak, futamidő). A futamidő nem hónapokban lenne megadva, hanem tól-ig.
Az egyenlőség jel után amire kíváncsi lennék az a THM százalékban és a havi törlesztőrészlet A csavaros az egészben az az, hogy minden törlesztőrészlettel csökken a tőke és kamat/hó/év és itt ugye már a naptári napok is számítanak. Egy ilyen egyenlethez én kisnyúl vagyok. Olyasmi is jó lenne, mint ami az MNB honlapján kinnt van csak abba nem lehet belevenni a havi szlavezetési díjat valamint nem tól-ig van a futamidő.
Köszönettel:
psycroptic -
morgusz
csendes tag
Helló!
Naponta 8-10 táblázat érkezik hozzánk egyedi azonosítószámú cikkekkel. Nap végén a táblákat egymás alá másolva (kb.: 2000 sor) kiderül, hogy egyes sorok többször is szerepelnek, mert a táblázatokban valami hiba miatt ismételten beérkeztek.
Ki kellene törölnöm a duplán vagy triplán szereplő sorokat, hogy annyi sor legyen, ahány különböző azonosító.Előre is köszi a segítséget!
-
#19872
Mutt
senior tag
Dark Archon
#19868
Mutt
senior tag
válasz
Dark Archon
#19868
üzenetére
Hello,
Adatfeliratokhoz javaslom az ingyenes XY Chart labeler-t, innen letölthető.
Excel 2013-ban ez a program felesleges, a Diagrameszközök->Tervezés->Diagram-összetevők hozzáadása->Adatfeliratok panelon külön tartomány adható az egyedi feliratoknak.
Hogy 128-al kezdődjön és 128,300-al végződjön a grafikon, ehhez 2 megoldás:
1. Marad a vonal diagram és az adasorod elé 128-at, mögé 128,3-at felveszed. Y értéknek pedig HIÁNYZIK-ot adsz.
2. XY diagramra állsz át (ekkor lépésközök helyesek lesznek). Kell 2 új adatsor is és az XY chart labelerer.Itt vannak a minták.
üdv
-
Mutt
senior tag
válasz
cube70
#19869
üzenetére
Hello,
Próbáld ki az alábbi feltételes formázást:
=DARABTELI(ELTOLÁS(H7;0;0;1;7);"*i*")=0Táppénz rövidítés nincs a példában, de a lényeg, hogy az ELTOLÁS függvénnyel egy 7 elemes tömböt hozunk létre mindig és megszámoljuk, hogy ebben hány esetben i-betüt tartalmazó cella.
Ha 7 napból 0 volt pihenő akkor van gond.A kiszinezés nem az egész hetet fogja kijelölni, hanem csak azt a kezdőnapot amitől jobbra 7 cellán belül nincs pihi.
üdv
-
Mutt
senior tag
válasz
Gandalf80
#19835
üzenetére
Hello,
2. Feladat:
Van-e arra mód, hogyha valaki áll egy cellába, akkor az adott sor színes legyen?Erre nem láttam még választ, de itt van pár lehetőség. A minta fájl letöltethető innen.
1. Tisztán VBA-val vhogy így megoldható:
Private korabbi As Range
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim kijelol As Range
'elég csak 1 oszlopot megjegyeznünk
Set kijelol = Target.Resize(, 1)
'ha még nincs mit eltüntetni, akkor csak szinezünk
If korabbi Is Nothing Then
kijelol.EntireRow.Interior.Color = RGB(127, 127, 127)
Else
korabbi.EntireRow.Interior.Pattern = xlNone
kijelol.EntireRow.Interior.Color = RGB(127, 127, 127)
End If
Set korabbi = kijelol
End SubA kód a kijelölt sorokat átszinezi, ezért ha eleve ki van szinezve az adatsor, akkor ez elrontja azt.
2. Feltételes formázás
Ehhez kell egy rövid kód:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'válassz a lapon egy üres cellát, ahol tárolhatjuk az aktuális sor számát
Range("G1") = ActiveCell.Row
End SubHa ez megvan, akkor már csak egy feltételes formázást kell beállítani.
3. Add-in használata
A Kutools tud ilyet.üdv
-
#19868
Dark Archon
addikt
Delila_1
#19866
válasz
Delila_1
#19866
üzenetére
Ez egy távközlési mérés feladat, nem nézhet ki máshogy a grafikon, pont ilyennek kell lennie. Valamennyire sikerült megcsinálni, ami elfogadható. Az értékeket nem lehet átírni? Pl. az 1,00E-2 helyére szöveg kellene. Jó volna, ha a vízszintes tengely 128-ról indulna és 128,3-ig tartana, de azt csak pont (x,y) grafikon esetén sikerült beállítanom, itt már nem engedi.
-
#19867
Mutt
senior tag
the radish
#19859
Mutt
senior tag
válasz
the radish
#19859
üzenetére
Hello,
Azaz a B oszlopban is csak addig az celláig legyen SZUM érték, ameddig a C oszlopban is van érték.
Delila_1 megoldása mellett ez is működik:
=SZUM(ELTOLÁS(B1;0;0;ÖSSZESÍT(15;6;SOR(C:C)/ÜRES(C:C);1)-1))C-oszlop első üres mezőjéig összesíti a B-oszlopot.
üdv
-
#19866
Delila_1
veterán
Dark Archon
#19865
Delila_1
veterán
válasz
Dark Archon
#19865
üzenetére
Mi lenne, ha oszlopdiagramon ábrázolnád az értékeket?
Mivel a két sor értékei nagyon eltérőek, érdemes az egyiket a másodlagos Y tengelyhez rendelni. Hogy ne teljes legyenek takarásban, az egyik adatcsoportnál csökkented a térközt.
-
#19865
Dark Archon
addikt
Üdv!
Táblázat segítséget kérnék EHHEZ (érdemes letölteni, mert a box nézőkében rosszul látható). Azt szeretném megcsinálni, hogy ne az automatikusan felvett értékek legyenek a tengelyeken, hanem pontosan azok, amik a táblázatban is. Hab lenne a tortán, ha ezek után a jelmagyarázat az egyes színekkel megkülönböztetett pontoknál csak annyi lenne, hogy f3, f31, stb. és nem az értéke, ahogy most látszik.
Előre is köszi!
-
cube70
újonc
Sziasztok!
Egy egyszerű beosztás kezelő programot készítek,és kicsit elakadtam,ezért a segítségeteket szeretném kérni.
A problémám a következő.Adva van egy táblázat ahol a dolgozók munkaideje van feltüntetve.A táblázat automatikusan színezi a pihenő,szabadnapokat,és a táppénzes napokat is.A kérdésem a következő.Meg lehet valamivel oldani hogy figyelje a táblázat és figyelmeztessen, ha valaki 6 napnál többet dolgozik egyfolytában? Bármilyen megoldás érdekelne.Segítségeteket előre is köszönöm
- cube -
-
#19862
Delila_1
veterán
the radish
#19861
Delila_1
veterán
válasz
the radish
#19861
üzenetére
Szívesen.
-
#19860
Delila_1
veterán
the radish
#19859
Delila_1
veterán
válasz
the radish
#19859
üzenetére
Egy cellában kikerestetjük, a C oszlopban hányadik sorban van az utolsó érték. Keresési értékként egy olyan nagy számot adunk meg, ami biztosan nem szerepel a C oszlopban. A cella legyen a példában az E1.
=HOL.VAN(999999;C:C;1)Az összegző képlet
=SZUM(INDIREKT("B1:B"&$E$1))A második képletben a $E$1 helyére beillesztjük annak a képletét, és akkor nincs szükség az eredeti kereső függvényre a külön cellában.
=SZUM(INDIREKT("B1:B"&HOL.VAN(999999;C:C;1))) -
#19859
the radish
senior tag
the radish
senior tag
Sziasztok!
Két oszlopban szereplő értékek összegére lenne szükségem, de mindig csak addig a sorig, amíg a C oszlopban érték szerepel.
Azaz a B oszlopban is csak addig az celláig legyen SZUM érték, ameddig a C oszlopban is van érték.
(A "HA" függvény villant elsőként be, de nem lenne túlbonyolítva? (+1 oszlop rejtve, ha, stb akkor 0, ha nem érték, ....)
-
konyi79
addikt
Hali!
Kis segítséget kérnék. Két oszlopot szeretnék összefésülni, a következő módon.
pl: Ha A1 cella tartalma megtalálható B oszlopban, másolja be d1 tartalmát C1-beVagy pedig a másik ami még jobb lenne:
Ha A1 cella tartalma megtalálható B oszlopban, másolja be a B oszlop találati sorának d oszlop tartalmát C1-be.Remélem érthető, köszi előre is...
-
repvez
addikt
Valaki tudna abban segiteni, hogy visszalehet valahonnét hozni egy fájl tartalmát amit nem mentettem el? ideiglenes fájlok közül vagy ha csinált automentést (nem tudom be van e állitva).
Mert be akartam zárni egy ablakot és a mögötte lévő excel ablak X re nyomtam rá és a felugró mentés jóváhagyásnál a nemre nyomtam mert azt hittem, hogy arra vonatkozik amit be akartam volna csukni. és igy nem került elmentésre az amivel egész nap bajlódtam
-
#19852
Delila_1
veterán
gyáliSanyi
#19851
Delila_1
veterán
válasz
gyáliSanyi
#19851
üzenetére
Szívesen.
-
#19850
Delila_1
veterán
gyáliSanyi
#19848
Delila_1
veterán
válasz
gyáliSanyi
#19848
üzenetére
Más felfogás szerint
-
#19849
Delila_1
veterán
gyáliSanyi
#19848
Delila_1
veterán
válasz
gyáliSanyi
#19848
üzenetére
Számokat írtam az A:C oszlopokba, de bármi mást is írhattam volna. Az a lényeg, hogy megadott számú érték legyen az egyes oszlopokban. Az E1:G2 tartományba vittem be, melyik értékből (x, y, z) hány szükséges 1 dolog elkészítéséhez. A képletet az E4 cella tartalmazza.
-
#19848
gyáliSanyi
őstag
gyáliSanyi
őstag
Sziasztok!
Melyik függvény kell ahhoz, hogy mondjuk egy dologhoz kell 3 darab X, 2 darab Y, és 8 darab Z tényező, akkor az összes rendelkezésre álló tényezőből hány dolog jön ki, úgy hogy mindig a legkisebb X,Y vagy Z érték összeg határozza meg.
A X,Y,Z tényezők összegét különböző komponensek mennyiségéből tudom.
Pl.: X-ből van 9 darabom, Y-ból 22 darabom, Z-ből 40-ven, akkor csak 3 darab dolog jöhet ki belőle. -
porajp
csendes tag
Sziasztok.
Segítséget kérnék tőletek. A problémám a következő:
Készült egy excel táblázat,több munkalappal. A munkalap oszlopaiban vannak tételszámok,tételleírások és összegek.(mindegyik külön oszlopban)
Kicsit később készült egy másik táblázat ami majdnem ugyanaz mint az előző, de pár tétellel több és nincs benne ár.
A célom az lenne, hogy az új táblázatba átvigyem azokat az összegeket amik a korábbiban is szerepelnek, ugyanazon a tételszámon.
A gondom, hogy nem vagyok benne biztos, hogy ezt az excel-el kell és hogy ha mégis akkor függvény vagy makro kell hozzá.
Előre is köszönöm a segítséget. -
bulanjoe
tag
válasz
Delila_1
#19843
üzenetére
Köszönöm szépen! Így már megy!
=ÓRA(A1)+PERCEK(A1)/60
Örök hálaMiután kiagyalom a legbonyolultabb függvényeket, mindig kiderül, hogy van rá már egy megírt függvény. Láttad volna a tegnap mennyit agyaltam, hogy egy dátum alapján kiszámolja nekem egy hét számát egy adott(nem naptári évben) mire rájöttem, hogy van olyan hogy HÉT.SZÁMA()
-
bulanjoe
tag
Sziasztok.
Matek jön!
Adott egy táblázat, ami szépen követi a heti és napi beosztást. pl. reggel 8 tól 4-ig majd 6tól 9.30ig.
Ez szépen ki van nekem számolva egy függvénnyel, hogy kiszámlja hány óra is volt aznap
kapaszkodj meg)
=HA(A1>B1;0;(IDŐ(CSONK(B1/100);MARADÉK(B1;100);0)-IDŐ(CSONK(A1/100);MARADÉK(A1;100);0)))+HA(C1>D1;0;(IDŐ(CSONK(D1/100);MARADÉK(D1;100);0)-IDŐ(CSONK(C1/100);MARADÉK(C1;100);0)))ez működik is szépen, nem ezzel van a gond.
A gond ott van, hogy ez kellene százalékos formában. azaz ha egy nap 5 óra 30 percet dolgozok, akkor az legyen kiírva hogy 5,50
=(MARADÉK((B2-A2)+(D2-C2);100))/60+CSONK(((B2-A2)+(D2-C2))/100;0)
nem akar működni!
Mit számolok rosszul?
Tudom, már ott a baj, hogy magyar az excel, de amúgy? -
T.Lacci
csendes tag
Sziasztok! Segítséget szeretnék kérni egy függvényhez. A függvénynek az volna a dolga, hogy az A oszlop cella értéktartományainak megfelelően írja ki a B oszlopba az alábbiakat:
Ha A oszlopban 0-nál nagyobb és 10000-el egyenlő vagy kisebb szám van akkor B oszlopban legyen 1500.
Ha A oszlopban 10000-nél nagyobb és 25000-el egyenlő vagy kisebb szám van akkor B oszlopban legyen 1000. Ha A oszlopban 25000-nél nagyobb és 50000-el egyenlő vagy kisebb szám van akkor B oszlopban legyen 700. Ha A oszlopban 50000-nél nagyobb szám van akkor B oszlopban legyen FREE
Köszönöm előre is a segítséget -
válasz
Gandalf80
#19835
üzenetére
szia, az első kérdésedre tudom a választ, biztos leeht jobban is csinálni, de működik, én is csak most tanulom a dolgot.
Sub transzponalas()
ActiveSheet.Range("A1:B7").Copy 'itt adod meg a másolandó ranget amire épp szükséged van
'itt megadod a másolás helyét, a Munka2-t átírod a kívánt munkalap nevére, jelen esetben azt hiszem Kiküldve I, A1 cella
'helyére pedig a tartomány első celláját írod
Sheets("Munka2").Range("A1").PasteSpecial Paste:=xlPasteValues, Transpose:=True
'Sheets("Munka2").Activate ha szeretnéd, hogy a másik munkalap legyen aktív ezután, akkor vedd ki e sor elejéről a '-t
Application.CutCopyMode = False 'ez megszünteti a kijelölést
End Sub -
nimmy001
csendes tag
Sziasztok,
Nem tudom, találkozott-e már valaki ilyennel, én ma egész nap belebotlottam ilyenekbe több excel fájl esetén is.
Amiknél a probléma jelentkezett, közös használatra beállított fájlok, makrós excelek, és be van állítva, kinek milyen jogosultságai vannak, akik ezeket használják. Nagyobb probléma ugyan eddig nem volt, de az is elég, hogy zavaró.
Jogosultsággal rendelkező felhasználók nyitják meg ezeket, és megjelenik egy üzenet, hogy:"A fájl használatban van
A ....xlsm fájl zárolva van szerkesztésre
'más felhasználó'
Megnyithatja "Olvasásra", vagy válassza az "Értesítés" gombot, ha az olvasásra való megnyitás mellett értesítést is kér, mikor a dokumentum használatát befejezik."Megosztott exceleknél én ezt az üzenetet eddig nem láttam.
Ha az "Értesítés" gombra kattintottunk, utána kb. fél percen belül megjelent az alábbi üzenet:
"A fájl elérhetővé vált
A '.....xlsm' fájl már elérhető szerkesztésre.
Szerkesztéshez válassza az Írásra is gombot."És utána persze megy minden hiba nélkül.
Mi csinálhatja ezt? Lehetséges, hogy holnapra ez megszűnik?Már régóta dolgozunk ezekkel, és eddig ilyen furcsaságokat nem produkáltak.
-
Gandalf80
csendes tag
Sziasztok!
Rég jártam itt, sajnos
Kérlek, segítsetek nekem.1. Feladat:
Van egy Excel fájl, amiben több munkalap is szerepel. Példának az egyik Lista I, a mellette Kiküldve I, és így tovább. Szükségem lenne egy makróra, amely segítségével Az adott munkalapon, ahol állunk, a mellette lévő oldalra másolja át pl. a B6-tól Z56-ig terjedő cellákat, a mellette lévő munkalapon C2 és BA 27 -ig, természetesen "Transzponálással" és csak értéket illesszen be. Készítettem hasonlót 2003-mas verzióval, de azt csak "makró felvétele"-vel. Átálltunk 2010-es Excelre, és szeretnék egy profi makrót elhelyezni az újban, mert a régiben minden egyes munkalaphoz hozzá volt rendelve 1-1- makró, és az sok...2. Feladat:
Van-e arra mód, hogyha valaki áll egy cellába, akkor az adott sor színes legyen? Nem muszáj végig, mondjuk 1-30-ig terjedő celláig.A segítségeteket előre is köszönöm.
Üdv.
Gábor -
Beri
addikt
válasz
Delila_1
#19833
üzenetére
Amikor azt írtam, hogy "Szerencsére a VBS azt csinálja, amit elmagyaráz neki az ember, tehát már nem kell pivot-izélnem.", azt úgy értettem, hogy már kész van, működik. Csak azért kíváncsiskodtam, mert én ezt egy nem túl bonyolult feladatnak hittem alapból, excel-ül, tekintve, hogy egy oszlopban csodálatosan lehet számoltatni.
Azért az súlyos, hogy a magyar verzióban nem csak a képletek neve lett lefordítva... nem megy a fejembe, hogy ez mért jó. Oké, magyar billentyűzettel máshogy kell pontosvesszőt írni, de ez mióta probléma bárkinek, aki eljut addig, hogy kézzel akar beírni egy ilyet mindenestül?
-
Delila_1
veterán
Az, hogy én nem találtam képlettel való megoldást, segédoszlop nélkül, nem jelenti, hogy nem lehetséges.
Az Excel magyarba átültetésnél valamilyen okból a képletek paramétereit elválasztó vesszőket is átírták pontosvesszőkre.
Azt nem írtam, de biztosan rájöttél, hogy a makró az eredményt a G1 cellába írja. Összejött?
-
Delila_1
veterán
Makróról nem volt szó.
Sub mm()
Dim ter As Range, CV As Object, honap1 As Integer, honap2 As Integer
Dim usor As Long, szam As Double, osszed As Double, osszeg As Double
usor = Range("A" & Rows.Count).End(xlUp).Row
Set ter = Range("A2:A" & usor)
honap1 = Range("D1"): honap2 = Range("E1"): szam = Range("D2")
For Each CV In ter
If (Month(CV) = honap1 Or Month(CV) = honap2) And Range(CV.Address).Offset(, 1) = szam Then _
osszeg = osszeg + 1
Next
Range("G1") = osszeg
End SubHónap1 és hónap2 a D1 és E1 cellában, dátumok az A oszlopban, számok a B-ben, keresendő szám a D2-ben.
-
Beri
addikt
válasz
Delila_1
#19825
üzenetére
Tudod, nekem ez az egész még mindig olyan, mint a zsiráf. Szép, szép, de otthonra nem kéne. Szerencsére a VBS azt csinálja, amit elmagyaráz neki az ember, tehát már nem kell pivot-izélnem. Köszönöm a supportot, kár is rám ennyi időt pazarolni, amikor ennyire nem vagyok nyitott az új dolgok (hogy majd a májkrémszoft megmondja, hogy fog kinézni a táblám) iránt
Pláne hogy az ofisöl online excel support (vagy help vagy mittomén) vonatkozó article-jeiben a példáknál rendre vessző van pontosvessző helyett (pl. [link] - innen ki is másolgattam ezeket egy az egyben, hogy kipróbáljam, egyáltalán működnek-e, mert nem értettem, mit csinálok rosszul) és ELEVE nem működik a kód.Csak a kíváncsiság hajt, amikor újra megkérdezem, de mégis megoldható lett volna ez excel-ül? Tehát le lehet azt írni egy mezőbe függvényekkel, hogy ha a dátum aktuális hó ÉS azonos sorban a szám mezőben mondjuk 4 van mellette, akkor számláló++?
-
Delila_1
veterán
Elkészíted a kimutatást az első kép szerint. A Dátum mezőre (E1) kattintva az Adatok | Tagolás | Csoportba foglalás menüpontban beállítod a Hónapok szerinti csoportosítást.
A Dátum mező legördülőjében kijelölöd a 2 hónapot (alsó kép).
A kiválasztott hónapoknak megfelelően csökken, vagy bővül az időszakban előforduló számok listája, és mennyisége.
-
Stev
csendes tag
Sziasztok!
Segítsetek, please!
Nem engedelmeskedik az Excell
Sosem volt eddig ilyen gondom, de most nem azt csinálja amit szeretnék.Konkrétabban:Egy két munkalapos táblában a munkakap1 adott cellájának az értékét szeretném beilleszteni a munkalap2 ugyanazon cellájába.Ezt eddig úgy csináltam, hogy a munkalap2-re álltam és ott a függvény beszurásnál írtam egy = jelet, majd átléptem a munkalap 1 beszúrandó cellájába rákattintottam majd zöld pipa(Beírás)
Ezután az értéket nem hozza át a munkalap1-ről
-
Ro0oBi
újonc
Ne haragudjatok, de még mindig az 19803 hozzászolásban vázolt problémáról lenne szó. Elolvastam a Google találatok közül sok mindent a témával kapcsolatban de mindenhol arról van szó, hogy az éves kamatot osztjuk el 12 ami szép és jó működik is. Csak épp a tanárom azt mondta, ez így nem pontos érték, aki plusz pontért pontost szeretne kapni annak a tizenkettedik gyökkel kell számolnia és még mindig nem világos számomra, hogy ez mit is érthet ez alatt és hogy valósul meg a folyamat??? :S
Valaki ötlet esetleg? -
-
-
Beri
addikt
válasz
Delila_1
#19816
üzenetére
Nem akarom szétdarabolni az egészet és 3847563845346 új mezőt létrehozni, már így is eléggé favágó a táblám (az épp aktuális hónapot és az az előttit kiíró mezővel, meg a másik táblából átlinkelttel). Amit leírtam, azzal mi a baj?
Most nézem a megoldásod. Ez konkrétan megoldja soronként azt, amit én egyetlen összesítésben szeretnék látni.
-
-
Beri
addikt
Üdv!
Van egy táblám egy oszloppal, amiben egy szám van (kis int), mellette egy másikkal, amiben egy dátum. Meg kéne számoltatnom, hogy az épp aktuális hónapban (és az előzőben) hányszor fordult elő egy-egy szám.
Tehát pl. =COUNTIF(C3: C65000;"1"), csak rá kéne ragasztanom a plusz feltételt a dátummal, ehhez kérem a segítségeteket. A range-re egyébként nincs valami elegánsabb megoldás?
-
Ro0oBi
újonc
Sziasztok! Következő feladatot kaptam a tanáromtól:
Pénzügyileg melyik a kedvezőbb? 12 hónapon keresztül megvásárolni a bérletet minden hónap elején 2000 Ft-ért, vagy éves bérletet venni év elején 23 000 FT-ért? A kamtláb évi 6%)Adatok:
A1 cella: 12
A2 cella: 0,005
A3 cella: 2000
A4 cellába meghívom az MÉ függvényt és kiszámolja
Ráta: A2
Időszakok száma: A1
Részlet: A3
Típus: 1
Ez így rendben is van azt mondta így elfogadja a megoldást. DE! Azt mondta ez így egy kerekítés és aki több pontot szeretne az a 12.-ik gyökkel számoljon.
Nem tudok rájönni mit ért ez alatt már mint hova kellene beírni és melyik számnak a 12.-ik gyökét valaki érti esetleg? Ennél több infót nem adott, pontosan lejegyeztem mindent...Nagyon nagyon örülnék ha valaki megfejtené ezt!
kapaszkodj meg)
Valaki ötlet esetleg?
Új hozzászólás Aktív témák
Hirdetés
Fferi50- 27%-OS ÁFÁS SZÁMLA I Jogtiszta Microsoft digitális és fizikai termékek I DIGITALKEYZ.COM
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- Windows 10/11 Home/Pro , Office 2024 kulcsok
- Assassin's Creed Shadows Collector's Edition PC
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- Samsung Galaxy A22 5G 128GB, Kártyafüggetlen, 1 Év Garanciával
- Xiaomi Redmi Note 7 64GB, Kártyafüggetlen, 1 Év Garanciával
- Bomba ár! Lenovo ThinkPad T450 - i5-5GEN I 8-16GB I 256SSD I 14" HD+ I Cam I W10 I Garancia!
- BESZÁMÍTÁS! MSI MAG 325CQRXF QHD VA 240Hz 1ms monitor garanciával hibátlan működéssel
- Samsung Galaxy A12 64GB Kártyafüggetlen 1 év Garanciával
Állásajánlatok
Cég: FOTC
Város: Budapest