-
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
-
the radish
senior tag
Az első nem jól működik, csak a tömbben lévő legkisebb értéket adja vissza, vagy 0-t.
A második tökéletes lenne, 2013 excelben jó is, de 2003-asban -annak ellenére, hogy elvileg ismeri a SZORZATÖSSZEG függvényt, #SZÁM# értéket ad eredményül. Ez utóbbit nem lehetne valahogy működésre bírni? -
Salex1
senior tag
Egyik sem volt azok közül, amit írtatok. Nem tudom, hogy hogy, de belekattintottam a képletbe, újra kiválasztottam a célterületet és néha így megjelent az eredmény, ha nem elsőre akkor 2. 3. próbálkozás után...az a baj, hogy ki tudja hány gépen és office-on ment keresztül a file, mert ilyen közös nyilvántartás szerűség.
-
Mutt
aktív tag
Kicsit elgépeltem: >100 helyett >1000 kell. És a magyar változat pedig:
{=INDEX(A:A;HOL.VAN(1;((A:A>1000)*(A:A<10000));0))}
Illetve, egy kis magyarázat is hozzá:
1. A kulcs a képletben a (A:A>1000)*(A:A<10000) rész, amely attól függően, hogy van találat 0-t és 1-est fog visszaadni.{0;0;0;1;1;0;1;0...}.
2. Ebből már csak ki kell keresni az első helyet ahol 1-es (vagyis egyezés van). Erre a HOL.VAN függvény a megoldás; ez vissza is adja hogy hanyadik helyen van 1-es.
3. INDEX segítségével már csak a megkapott helyre kell menni és kiírani az értéket.A tanácsaimat ingyen adom. Ha nem tetszik, akkor kérlek ne kritizáld! / https://github.com/viszi/codes/tree/master/Excel
-
lomajpure
csendes tag
Üdv!
Köszönöm a segítséget!
Egyetlen bajom van még vele, hogy a formázott cellát másolja. Az egyik kérdésem pedig az lenne, hogy lehet csak értéket átmásolni?A pontos dolog így nézne ki:
Van egy táblázat. Gombra kattintva megnyitja ugye a másikat, kimásolná belőle a 11 sor utolsó cellájának a tartalmát (ha nincs érték, akkor a cél cella is üresen lenne), és bemásolja az F2-es cellába a másolt értéket.Kuss! P#cs@ba! Pofádat befogod! A te dolgod a szülés! ~ Eric Cartman
-
dudikpal
aktív tag
Köszönöm, tökéletesen működik
Viszont kiderült, hogy nem jó úton indultam el.
Tulajdonképpen a sort egy már számított cellából ki tudom nyerni egy kivonással.
Ebből a sorból akarom kinyerni a mennyiségi egységet.
Először megvizsgálom h melyiket tartalmazza, majd kiíratom.
Én ezt így oldottam meg:=HAHIBA(VÁLASZT(ÖSSZEFŰZ(HAHIBA(HA(SZÖVEG.KERES("/ csom";INDIREKT("A"&HELYETTE(P6;"A";"")-5));"5");"");HAHIBA(HA(SZÖVEG.KERES("/ m";INDIREKT("A"&HELYETTE(P6;"A";"")-5));"1");"");HAHIBA(HA(SZÖVEG.KERES("/ bliszt";INDIREKT("A"&HELYETTE(P6;"A";"")-5));"2");"");HAHIBA(HA(SZÖVEG.KERES("/ tek";INDIREKT("A"&HELYETTE(P6;"A";"")-5));"3");"");HAHIBA(HA(SZÖVEG.KERES("/ db";INDIREKT("A"&HELYETTE(P6;"A";"")-5));"4");"");HAHIBA(HA(SZÖVEG.KERES("/ pár";INDIREKT("A"&HELYETTE(P6;"A";"")-5));"6");""));HAHIBA(HA(SZÖVEG.KERES("/ m";INDIREKT("A"&HELYETTE(P6;"A";"")-5));"méter");"");HAHIBA(HA(SZÖVEG.KERES("/ bliszt";INDIREKT("A"&HELYETTE(P6;"A";"")-5));"bliszter");"");HAHIBA(HA(SZÖVEG.KERES("/ tek";INDIREKT("A"&HELYETTE(P6;"A";"")-5));"tekercs");"");HAHIBA(HA(SZÖVEG.KERES("/ db";INDIREKT("A"&HELYETTE(P6;"A";"")-5));"db");"");HAHIBA(HA(SZÖVEG.KERES("/ csom";INDIREKT("A"&HELYETTE(P6;"A";"")-5));"csomag");"");HAHIBA(HA(SZÖVEG.KERES("/ pár";INDIREKT("A"&HELYETTE(P6;"A";"")-5));"pár");""));"")
Viszont belefutottam a túl sok argumentum hibába az excelben, pedig még bővítenem kéne további mennyiségi egységekkel a listát.
Van ennek egyszerűbb módja, és csak én bonyolítottam túl?[ Szerkesztve ]
-
dudikpal
aktív tag
Kikapcsoltam az autoszámolást, azóta minden frankó, köszi
És igen, bizony, ismét elakadtam
Van 3 munkalapom(csz,me,mvm).
Egy új munkalapon szeretném megjeleníteni az adatokat úgy, hogy A1-be menjen a cszA1, B1-be az meA1, C1-be mag az mvmA1.A csz-me-mvm-be úgy rendeztem az adatokat, hogy mindhárom ml A1 cellája egy termékhez tartozik, ugyanígy a többi cella is.
Azt szeretném, hjogy 1 új munkalapon ezek az értékek termékenként külön sorba kerüljenek.
Lehetséges ez excelben?
Már accessel is próbálkozom közben -
dudikpal
aktív tag
Igen, ez a forrás első oszlopánál működik is, viszont ilyen oszlopból van vagy 100
Tehát a forrás mlokban az A oszlopban van pl24 elem, B oszlopban 7, stb.
Az megvan, hogy melyik oszlopban hány elem van, az már ki van számolva cellákba.Próbáltam úgy is, hogy a forrást elmentettem tabos csvbe, betettem wordbe, tabokat lecseréltem enterre, de ekkor valami miatt nem egyeztek az elemszámok a 3 forrás munkalapból vett adatokból. Egyik oszlop hosszabb volt mint a másik.
Már bevittem accessbe is, de ott sem igazán vágtam, hogy tudom ezt megcsinálni. Elkezdtem lekérdezéseket gyártani, de egyenként minden oszlophoz csinálni elég macerás, főleg amikor az oszlopválasztáshoz már scrollozni is kell majd.
Csináltam képet, hátha így érthetőbb mit is szeretnék elérni:
a 3 forrásml
és amit el akarok érni:
És ezt végig az abc oszlopban, ugyanis erre kell majd fkeres-eznem.
Tulajdonképpen a forrásml oszlopait kell egymás alá tennem valahogy.[ Szerkesztve ]
-
DIEGO15
őstag
Sub Basic_Web_Query()
With ActiveSheet.QueryTables.Add(Connection:= _
"URL;" & Range("A1").Value, Destination:=Range("$A$2"))
.Name = "q?s=goog_2"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.WebSelectionType = xlSpecifiedTables
.WebFormatting = xlWebFormattingNone
.WebTables = "1,2"
.WebPreFormattedTextToColumns = True
.WebConsecutiveDelimitersAsOne = True
.WebSingleBlockTextImport = False
.WebDisableDateRecognition = False
.WebDisableRedirections = False
.Refresh BackgroundQuery:=False
End With
End SubEzzel próbálkoztaem, de így nem megy "400" hibaüzenettel kiszáll, csak így megy "URL;www.valami.hu" , viszont nekem ez kevés.
-
Nyomdász
csendes tag
Szia!
Nagyon szépen köszönöm a segítséged.
Annyi segítséget még kérnék hogy mivel én egy folyamatosan bővülő adathalmazzal dolgozom ezért a függvények nekem úgy lennének tökéletesek ha teljes a,b,c,d,e,f,g oszlopokat vizsgálnának, lehet butának tűnök de nekem ez valahogy nem akar összejönni végeredménynek mindig #ÉRTÉK!-et kapok.
Intel Rulez!!!
-
Nyomdász
csendes tag
Szia!
Újfent köszönöm a segítséged.
A problémám az hogy ahogy bemásolom az én adathalmazomat az UDF fülnél az összes függvény azt írja hogy #NÉV?, a függvények fülnél pedig a kicsi oszlop függvényeinél azt írja hogy #ÉRTÉK! a módusz tökéletesen működik. Arra gyanakszom hogy régi lehet az office-om, 2007-es, ha nálad nem jelentkeznek ezek a problémák akkor beszerzek egy újabb office-t.
Üdv.
Intel Rulez!!!
-
Nyomdász
csendes tag
Szia!
Bocsi minden rendben csak figyelmetlen voltam, a címsor alatt egy hibaüzenet ékeskedett amit nem vettem észre és ő blokkolta függvényeket, engedélyeztem és láss csodát tökéletesen működnek a függvények. Még egyszer nagyon szépen köszönöm a segítséged.
Üdv.
Intel Rulez!!!
-
Simba86
senior tag
szia!
Nagyon szépen köszönöm a segítséged Mutt!
igen, így valóban sokkal jobb!
mindenkinek köszönöm a nagyon gyors reakciót!
Siemens C35-> Siemens MT50-> Motorola E398-> SE K750i-> Nokia 6220 Classic-> ZTE Blade-> SE Xperia Mini Pro-> Samsung Galaxy S Advance -> Sony Xperia SP -> Huawei P8 Lite -> Xiaomi Redmi Note 4 -> Xiaomi Redmi Note 6 Pro ->Xiaomi Redmi Note 9 -> Xiaomi Redmi Note 11
-
Mittu88
senior tag
Még egy olyat had kérdezzek, hogy hogy lehet leprogramozni azt, hogy a makró a célcella értéke alapján szűrjön le egy oszlopot?
' proba Makró
'
' Billentyűparancs: Ctrl+m
'
Columns("A: D").Select
Selection.AutoFilter
ActiveSheet.Range("$A$1:$D$17").AutoFilter Field:=1, Criteria1:="60100"
End SubJelenleg így néz ki, az A oszlopban kellene, hogy leszűrje a költséghelyet, tehát a Criteria1-nek kellene, hogy cellára hivatkozás legyen (másik munkalapra).
[ Szerkesztve ]
-
Mittu88
senior tag
Próbáltam az egyszerűbb verziót, szépen le is szűri első alkalommal, aztán megbolondul az egész excel (mintha folyamatosan szűrne) és ezt a hibaüzenetet dobja:
Runtime error '-2147417848 (80010108)':
Automation error
The object invoked has disconnected from its clients.Mit lehet a gond?
Így néz ki eddig a munkalap worksheet kódja:
"Private Sub Worksheet_Calculate()
Const cella As String = "D6"Range("D7").Value = Range(cella).Value
Worksheets("Törzsadatok").Columns("A").AutoFilter Field:=1, Criteria1:=Range(cella).Value
End Sub"
-
cube70
újonc
-
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 ?
Új hozzászólás Aktív témák
- Biztonsági aggályok miatt késik a Microsoft hatalmas AI-újítása
- Z Fold6 imitátor árulkodik a fogyókúrázó igaziról
- Milyen légkondit a lakásba?
- Vicces képek
- Politika
- LEGO klub
- Mobilinternet EU-n kívül, eSIM adatcsomagok használata
- Üzleti vita és megbeszélés
- Béta iOS-t használók topikja
- Villanyszerelés
- További aktív témák...
- Windows 10/11 Home/Pro , Office OEM/Retail kulcsok
- Játékkulcsok olcsón: Steam, Uplay, GoG, Origin, Xbox, PS stb.
- Game Pass Ultimate előfizetések 1 - 25 hónapig azonnali kézbesítéssel a LEGOLCSÓBBAN!
- Eladó Steam kulcsok kedvező áron!
- Bitdefender Total Security 3év/3eszköz! - "Tökéletes védelem most kedvező áron..."