- A választási tévinformációk ellen küzd a Meta
- Szilárdtest-akkumulátorokat fejleszt Kína, jöhet az áttörés?
- DIGI kábel TV
- Ha Trump győz, Elon Musk politikai tanácsadó lehet
- Már nem hisz a nagy európai EV-forradalomban a Ford
- Tárhely szolgáltató választás
- Milyen program, ami...?
- Vodafone otthoni szolgáltatások (TV, internet, telefon)
- Microsoft Excel topic
- Bittorrent topik
-
IT café
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
-
Geryson
addikt
válasz Delila_1 #17175 üzenetére
Hm, jópofa ez a RÉSZÖSSZEG, de nem értem a lényegét. Itt nekem kell kijelölnöm a hivatkozási tartományt amit meg én mondtam, ott automatikusan tudta ezt a dátum alapján.
Itt most ahogy látom egyenként kellene kijelölnöm az 1 naphoz tartozó összegzendő értékeket, amit meg akkor már fel tudok írni magamnak (ha már egyszer kijelölöm őket).
Rinderkennzeichnungsfleischetikettierungsüberwachungsaufgabenübertragungsgesetz
-
BenJoe80
senior tag
válasz Delila_1 #17183 üzenetére
Ezt nem értem, hogy gondoltad...
Elindítom a diagram varázslót, kiválasztom a megfelelő diagramot, <Tovább> és itt kéri a "Tartományt". És itt van a gubanc! Egy munkalapon szereplő adatokat ki tudok választani - meg is jelennek. De azt, már nem tudom vele megetetni, hogy a másik munkalapról is hozzáadjak értékeket. Pl.:
Tartomány: =Sheet1!$A$1;Sheet1!$A$3 - ez működik!
De azt, hogy tudom megcsinálni, hogy valahogy így nézzen ki a megjelenítendő tartomány:
Tartomány: =Sheet1!$A$1;Sheet1!$A$3;Sheet2!$A$1;Sheet2!$A$3;Sheet3!$A$1;Sheet3!$A$3
Mert erre mindig azt írja ki, hogy "A beírt képlet hibás". Szóval mit csinálok itt rosszul?
[ Szerkesztve ]
Megisznak egy deci pálinkát. Miért? "Olyan savam vót, meg köllet innom egy deci pálinkát, aszittem megbolondulok." Aztán megisznak négy liter bort. Miért? "Há' semmi savam nem volt má'!"
-
m.zmrzlina
senior tag
válasz Delila_1 #17185 üzenetére
Ez lett belőle:
Range("C" & intMeterfejlec & ":D" & intMeterfejlec_vege).Select
Set ranPorthol = Selection.Find(What:=strPort, After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False)
If Not ranPorthol Is Nothing Then
If Mid(Cells(ranPorthol.Row + 4, 5).Value, 9, 4) <> "UNDF" Then
strPortmap(1, intKovport) = Mid(Cells(ranPorthol.Row + 4, 5).Value, 9, 4)
intKovport = intKovport + 1
Else
strPortmap(1, intKovport) = Empty
intKovport = intKovport + 1
End If
Else
strPortmap(1, intKovport) = "NONE"
intKovport = intKovport + 1
End IfÉs láss csodát....működik.
Megint köszönöm.
-
BenJoe80
senior tag
válasz Delila_1 #17188 üzenetére
Igen, de így csak egyesével veszi fel az adatokat. Nekem viszont úgy kellene, hogy a grafikon egész évben, egymás mellett mutassa (Január-December) havonta a:
- Bevételt
- KiadástEhhez, viszont több cellát kell(ene) megadnom tartományértékként, ami egy munkalapról megy is, de nem tudom a többi munkalapon lévő adatokat megnézni hozzáadni.
Megisznak egy deci pálinkát. Miért? "Olyan savam vót, meg köllet innom egy deci pálinkát, aszittem megbolondulok." Aztán megisznak négy liter bort. Miért? "Há' semmi savam nem volt má'!"
-
Caipi
tag
válasz Delila_1 #17192 üzenetére
Próbáltam használni, de valahogy nem lett kerek nekem
Figyelnem kellene a sorazonosítót a Munka1-en és ezt az azonosítót megtalálnom a Munka2-n, majd az adott sorban megnéznem, hogy egy oszloptartományon belül hány számot tartalmazó cellám van.
És itt akadtam meg, mivel gondoltam, hogy megoldható mindez úgy, hogy egy függvényben kezeljem a Munka1-en. :-) -
Caipi
tag
válasz Delila_1 #17198 üzenetére
Köszönöm szépen!
Egy további kérdés ezzel kapcsolatban. Tudnám függvénnyel kezelni valahogy az oszlop betűjelét is?
Gondolok itt arra, hogy az oszlop 1. cellája egy adott értéket(szót) tartalmaz és az adott szóra keresnék rá valahogy. A vkeres() csak számot ad vissza, tudok valahogy betűjelet is visszakérni? -
Caipi
tag
válasz Delila_1 #17200 üzenetére
bocsánat, ha túl bonyolultan fogalmazom :-)
Tehát, most egyszerűen átveszem a Munka2 B oszlop értékeit fkeres()-el a Munka1-re. Azért kell az fkeres(), mert nem biztos, hogy az azonosító megegyezik (nem biztos, hogy abban a sorban van).
Szval arra gondoltam, hogy lehetséges-e esetleg ezt egy függvényben megoldani a Munka1-en -
BenJoe80
senior tag
válasz Delila_1 #17195 üzenetére
Köszi Delila_1 a segítséget. Végül is, az lett, amit mondtál: a különböző adatokat, különböző munkalapokról egy munkalapra vittem és onnét már nem volt probléma létrehozni a grafikont.
Az igazság az, hogy reméltem nem kell ezt megtennem. Ráment az egész délutánom, estém.
Köszönöm szépen a segítségedet!
Megisznak egy deci pálinkát. Miért? "Olyan savam vót, meg köllet innom egy deci pálinkát, aszittem megbolondulok." Aztán megisznak négy liter bort. Miért? "Há' semmi savam nem volt má'!"
-
Caipi
tag
válasz Delila_1 #17202 üzenetére
Köszönöm a függvényt,
Most tudtam próbálgatni és -számomra- érdekes eredményre jutottam.
Ha a Munka2-n az összegzendő értékek nem beírt számok, hanem függvénnyel kiszámoltak - és sajna jelen esetben tényleg azok-, akkor az Indirekt() mindig 1-t ad vissza.
Erre létezik megoldás?
(Jelen példában az összegzendő oszlopokban egy Ha($A2=E$1;$B3;"") függvény szerepel. Minden oszlop első celláját nézem, ez alapján kell az összegeket elhelyeznem a megfelelő kategóriában.) -
oz82
senior tag
válasz Delila_1 #17207 üzenetére
THX!
Kipróbálom amint lesz időm. Sajna a szöveg nem rövid amit váltogatni szeretnék. Kb. 1 oldal
P.
Aki tud és tudja, hogy tud, veszélyes, attól óvakodjatok! Aki nem tud és tudja, hogy nem tud, az okos, tanítsátok! Aki tud és nem tudja, hogy tud, az bölcs, attól tanuljatok! Aki nem tud és nem tudja, hogy nem tud, az hülye, hagyjátok!
-
BenJoe80
senior tag
válasz Delila_1 #17204 üzenetére
Persze, én sem sajnálom a rászánt időt, mert most már megvan egész évre, sőt kis módosítással több évre és innentől kezdve csak az adatokat kell bevinni.
Az egyetlen dolog, amit furcsállok, hogy az Excel nem képes egy diagramot felépíteni több munkafüzetből. Tehát ahhoz, hogy a diagram működhessen,az összes adatot (ami kellett a diagramhoz) ki kellett vinni egy összesítő munkalapra.
Viszont lenne egy másik kérdésem: van valamilyen megoldás arra, hogy a Microsoft Excel 2003-ban létrehozott és elmentett táblázatot Libre Office formátumba menteni?
Megisznak egy deci pálinkát. Miért? "Olyan savam vót, meg köllet innom egy deci pálinkát, aszittem megbolondulok." Aztán megisznak négy liter bort. Miért? "Há' semmi savam nem volt má'!"
-
whatnot
őstag
válasz Delila_1 #17231 üzenetére
Private Sub Worksheet_Change(ByVal Target As Range)
Dim ShapeDel As Integer
Dim wPath As String
Range("A1").Select
If Target.Address = "$A$1" Then
For ShapeDel = 2 To ActiveSheet.Shapes.Count
Shapes(ShapeDel).Delete
Next
...Ezt beraktam egy teljesen új munkalapra.
Első próbánál még ott volt a nyíl, másodiknál már nem. -
Mutt
aktív tag
válasz Delila_1 #17239 üzenetére
Sziasztok,
Törlés előtt ellenőrízzétek a shape objektum típusát, és csak azt töröljétek amire nincs szükség.
A típusok itt vannak:
http://msdn.microsoft.com/en-us/library/aa432678(v=office.12).aspxAz érvényesítés típusa 8 - msoFormControl.
üdv.
A tanácsaimat ingyen adom. Ha nem tetszik, akkor kérlek ne kritizáld! / https://github.com/viszi/codes/tree/master/Excel
-
mdk01
addikt
válasz Delila_1 #17266 üzenetére
Köszönöm
Win7 de az "ablak" alatt csak két szín van a fehér és fekete ezekhez nem érdemes nyúlni más lehetőség a legördülő menü alatt meg nem volt. Köszönöm azért, de nem is értem ezt a hibát.Még annyit kérdeznék ami most jött elő probléma hogy a SZUMHA függvényt nem lehet összesíteni?
Csináltam egy ilyet és nem úgy adja össze ahogy én azt szeretném.=SZUMHA(Munka1!G5:G64;"=1";Munka1!C5: C64)+SZUMHA(Munka1!H5:H64;"=1";Munka1!C5: C64)+SZUMHA(Munka1!I5:I64;"=1";Munka1!D5: D64)+SZUMHA(Munka1!J5:J64;"=1";Munka1!D5: D64)
Nem egy bonyolult képlet, de mégsem adja össze a 4db összeget amit egyenként kiszámol a szumha függvény.
Köszönöm
[ Szerkesztve ]
-
csferke
senior tag
válasz Delila_1 #17469 üzenetére
Delila köszönőm fáradozásodat.
Időközben én is "kapirgáltam" és találtam is egy megoldást a naptár gondokra.
Ez előhívható bármely cellában a Ctrl+Shift+C kombinációval vagy jobb klikk-re megjelenő menüből.
[link]Ezt kombinálva Delila megoldásával igen jól, sokoldalúan használható.
[ Szerkesztve ]
-
m.zmrzlina
senior tag
válasz Delila_1 #17481 üzenetére
Nem igazán. Ez a kód:
intSzamlalo = 1
For Each wshMunka In ActiveWorkbook.Worksheets
If wshMunka.Name <> "összesítő" Then
wshOsszesito.Cells(1, intSzamlalo + 5) = format(Cells(1, intSzamlalo + 5), "yyyy.mm.dd")
'wshOsszesito.Cells(1, intSzamlalo + 5).NumberFormat = "yyyy.mm.dd"
wshOsszesito.Cells(1, intSzamlalo + 5).Value = wshMunka.Name
intSzamlalo = intSzamlalo + 1
End If
NextKikommentezve a tied alatt ott az én megoldásom de mindkettő ugyanúgy nem jó. A következő ciklussal szeretném kiértékelni az 1. sorban lévő dátum(nak látszó) értékeket:
wshOsszesito.Range("F1").Select
Do While ActiveCell.Offset(0, 1).Value <> ""
If Val(ActiveCell.Offset(0, 1).Value) <> Val(ActiveCell.Value) + 1 Then
intValasz = MsgBox("Az importált adat nem folytonos. Mégis folytatod?", vbYesNo)
If intValasz = vbNo Then
Application.DisplayAlerts = False
ActiveWorkbook.Close
Application.DisplayAlerts = True
End
End If
End If
ActiveCell.Offset(0, 1).Select
Loop[ Szerkesztve ]
-
m.zmrzlina
senior tag
válasz Delila_1 #17483 üzenetére
Azt szeretném a makróval, hogy jelezze, hogy a fenti példánál pl febr 23.-a hiányzik. Most az van, hogy mivel a makrónak minden cellaérték 2013,02 így már az első ellenőrzéskor (19-20-nál) jelez.
Jelenlegi cellaformátum Általános. _Nem Dátum vagy Szöveg Az első sorba a munkalapnevek beolvasásával kerülnek az értékek.
(a szerkesztőlécen F2 képlete)
[ Szerkesztve ]
-
m.zmrzlina
senior tag
válasz Delila_1 #17489 üzenetére
A dátumok szerintem akkor változnak szöveggé amikor a cellatartalomból először munkalapnév lesz aztán a munkalapnévből megint visszakerülnek egy másik cellába.
Azért ilyen bonyolultan oldom meg mert a forrásfájlban mindenféle hibák lehetnek. (ismétlődő, nem megfelelő szerkezetű vagy oda nem illő munkalapok-ezeket törölni kell illetve nem is mindig időrend szerint vannak a munkalapok) Csak miután rendbetettem a munkafüzetet lehet listát csinálni a munkalapokról és minden más csak ezután jöhet.
Az alapfeladat szépen működik is (mondhatnánk, hogy első körben készen vagyunk) csak ez az ellenőrzés nem megy.
-
Barcley
csendes tag
válasz Delila_1 #17487 üzenetére
Nem akartalak benneteket fárasztani a hosszú és bonyolultabb részletekkel: A z A1 cellába futnak össze több szálról és számolási tartományból vagylagosan, és részben logikai számítások eredményei is. Ezért ha csak direkt aritmetikai eredmény lenne, úgy is jó lenne.
Régebben olvastam itt "offszett"-el kivitelezett dinamikus diagram-ról,amit te írtál. Sajnos a link már nem hozzáférhető. Tudnál példákat írni, hol olvashatok ilyenekről?
Köszönöm! -
motinka
tag
válasz Delila_1 #17502 üzenetére
köszönöm Delila_1, ez így tökéletes,
közben tovább keresve megtaláltam egy hasonló kérdésemre adott válaszodat is.
persze azt gondoltam van egy "KERESLEGTÖBB(1)" függvény
ahol a zárojelben írt 2 szám a második, 3 a harmadik, stb legtöbbször elúfordulót gyűjti ki
de ez talán majd az excel2014-ben leszMoTiNka
-
motinka
tag
válasz Delila_1 #17504 üzenetére
Köszönöm ismét a segítségedet, a NAGY függvény sokat segített ( ennek egyszer már elmondtad a működését, de kiesett a tudatomból ).
Most ennek segítségével felállítottam az erősorrendet, miután a DARABTELI-vel megszámoltattam melyikből mennyi van.
Aztán FKERES -sel hozzákerestettem a neveket.
Tökéletesen OK.MoTiNka
-
m.zmrzlina
senior tag
válasz Delila_1 #17512 üzenetére
Te hekkeled a gépemet?
Sub szamol()
Cells(1, 27).Value = "szám"
Cells(1, 28).Value = "darab"
For i = 1 To 30
For Each cella In Selection.Cells
If cella.Value = i Then
mennyi = mennyi + 1
End If
Next
Cells(i + 1, 27).Value = i
Cells(i + 1, 28).Value = mennyi
mennyi = 0
Next
End SubItt van készen majdnem ugyanez,
-
wjani
tag
-
kekkec
aktív tag
válasz Delila_1 #17517 üzenetére
Nem ilyen egyszerű.Rosszul fogalmaztam.
A2 saját értéke alapján színeződik feltételesen formázva színskálával. Szeretném, ha A1 szintén A2 értéke alapján színeződne, és mivel A2 értéke változik és szeretném szemléltetni az apróbb változásokat is, ezért csak a színskála jöhet szóba mint feltételes formázás. -
atillaahun
veterán
válasz Delila_1 #17534 üzenetére
(#17534) Delila_1 és (#17545) Mutt
köszönöm a válaszaitokat, az első kérdésem az valóban megoldható viszonylag egyszerűen, így utólag.Viszont most vettem észre, hogy a második kérdésem rosszul írtam le, így az még mindig aktuális lenne a következő formában.
Így néz ki most:
A1=Dr. Lakatos Kálmán B1=1097 Budapest Teréz körút 26.
A2=Dr. Krakoska Károly B1=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, így:
A1=Dr. Lakatos Kálmán
A2=Budapest
A3=Teréz körút 26.
A4=1097
A5=Krakoska Károly
A6=Miskolc
A7=Kossuth utca 13.
A8=3534
...És mivel ezt majd egy 3 (oszlop) x 8 (sor) -os word táblázatba kellene beillesztenem, mert ilyen beosztású etikett papírra kerül majd kinyomtatásra, még nagyon hasznos lenne, hogy ha az egy személyhez tartozó adatok egy cellába kerülnének.
Tehát A1, A2, A3, A4 az végülsi csak A1 lenne belső sortöréssel, és ugyanígy A5, A6, A7, A8 is csak A2 lenne.Odáig értem, hogy a címeket szétszedem szövegből oszlopokkal, és nyomok neki egy transzponálást (bár az irányítószámokat még így is a végére kell majd tenni), csak ezt hogy csinálom meg 500 különböző sorral, amiknek mind egy oszlopba kellene kerülniük?
[ Szerkesztve ]
Új hozzászólás Aktív témák
- Android másképp: Lineage OS és társai
- Eredeti játékok OFF topik
- TCL LCD és LED TV-k
- Opel topik
- Samsung Galaxy A54 - türelemjáték
- Autós topik
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- Gaming notebook topik
- OnePlus 7 - magabiztos folytatás
- További aktív témák...
- Canva Pro előfizetés - 1 éves
- Autómatricák a legjobb minőségben, több ezer minta! PH tagoknak 30% kedvezmény!
- AKCIÓ! - STEAM kulcsok / Punch Club, Oddworld: Soulstorm, Children of Morta, stb. - 2024.05.16.
- Vírusirtó, Antivirus VPN kulcsok
- PC JÁTÉKOK (OLCSÓ STEAM, EA , UPLAY KULCSOK ÉS SOKMINDEN MÁS IS 100% GARANCIA )
Állásajánlatok
Cég: Promenade Publishing House Kft.
Város: Budapest
Cég: Ozeki Kft.
Város: Debrecen