-
GAMEPOD.hu
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
-
lappy
őstag
válasz GreenIT #37006 üzenetére
fkeres függvénnyel
FKERES(keresni kívánt érték; tartomány, amelyben az érték megtalálható; visszatérési érték oszlopszáma a tartományban; pontos egyezés vagy közelítő egyezés – 0/HAMIS vagy 1/IGAZ érték)
a keresés és érték visszaadásnál be kell írni vagy kattintva a munkalap nevét
[ Szerkesztve ]
Bámulatos hol tart már a tudomány!
-
GreenIT
tag
válasz GreenIT #37266 üzenetére
Webes keresessel "serial total", vagy "account" fuggvenyeket ir a support office weboldal, de az excel ezeket nem ismeri.:-(
Ezt talaltam:
SERIAL TOTAL function
Scope: Excel 2016 Excel 2013 Excel 2010 Excel 2007 Mac Excel 2016 More ...
This topic presents the formula syntax and usage of the Microsoft Excel SPEAKER function.Description
Multiply the corresponding elements of the specified arrays and then calculate the amount of the products.Syntax
TABLE OF CONTENTS (array1; [array2]; [array3]; ...)The syntax of the FUNCTION function includes the following arguments:
Block1: Required to enter. The first block argument to calculate the product sum.
Block2, array3, ...: Not mandatory. Figures 2-255. an array argument that you want to estimate the product sum.
Notes
Arrays between arguments must be of the same size. If this is not the case, the CONTRACTOR is # VALUE! returns error value.THE COUNTRY CONNECTION considers non-numeric elements of arrays to be zero.
Example
Copy the sample data from the table below and paste them into a new Excel worksheet A1 cell. If you want the formulas to display the result, highlight them and press F2 then Enter. If necessary, you can change the width of the columns to see all the data visible.Block 1
Block 2
3
4
2
7
8
6
6
7
1
9
5
3
Formula
Description
Result
= ACCOUNT (A2: B4; D2: E4)
Combine the components of the two blocks and add the items together. Value: 3 * 2 + 4 * 7 + 8 * 6 + 6 * 7 + 1 * 5 + 9 * 3 (156)
156
-
lappy
őstag
-
0P1
aktív tag
válasz GreenIT #37884 üzenetére
Szia,
Gondolom , kimutatáshoz / diagramhoz kell az idősor. A sima Pivotban nem lehet, de PowerPivotban igen. (2010-hez külön bővítményként tölthető le) . Csak létrehozol egy dátum táblát (Dátumtáblázat/Új)
http://jegyzetek.biprojekt.hu/Datum-tabla-az-Excel-2016-ban
Majd kiszűröd hét napja oszlopban a Szombatokat és Vasárnapokat (És meg egyéb egyéni testreszabásokat is csinálhatsz). Aztán beállítod az eredeti tábládhoz a kapcsolatot a most létrehozott egyéni időtábládhoz, és onnantól kezdve ugyanolyan módon használhatod ezt egyéni idősorként, mint hagyományos pivotban.
-
Delila_1
Topikgazda
válasz GreenIT #37884 üzenetére
A Munka1 lap A1 cellájától kezdve bevittem az idei dátumokat, ez A365-ig tart.
A Munka2 lap A oszlopába az idei ünnepnapok dátumát írtam be, a C-be pedig a "ledolgozós" szombatokét.A lenti makró kitörli a Munka1 A oszlopából a megfelelő sorokat.
Sub Munkanapok()
Dim sor As Integer, WF As WorksheetFunction
Set WF = Application.WorksheetFunction
Sheets("Munka1").Select
For sor = 365 To 1 Step -1
If WF.CountIf(Sheets("Munka2").Columns(3), Cells(sor, 1)) > 0 Then GoTo Tovabb 'szombati munkanap
If WF.CountIf(Sheets("Munka2").Columns(1), Cells(sor, 1)) > 0 Then Rows(sor).Delete Shift:=xlUp 'ünnepnap
If WF.Weekday(Cells(sor, 1), 2) > 5 Then Rows(sor).Delete Shift:=xlUp 'hétvége
Tovabb:
Next
End SubAmelyik listában nem akarod a hétvégéket törölni, annál tedd megjegyzésbe a hétvégés makrós sort úgy, hogy a sor elejére aposztrófot teszel.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Fferi50
őstag
válasz GreenIT #38852 üzenetére
Szia!
Csak ötletelek, hátha mégis tudod használni:
Gondolom a 3 munkalap első sorában vannak a terméknevek, első oszlopában pedig az összetevők megnevezései.
Ebben az esetben én megpróbálnám a következőt:
Az első sor után beszúrnék egy üres sort mindhárom munkalapon.
Az üres sor képlete, kezdve a második oszloptól:
=B1 & "P" az első munkalapon
=B1 & "K" a második munkalapon
=B1 & "S" a harmadik munkalapon
A képletet végighúzni addig, ameddig termékek vannak. Ezután ezt a sort kijelölni. Másolás - irányított beillesztés - értéket.
Ezután az első sort ki lehet törölni.
Így a 3 munkalapon különböző termékneveid vannak, ami az összesítésnél külön-külön oszlopban fog megjelenni. Az összesítésnél be kell jelölni, hogy a feliratokat vegye a felső sorból és a bal oszlopból.Ezután az összesítő lapon ugyanezt visszafelé meg kell játszani:
Üres sor beszúrása:
B2 cella képlete =Bal(B1;Hossz(B1)-1)
C2 cella képlete =Ha(Bal(C1;Hossz(C1)-1)=B2;"";Bal(C1;Hossz(C1)-1)
Ez utóbbi képlet végighúzható az oszlopokon. Így csak egy-egy név marad meg. Utána persze itt is Másolás- irányított beillesztés - értéket. Majd az első sor törölhető.Ha a terméknév alatt még más is lenne, azaz nem egy sor a "fejléc" , akkor csinálni kell egy másolatot mindhárom munkalapról (ez egyébként is ajánlott) és a második és további sort törölni, majd az összesítésre visszamásolni.
Nagyjából erre gondoltam, amikor az összeítést javasoltam.
Üdv.
-
Fferi50
őstag
válasz GreenIT #38852 üzenetére
Szia!
Még egy kiegészítés. Az összesítésnél az adatok sajnos nem a fejlécek szerinti ABC rendben, hanem az egyes táblákban levő sorrendnek megfelelően lesznek.
Ezért mielőtt a nevek "egyesítését" elvégeznéd, további 3 műveletre van szükség:
1. A kapott eredményt másolod, majd irányított beillesztéssel transzponálva beilleszted egy új lapra.
2. Az új helyen csinálsz egy sorbarendezést a terméknevek szerint.
3. Az így kapott adatokat másolod és szintén transzponálva visszamásolod az összesítő lapra.Ezután már jöhet a terméknevek "szabás - varrása", mert egymás után lesznek az oszlopok.
Ha nem szeretnéd, hogy a termékek sorrendje megváltozzon, akkor az összesítés előtt átnevezésnél a nevek elé is kell tenni egy folyamatosan növekvő azonosítót, pl. az oszlopot és nem a színek kezdőbetűjét tenném a végére, hanem pl A,B,C betűt.
Vagyis a képlet így nézne ki =Jobb("000" & Oszlop();3) & B1 & "A" az első munkalapon, & "B", & "C" a többin.
Ebben az esetben a sorbarendezésnél nem fog változni az eredeti sorrend.
A név szétszedés képlete is változik természetesen, a transzponálás, sorbarendezés, transzponálás után.
Az első, induló képlet = Közép(B1;4;Hossz(B1)-4)
a folytatás pedig: =Ha(Közép(C1;4;Hossz(C1)-4)=B2;"";Közép(C1;4;Hossz(C1)-4))Üdv.
-
Teejay83
tag
-
ny.janos
tag
válasz GreenIT #38859 üzenetére
Szia!
Ha a B2 cellától jobbra és lefelé található értékeid a K, P és S munkalapokon állandóak és a sorok mindegyik munkalapon azonos sorrendben vannak, nem változnak, akkor simán átmásolod az értékeket az M munkalapra, úgy, hogy a másolást követően beszúrsz egy üres sort az "A"-s oszlopazonosítók alá, majd Ctrl+Enterrel beviszed a K, a P és az S azonosítókat az első 58, második 58 és harmadik 58 oszlopba. Ez 1-2 percet vehet igénybe. Ezt követően kijelölöd az M munkalap teljes területét, majd sorba rendezed oszlopok szerint.
Ha az első három munkalapon az értékek változnak, úgy az M munkalapon a K, P és S munkalapra hivatkozz
=K!B2
formában, s másold a képletet.Ha a soraid nincsenek ugyanazon azonosító szerint rendezve a K, P és S munkalapokon, akkor az FKERES függvényt használd az adatok megkereséséhez az M munkalapon. A harmadik argumentumot az FKERES függvényben a SOR vagy SOROK függvénnyel add meg.
Ha az értékeid változnak, vagy a soraid sorrendjei a munkalapokon nem azonosak, úgy a sorba rendezés oszlopok szerint természetesen az utolsó lépés legyen.
[ Szerkesztve ]
-
Fferi50
őstag
válasz GreenIT #38859 üzenetére
Szia!
Próbáld ki ezt a makrót:
Sub Makró1()
'
' Összesítés
Dim ws As Worksheet, uszlp As Integer, wso As Worksheet, wss
Set wss = Sheets(Array("Munka1", "Munka2", "Munka3"))
wss.Copy after:=Sheets(Sheets.Count)
For Each ws In wss
With ws
uszlp = .Range("A1").End(xlToRight).Column
.Rows(2).Insert shift:=xlDown
With .Range(.Cells(2, 2), .Cells(2, uszlp))
.Formula = "=RIGHT(""000""&COLUMN(),3)&B1&$A$1"
.Value = .Value
End With
.Rows(1).Delete shift:=xlUp
End With
Next
Set wso = Sheets.Add(after:=Sheets(3))
wso.Name = "MunkaÖ (S)"
Selection.Consolidate Sources:=Array(Sheets("Munka1").Range("A1").CurrentRegion.Address(external:=True, ReferenceStyle:=xlR1C1), _
Sheets("Munka2").Range("A1").CurrentRegion.Address(external:=True, ReferenceStyle:=xlR1C1), Sheets("Munka3").Range("A1").CurrentRegion.Address(external:=True, ReferenceStyle:=xlR1C1)), Function:= _
xlSum, TopRow:=True, LeftColumn:=True, CreateLinks:=False
Range("A1").CurrentRegion.Offset(0, 1).Sort key1:=Rows(1), order1:=xlAscending, Orientation:=xlSortRows, Header:=xlYes
With wso
uszlp = .Range("B1").End(xlToRight).Column
.Rows(2).Insert shift:=xlDown
.Range(.Cells(2, 2), .Cells(2, uszlp)).Formula = "=MID(B1,4,LEN(B1)-4)"
.Range(.Cells(2, 2), .Cells(2, uszlp)).Value = .Range(.Cells(2, 2), .Cells(2, uszlp)).Value
.Rows(3).Insert shift:=xlDown
.Range(.Cells(3, 2), .Cells(3, uszlp)).Formula = "=right(B1,1)"
.Range(.Cells(3, 2), .Cells(3, uszlp)).Value = .Range(.Cells(3, 2), .Cells(3, uszlp)).Value
.Rows(1).Delete shift:=xlUp
.Range("A1").Value = "M"
End With
For Each ws In Sheets
If InStr(ws.Name, "(") = 0 Then
ws.Delete
Else
ws.Name = Left(ws.Name, InStr(ws.Name, "(") - 2)
End If
Next
End Sub
A munkanap nevek helyére írd a nálad levő neveket. Csak ez a három munkalap legyen indulóban a munkafüzetben.Üdv.
-
Pakliman
tag
válasz GreenIT #39216 üzenetére
Segítség leginkább az utóirathoz.
A Kezd és Végez paraméter EGÉSZ!!szám (pl.: 2352) és idő formátumot is tud kezelni.
A függvény kezeli az egyik napról a másikra átnyúló időt.
Mindhárom fv használható makróban és cellában is.Public Function ElteltIdő(Kezd, Végez, Optional bVisszaPercben As Boolean = True)
Dim xKezd As Long
Dim xVégez As Long
If IsDate(Kezd) Then
xKezd = (Hour(Kezd) * 60) + Minute(Kezd)
Else
xKezd = NtoP(CLng(Kezd))
End If
If IsDate(Végez) Then
xVégez = (Hour(Végez) * 60) + Minute(Végez)
Else
xVégez = NtoP(CLng(Végez))
End If
If xVégez < xKezd Then xVégez = xVégez + 1440
ElteltIdő = IIf(bVisszaPercben, xVégez - xKezd, PtoN(xVégez - xKezd))
End Function
Public Function NtoP(szám) As Long
'1234 formátumú (12 óra 34 perc) számot kell megadni
'Az eredmény a percek száma
'Pl.: NtoP(123)=83 (1 óra 23 perc = 83 perc)
NtoP = ((szám \ 100) * 60) + (szám Mod 100)
End Function
Public Function PtoN(szám) As Long
'Perceket kell megadni
'Az eredmény egy 1234 formátumú (12 óra 34 perc) szám
'Pl.: PtoN(83)=123 (1 óra 23 perc)
PtoN = ((szám \ 60) * 100) + (szám Mod 60)
End Function -
marchello1
csendes tag
válasz GreenIT #39510 üzenetére
Szia,
Vannak húzó személyek és egy "kalap" (egy másik oszlop ugyan ezekkel a nevekkel) amiben ezeknek a személyeknek a nevei vannak.
A kalapban lévő neveket véletlen sorrendben, a másik oszlopban lévő nevek mellé kéne rendelni.
Ezt min úgy, hogy saját magát ne "húzza" senki.Ezt szeretném valahogy megoldani.
[kép] -
GreenIT
tag
válasz GreenIT #39797 üzenetére
Most latom, az alap listaban (4.1) a 00, 80 es FF kodok vannak kombinalval (a szurke szin a kivetel).
Elso ranezesre hianyosnak tunik, a lista, most agyilag zokni vagyok, de szerintem a 3 kod osszes valtozata joval tobbnek kellene lennie 16-nal, nemde?
Csinalna valaki egy teljes listat, hogy mely kodok hianyoznak?
-
Delila_1
Topikgazda
válasz GreenIT #39840 üzenetére
Írd be a keresőbe: "letöltési sebesség mérése".
Kapsz egy halom linket, amik ezt a célt szolgálják. A mérés előtt kapcsolj ki minden letöltést, ami befolyásolhatná a mérés eredményét.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Delila_1
Topikgazda
válasz GreenIT #39842 üzenetére
Ilyen nincs. A letöltés sebessége függ a szolgáltatódtól rendelt csomagtól, és a saját géped hardverétől, továbbá attól is (Excel fórumon vagyunk), hogy a letöltendő fájl mennyire zsúfolt képletekkel, formátum beállításoktól, stb...
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
ny.janos
tag
válasz GreenIT #39844 üzenetére
Ne már... A neten tényleg elég sok átváltót találsz, ha az elméletre vagy kíváncsi.
De az elméleti értékek soha nem fogják a valós értékeket adni. Az alacsony átviteli sebességű aszimmetrikus internetkapcsolatok sajátossága pl., hogy futó torrent feltöltés mellett a letöltési sebesség akár a felére vagy még az alá is visszaeshet, ha a feltöltési sebesség nincs korlátozva, vagy nem használ valaki csomagütemező programot. D ez persze csak 1 tényező a sok lehetséges közül. Vagyis egy letöltött fájl méretéből és annak letöltési idejéből szinte biztosan nem fogod tudni pontosan megmondani a letöltési sebességet. Közelítő értéket is csak akkor, ha a körülmények ideálisak.
Ha ennél többre vagy kíváncsi, azt tényleg nem az excel fórumban kellene megvitatni szerintem.
-
ny.janos
tag
válasz GreenIT #39846 üzenetére
15,17658991 Mbit/sec.
(2.214.568 KB / 1024 = 2162,664063 MB * 8 = 17301,3125 Mbit / (19*60))
Amúgy tényleg nem értem, hogy mi ebben a nehézség. A prefixumok közötti váltószám 1204, míg a byte a bit nyolcszorosa. Ez kiderül a linkelt átváltóból is. Ezek alapján a Letöltött adatmennyiség mbit-ben egyszerűen számolható. Elosztod annyival, ahány másodperc alatt leért, s megkapod az eredményt.
[ Szerkesztve ]
-
ny.janos
tag
válasz GreenIT #39852 üzenetére
A használatban lévő méret közötti eltérés furcsa (elírtad esetleg?), de a többi adat (free és total) tökéletesen egyezik. Win7 bájtban írt értéket osztod 1024-el és megkapod a TC által írt értéket KB-ban.
TC általános beállításaiban a fájlablak résznél be tudod állítani, hogy az is bájtban mutassa az értékeket, ne KB-ban.Nézd csak, így szerintem egyértelmű lesz neked is.
Win furcsasága annyi, hogy nem matematikailag kerekít, hanem mindig lefelé.
[ Szerkesztve ]
-
Mutt
aktív tag
válasz GreenIT #39932 üzenetére
Szia,
...Excelbol listat szovegfajlba masolnak, akkor a szovegfajlban minden sor utan legyen egy vagy ket ures sor?
Töltsd le innen a makrómat és használd.
Ha gyakran kell, akkor érdemes Add-int csinálni belőle.
üdv
A tanácsaimat ingyen adom. Ha nem tetszik, akkor kérlek ne kritizáld! / https://github.com/viszi/codes/tree/master/Excel
-
ny.janos
tag
válasz GreenIT #40081 üzenetére
Szia!
Az általad feltöltött fájl 2. és 4. munkalapján próbálkoztam. Az eredményt feltöltöttem IDE.
A 2. munkalapon az értékeket előbb a B oszlopra (dátum) rendeztem. Ezt követően a 4. munkalapon a dátumokat a függvény beírja sorban. (Feltéve, hogy minden dátum egyszer szerepel. Ha ez nem teljesül, akkor más megoldást kell keresni.)
A termékcsoport kódhoz hasonlóan, a képlet értelmezését követően az 1-3 munkalap párosra (induló típus kód) biztosan magad is meg fogod tudni csinálni a képletezést.A képlet keretét egy HA függvény adja, mely vizsgálja, hogy az A oszlop adott sorában szereplő érték dátum-e vagy sem (mivel a dátum egy képlet eredménye, ezért a KÉPLET függvényt használtam ehhez).
A képlet belsejében HOL.VAN függvénnyel kerestem meg a dátum és termékcsoport kód összefűzött értékének helyét a 2. munkalapra beszúrt segédoszlopból (D). Az eredményként kapott sor alapján az INDEX függvény adja meg a 10x14-es termékcsoport tagját. A HAHIBA értelemszerűen azért van, hogy a hibaérték ne jelenjen meg a táblázatban.
A képlet utolsó része ugyanez a HAHIBA – INDEX – HOL.VAN hármas, annyi különbséggel, hogy a keresendő dátum és termékcsoport kód összefűzött értékét nem az aktuális, hanem a felette lévő sorból kell vennünk, hiszen ott szerepel a dátum. -
ny.janos
tag
válasz GreenIT #40084 üzenetére
D segédoszlop: Az utolsó karaktert jól látod, az van szimplán a dátummal összefűzve (mivel a dátum ugye alapvetően egy szám (a 1900.01.01. óta eltelt napok száma).
=JOBB(A2;1)&B2
is lehetett volna (ez logikusabb is).
4. lap első sor (dátum): Az index függvény a 3. laprólSheet2!$B$2:$B$5
veszi ki a dátumot. Mindig az első oszlopból (utolsó argumentum - 1), abból a sorból, ami az éppen aktuális cella sora számának a feleSOROK($A$1:$A2)/2
. A felezésre azért van szükség, hogy minden 2. sorba kerüljön csak a következő dátum (a közvetlen alatt levő sorba jön a megjegyzésed). Ha több lesz az adatod, akkor A2:A3 tartományt kijelölve másold a dátumot (így kerül adat minden második sorba).Ma este tudok még rá időt szánni, ha szükséges.
A kérdés elsősorban az, hogy
1) ugyanazon dátumhoz tartozhat-e több azonos induló típus kód / termékcsoport kód (pl: A2M 2019.1.9. és A1O 2019.1.9.), vagy sem? Ha igen, arra valószínűleg nem tudok megoldást.
2) ugyanaz a dátum szerepelhet-e többször (más-más kóddal)? Erre biztosan tudok megoldást /feltéve, ha 1) eset nem áll fent/. (A 4. fül képletezése jelenlegi formájában is alkalmas erre, csak az A oszlopot kell átalakítani hozzá.)[ Szerkesztve ]
-
ny.janos
tag
válasz GreenIT #40087 üzenetére
Az a helyzet, hogy ha azonos dátumon van pl. F2O es F2P vagy C1S es D1S, akkor az általam készített megoldás csak az első találatot fogja beírni a táblába, a másodikat nem. Azt meg lehet csinálni, hogy ha azonosság található, akkor azt feltételes formázással színezze az első és második munkalapon, mely alapján már manuálisan kiegészíthető a táblázat. De olyan megoldást ahol mindkettő bekerül a 3. és 4. munkalapra én a jelenlegi tudásommal nem tudok prezentálni (lehet, hogy makró nélkül nem is lehet megcsinálni).
Ahhoz, hogy a dátumot csak minden második sorba szúrjuk be a 4. munkalapon, a következőket alkalmaztam:
Mivel A2 az első cella, ahol az első dátum fog szerepelni, ezért a SOROK függvénnyel megszámoltam, hogy A1-től A2-ig hány sor található (az A1 rögzített, így mindig az első sortól az aktuálisig számolja a sorok számát). Ez ugye 2. Mivel nekem az első dátumadatra van szükségem, majd a 4. sorba a másodikra és így tovább, ezt az értéket osztottam kettővel. Az INDEX függvény pedig kiválasztja nekünk, hogy a második munkalap dátum oszlopában a tartományunkból $B$2:$B$akármennyi melyik az 1. sorban és az 1. oszlopban (mivel csak 1 oszlop van kijelölve, ez értelemszerűen nem változik) szereplő dátum.[ Szerkesztve ]
Új hozzászólás Aktív témák
- Háztartási gépek
- Autós topik
- Kerékpárosok, bringások ide!
- A fociról könnyedén, egy baráti társaságban
- Főzőcskés topic
- Kínai, és egyéb olcsó órák topikja
- Samsung Galaxy S23 és S23+ - ami belül van, az számít igazán
- World of Tanks - MMO
- Van, amit nehéz lett megtalálni a Google keresőjével
- Milyen okostelefont vegyek?
- További aktív témák...