- Milyen okostelefont vegyek?
- Samsung Galaxy S23 Ultra - non plus ultra
- iPhone topik
- Xiaomi 15 - kicsi telefon nagy energiával
- Samsung Galaxy S21 FE 5G - utóirat
- Vivo X200 Pro - a kétszázát!
- Nem várt platformon a OnePlus Nord 5
- Megérkezett a Google Pixel 7 és 7 Pro
- Samsung Galaxy Watch5 Pro - kerek, de nem tekerek
- 45 wattos vezeték nélküli töltés jön az új iPhone-ba
-
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
-
bteebi
veterán
válasz
Delila_1 #21098 üzenetére
Basszus, összességében már vagy 15 éve dolgozom Excellel, de ezt nem tudtam
(amúgy nem én állítottam arra, ezt más táblázatában készítettem). Szerintem egyébként a következetességében van egy kis anomália, legalábbis az én értelmezésemben. Ha már egyszer bevette a képleteket, akkor állíthatom bármire a formátumot (akár szövegre is), akkor is a képlet értékét fogja kijelezni, fordítva viszont nem.
Számomra úgy lenne logikus, hogyha visszaállítom szöveg formátumúra, akkor a cella tartalmát, és ne a képlet (hivatkozás) értékét jelezze ki. Azon persze lehet vitatkozni, hogy jobb lenne-e úgy; valószínűleg nem, de nekem logikusabb lenne. Már csak amiatt se gondoltam volna, hogy a cellaformátum miatt van ez a probléma, mert ez így egy aszimmetrikus reláció (cellaformátum - képlet), az meg nem jó
.
-
bteebi
veterán
válasz
Delila_1 #21076 üzenetére
Nagyon köszönöm!
Huhh, hát ez egy kicsit elegánsabb és egyszerűbb, mint az enyém
. Valamiért egyébként azt csinálja, hogy bár beírja az adott cellákba a képletet (tehát pl. =$G$11), de nem az ehhez tartozó érték jelenik meg, hanem a képletet írja ki. Ez vajon mitől lehet? Excel bug?
-
Delila_1
veterán
válasz
Salex1 #21084 üzenetére
Igen, a gomb click eseményébe csak ennyit kell írnod: auto_open.
A lenti makró működik gombról.Sub masol()
Dim sor As Long, usorR As Long, usorM As Long
Dim WSR As Worksheet, WSM As Worksheet
Set WSR = Sheets("Rendszerek")
Set WSM = Sheets("Munkák")
usorR = WSR.Range("A" & Rows.Count).End(xlUp).Row
usorM = WSM.Range("B" & Rows.Count).End(xlUp).Row + 1
For sor = 2 To usorR
If WSR.Cells(sor, "O") = 1 Then
WSM.Cells(usorM, "B") = WSR.Cells(sor, "C").Value
WSM.Cells(usorM, "H") = WSR.Cells(sor, "H").Value
WSM.Cells(usorM, "G") = "Terv"
WSR.Cells(sor, "O") = "áttéve"
usorM = usorM + 1
End If
Next
WSM.Range("A1").AutoFilter Field:=7, Criteria1:="<>kész"
End Sub -
csongi
veterán
Sziasztok.
Adott két munkafüzet. mindkét munkafüzetben vannak azonos értékű elnevezésű cellák.
Hogyan lehet ezt a két munkafüzetet összefésülni?
Ez két árlista, és egyes termék nevekhez tartozik még pár adat: Pl ár, besorolás stb.
Az irányadó a termék azonosítója. Azt szeretném ha nem kellene cellánként átnéznem és javítanom az adott azonosítókhoz tartozó változásokat, és kézzel átírni. Kb 18000 sor van -
mexel
veterán
Ja, megvan. Ez 0,000 itt 101 nulla van és akkor jön az érték.
-
mexel
veterán
Egyolyan kérdésem lenne, hogy kaptam varianciaanalízisre egy ilyen számot az excelben: 4,1458E-101
Ezt hogy értelmezzem? Ez mínusz szám? Pontosabban a cellában ennyi látszik: 4,1E-101. -
Salex1
őstag
válasz
Delila_1 #21080 üzenetére
Rendszerek C oszlopát kell a Munkák B oszlopba, illetve a H-t a H-ba.
De a lényeg, hogy a munkafüzet megnyitásánál az auto_open makróban rendesen lefut, hiba nélkül, viszont, egy command_button-hoz rendelve, ugyanazon szöveg átmásolva már nem. Nem okoz hibát, de nem is végzi el a feladatát.Sheets("Rendszerek").Select
' megkeresi az utolso ures cellat
FinalRow = Cells(Rows.Count, 1).End(xlUp).Row
' vegigmegy a cellakon 2_vel kezdve
For X = 2 To FinalRow
' eldönti másoljon-e a cells_x,15 cella alapján
ThisValue = Cells(X, 15).Value
If ThisValue = "1" Then
' ha a 15 azaz O cella 1 akkor masol
Cells(X, 3).Resize(1, 1).Copy
' munka1 lap kivalasztasa
Sheets("Munkák").Select
' a kovetkezo ures sor 2 azaz B oszlopaba irja a kivalasztott cellat
NextRow = Cells(Rows.Count, 2).End(xlUp).Row + 1
Cells(NextRow, 2).Select
Selection.PasteSpecial Paste:=xlPasteValuesAndNumberFormats, Operation:= _
xlNone, SkipBlanks:=False, Transpose:=False
Sheets("Rendszerek").Select
Cells(X, 15) = "áttéve"
' a lejáratidátumot is átviszi a 8.(H) oszlopba
Cells(X, 8).Resize(1, 1).Copy
Sheets("Munkák").Select
Cells(NextRow, 8).Select
Selection.PasteSpecial Paste:=xlPasteValuesAndNumberFormats, Operation:= _
xlNone, SkipBlanks:=False, Transpose:=False
' 7. oszlopba beírja, hogy TERV
Cells(NextRow, 7).Select
ActiveCell.FormulaR1C1 = "Terv"
Sheets("Rendszerek").Select
End If
Next X
' kijelölés megszüntetése
Application.CutCopyMode = False
Sheets("Munkák").Select
Selection.AutoFilter Field:=7, Criteria1:="<>kész", Operator:=xlAndSzerk: Jut eszembe, lehetséges valahogy a command_buttonnal meghívni az auto_open makrót?
-
sziasztok!
van ötletetek, hogy ha több sort akarok kijelölni, akkor az alábbi egyszerű kódra miért kapok type mismatch hibát?
Rows("i+1:i+23").Select
Selection.Deleteköszönöm!
-
Delila_1
veterán
válasz
Salex1 #21066 üzenetére
Úgy látom, túlbonyolítottad, és elég rosszul látszik a makró. Ha a bemásolás után kijelölöd a szöveget, majd a Programkód gombra kattintasz, látható lesz, és a tagolások sem tűnnek el, átláthatóbb lesz, jobban lehet értelmezni.
Nagyjából azt vettem ki, hogy a Rendszerek lapról azoknak a soroknak bizonyos értékeit kell átmásolnod a Munkák lap első üres sorába, ahol az O oszlopban 1-es érték van. Ezután az O oszlop kérdéses sorába "Áttéve" szöveget íratsz, a G-be "Terv"-et.
Add meg, melyik oszlopok értékeit kell másolni a Munkák lap melyik oszlopaiba (pl. a H-t a H-ba).
-
Delila_1
veterán
válasz
dellfanboy #21077 üzenetére
Nyitva kell lennie. Az Excelből nem is látod, mert rejtett füzetként jelenik meg, csakis a VBE-ben látszik.
-
Delila_1
veterán
válasz
dellfanboy #21074 üzenetére
Mivel a makrót a personalba tetted, igen, normális. No de miért zárod be a personalt?
-
Delila_1
veterán
válasz
alfa20 #21069 üzenetére
Gondolom, a label nem tartalmazza a kiterjesztést.
A makró további részét egyszerűsítheted. A select utasítások nem szükségesek, és lassítják a futást.
Dim oszlop As Long
Rows("1:2").Delete shift:=xlUp
Rows("1:1").NumberFormat = "@"
For oszlop = 1 To 27: Cells(1, oszlop) = oszlop & "": Next -
Süvi
őstag
Sziasztok!
Korábban egy prezentációban láttam, hogy volt egy olyan dia a ppt-ben, amin keresztül "át lehetett menni Excel-be". Az előadó nem nyitotta meg külön az Excel-t, hanem a dia egy adott részén jött be és lehetett benne mozogni is, be lehetett mutatni a teljes számítást.
Tudja esetleg valaki, hogyan lehet ezt?Köszönöm
-
Gabcsika
tag
Halihó!
Rég jártam erre...
Nos. Van két diagramom, hogy tudom egy diagramban megjeleníteni őket?
Külön színe kell legyen a két függvénynek és persze ne kösse őket össze.Köszi!
-
alfa20
senior tag
Sziasztok,
Van egy makróm ami magában szépen működik, de szeretném egy UserFrom-ba tenni az űrlap részét, az UserFrom kész van a működő makrót is áthelyeztem, viszont rögtön az elején el is akadtam, mert az alábbi résznél hibára fut:
Workbooks.Open Filename:=forras_allnev, UpdateLinks:=False
forras_nev = ActiveWorkbook.Name
A forras_nev nem tetszik neki, pedig az nagyon kellene, mert a fülnév minden nap változik, ez miatt viszont fontos lenne egy váltózóban tárolni a további képlet hivatkozások miatt (és persze mind a 6 táblában vannak fülnevek amiket szintén tárolni kellene)).A makró eleje így néz ki most:
Sub xy_rnd()
Dim forras_allnev As Worksheet, keszlet_allnev As Worksheet, _
ab_allnev As Worksheet, felt_allnev As Worksheet, kert_allnev As Worksheet
forras_allnev = UserForm1.Label1.Caption
keszlet_allnev = UserForm1.Label2.Caption
ab_allnev = UserForm1.Label3.Caption
felt_allnev = UserForm1.Label4.Caption
kert_allnev = UserForm1.Label5.Caption
Unload UserForm1
Workbooks.Open Filename:=forras_allnev, UpdateLinks:=False
forras_nev = ActiveWorkbook.Name
forras_fulnev = ActiveSheet.Name
Workbooks.Open Filename:=forras_allnev
Rows("1:1").Select
Selection.Delete Shift:=xlUp
Rows("2:2").Select
Selection.Delete Shift:=xlUp
Columns("A:A").Select
Selection.Delete Shift:=xlToLeft
Range("A1:AA1").Value = Array("1", "2", "3", "4", "5", _
"6", "7", "8", "9", "10", "11", "12", "13", "14", _
"15", "16", "17", "18", "19", _
"20", "21", "22", "23", "24", "25", "26", "27")eredetiben meg így nézett ki, ami működik is:
Sub xy_rnd()
forras_allnev = Range("c3").Value
keszlet_allnev = Range("c4").Value
ab_allnev = Range("c5").Value
felt_allnev = Range("c6").Value
kert_allnev = Range("c7").Value
aktnev = ActiveWorkbook.Name
Workbooks.Open Filename:=forras_allnev, UpdateLinks:=False
forras_nev = ActiveWorkbook.Name
forras_fulnev = ActiveSheet.Name
stb... -
bteebi
veterán
Sziasztok!
Van egy 8×12-es tömböm a G11
18-as tartományban. Azt szeretném, ha ezen cellák tartalmát a D sorba (D2-től lefelé) egy makró "meghivatkozná" képletként - tehát a értéke D2 az lenne, hogy "=G11", a D3-é az, hogy "=H11", a D97-é pedig az, hogy "=R18" - tehát ha bármit megváltoztatnék a tömbben, akkor az automatikusan átíródna a D oszlopban. Ezt a makrót írtam rá:
Sub masolas()
Dim i As Integer, j As Integer
For i = 1 To 12
For j = 1 To 8
If Cells(j + 10, i + 6) <> "" Then
Cells(1 + (j - 1) * 12 + i, 4).Formula = Cells(j + 10, i + 6).Formula
Else: Cells(1 + (j - 1) * 12 + i, 4).Value = ""
End If
Next j
Next i
End SubAlapvetően működik is, de csak az adott cella értékét írja be, nem pedig képletként hivatkozik rá. Hogy kellene átírnom? Előre is köszönöm a segítségeteket!
-
csongi
veterán
válasz
alfa20 #21036 üzenetére
Kipróbálom.
Új kérdés, össze tett!
Hogyan lehet olyat csinálni, hogy mondjuk a G oszlopba összesítse a C oszlop eredményeit. Úgy hogy az ne automatikus legyen, hanem egy összesít gombra történjen meg, és ennek az oszlopnak (C) az értékeit ki lehessen nullázni. Majd a nullázás után, megint lehessen összesíteni.Nyomtatási kép:
Hogyan lehet beállítani a nyomtatásnál, hogy csak azok kerüljenek nyomtatásra, amik a G oszlop értékeinél a nullától eltérő értéket mutat. Vagyis pl: a G12 cella értéke nulla akkor az nyomtatva legyen az F12 cellával együtt. HA a G12 értéke nulla akkor ne legyen nyomtava és az F12 cella sem.Adott két munkafüzet. mindkét munkafüzetben vannak azonos értékű elnevezésű cellák.
Hogyan lehet ezt a két munkafüzetet összefésülni?
Ez két árlista, és egyes termék nevekhez tartozik még pár adat: Pl ár, besorolás stb.
Az irányadó a termék azonosítója. Azt szeretném ha nem kellene cellánként átnéznem és javítanom az adott azonosítókhoz tartozó változásokat, és kézzel átírni. Kb 18000 sor van -
Salex1
őstag
Az mitől lehet, hogy ha auto_opennel hívok meg egy makrót akkor rendben működik, de, ha ugyan azt command_button-nal teszem, akkor látszólag lefut, de nem hajtja végre a feladatát?
Egyik munkalapról a másikra kellene bizonyos adatokat átmásolni neki...Private Sub CommandButton4_Click()
Sheets("Rendszerek").Select
' megkeresi az utolso ures cellat
FinalRow = Cells(Rows.Count, 1).End(xlUp).Row
' vegigmegy a cellakon 2_vel kezdve
For X = 2 To FinalRow
' eldönti másoljon-e a cells_x,15 cella alapján
ThisValue = Cells(X, 15).Value
If ThisValue = "1" Then
' ha az O cella 1 akkor masol
Cells(X, 3).Resize(1, 1).Copy
' munka1 lap kivalasztasa
Sheets("Munkák").Select
' a kovetkezo ures sorba irja a kivalasztott cellat
NextRow = Cells(Rows.Count, 2).End(xlUp).Row + 1
Cells(NextRow, 2).Select
Selection.PasteSpecial Paste:=xlPasteValuesAndNumberFormats, Operation:= _
xlNone, SkipBlanks:=False, Transpose:=False
Sheets("Rendszerek").Select
Cells(X, 15) = "áttéve"
' a lejáratidátumot is átviszi a H oszlopba
Cells(X, 8).Resize(1, 1).Copy
Sheets("Munkák").Select
Cells(NextRow, 8).Select
Selection.PasteSpecial Paste:=xlPasteValuesAndNumberFormats, Operation:= _
xlNone, SkipBlanks:=False, Transpose:=False
' G oszlopba beírja, hogy TERV
Cells(NextRow, 7).Select
ActiveCell.FormulaR1C1 = "Terv"
Sheets("Rendszerek").Select
End If
Next X
Application.CutCopyMode = False
Sheets("Munkák").Select
Selection.AutoFilter Field:=7, Criteria1:="<>kész", Operator:=xlAnd -
mexel
veterán
Sziasztok! Arra van valami lehetőség, hogy egy adott részen, az üres cellákba beírjak valamit egyszerre? Pontosabban az üres részekre nullát kellene írnom, de nem szeretném egyesével megkeresni hogy hol vannak az üres részek.
Na már válaszolok is magamnak, hátha másnak is hasznos lesz:
"Kijelölöd a területet, Ctrl+g-vel behívod az Ugrás menüt, Irányított, Üres cellák. Ekkor kijelöli a területen lévő összes üres cellát. Beírod a szöveget, és Ctrl+enterrel egyszerre beviszed az összes cellába." -
-
gyga
senior tag
válasz
alfa20 #21061 üzenetére
sztem egy sima ha függvény elég ide lenyílómenü a választó cellába...
1.
a legördülő listakészítése: rá állsz a kiválasztott cellára és menü-adatok-érvényesítés-lista(kiválasztani) érték tartomány pl egy új munkalapon egymás alá felviszed alma répa stb =lista!(a lista az a munkafüzet lap neve)a1:a2
2. abba a cellába amiben automatikusan változtatni szeretnéd az értéket beleírod ezt, a d2 az a cella amit figyelnie kell:
=ha(d2="alma";"gyümölcs";ha(d2="répa";"zöldség")) -
alfa20
senior tag
sziasztok,
most kicsit az űrlap vezérlőkkel ismerkedem, meg az AciveX vezérlőkkel.
olyat szeretnék, hogy egy beviteli listát készítek, amiben van két választási lehetőség pl.:
1.) alma
2.) répa
ha az almát választom, akkor a B2 és B3 cella tartalma legyen "gyümölcs", ha a répát választom, akkor meg legyen "zöldség".ezt a sima űrlap vezérlőkkel simán meg tudom oldani, hogy pl:
D2= alma
D3= répa
a beviteli lista értéke legyen a D4 cella, a B2 és B3 meg legyen egy ha függvény.olyat lehet, hogy ActiveX vezérlővel készítem el, és én adom meg mi legyen a lista tartalma (ne cella hivatkozás), és ha kiválasztom a megfelelőt, akkor a két cella értéke ennek megfelelően változzon?
Visual Basic 2013-ban simán működik a kiíratás de itt nem fogadja el a "(I)ComboBox1.SelectedItem(/I)" parancsot:
VB2013-ban így nézki:
If ComboBox1.SelectedItem = "hello" Then
Label1.Text = "Hello idegen"
ElseIf ComboBox1.SelectedItem = "szia" Then
Label1.Text = "üdvőzletem"
End If -
Mutt
senior tag
Hello,
Meg lett, de a keresőmotornak is legyen válasz.
Analysis Toolpack-ot kell engedélyezni, és utána Adatok -> Elemzés -> Data Analysis.
üdv
-
mexel
veterán
Sziasztok, ismét kérdésem lenne, jól elvagyok a kérdéseimmel:
Nem tudja valaki hogy a fityfenében találom az excel 2007-ben a kétmintás F-próbát?
Excel 2003-ban az volt a neve azt hiszem hogy "Kétmintás F-próba szórásnégyzetre"
Csak sima F-próbát találok és nem tudom ez ugyanaz-e. Se a neten, sehol nem találok semmit róla. -
mexel
veterán
Azt hogyan tudom megoldani, hogy csak a kijelölt területen cseréljek ki valamilyen betűt számre? Pl "a" betűt 1-esre. A csere funkcióval az egéyz lapon kicseréli hiába jelölök ki egy részt.
-
Delila_1
veterán
válasz
soundsthu #21053 üzenetére
"alma" helyett a kritérium "*alma*" legyen. A csillag helyettesítő karakter, ami azt jelöli, hogy az alma szó előtti és mögötti akárhány karaktert ne vegye figyelembe a képlet. Ez számol azokkal a cellákkal, amiknek tartalma például az "alma", "almafa", "kivirágzott az almafa", stb.
Másik helyettesítő karakter a kérdőjel, ez csak 1 karaktert helyettesít. A "b?mba" kritérium megtalálja a bomba, és a bamba szót.
-
soundsthu
csendes tag
válasz
alfa20 #21050 üzenetére
Szia,
szuper a képlet, csak közben rájöttem hogy előfordulnak olyan megnevezések, amik kettőnél több szóból állnak és azok esetében 0-t ad eredményül.
Az lenne a legjobb, ha elég lenne egy vagy két szót a képletbe írni, hogy aztán az ezeket tartalmazó cellákat is figyelembe vegye
Erre is létezik valamilyen formula?
-
Mutt
senior tag
Hello,
..cella formátumot akarok másolni akkor csak a hátteret másolja át és a feltételes formázás képletet ne!
2 lépésben tudod, egyikben formátumot másolsz a másodikkal törlőd a feltételes formázást.
Range(cél).PasteSpecial (xlPasteFormats)
Range(cél).FormatConditions.Deleteüdv
-
Mutt
senior tag
Hello,
Hogyan lehetne sorba rendezni az adatokat, hogy az első oszlopban csak "a" legyen, a másodikban csak "b" stb?
Megint csak egy CSE képletet tudok adni, AA1 mezőben van a szétszabdalandó adatsorod. A1-ben ez a képleted:
=HA(SZÁM(HOL.VAN(KARAKTER(96+OSZLOP());KÖZÉP($AA1;(SOR(INDIREKT("A1:A"&(HOSSZ($AA1)+1)/2))-1)*2+1;1);0));OSZLOP();"")Ezek után másold a képletet Z1-ig.
Az eredmény ilyen lesz:üdv
-
Mutt
senior tag
válasz
soundsthu #21042 üzenetére
Hello,
Az FKERES a keresendő értéktől jobbra add vissza értéket, ami azt jelenti hogy a keresési tartomány első oszlopában keres és csakis azt vagy tőle jobbra lévő értéket jelenít meg.
Esetedben I-oszlopban van a keresési tartomány és attól a BALRA lévő E-oszlopból eredményt akarsz, erre a bevett képlet a HOL.VAN és INDEX együttes használata.
=INDEX(E$15:E$39;HOL.VAN("banán";I$15:I$39;0))FKERES-sel pedig ez fog működni:
=FKERES("banán";VÁLASZT({2\1};E$15:E$39;I$15:I$39);2;0)üdv
-
alfa20
senior tag
válasz
soundsthu #21042 üzenetére
szia
Az FKERES úgy működik, hogy az első oszlopban meg keresi az első egyezést, majd a megadott oszlopból kiírja az értéket.
A te képleted alapján ez történik:
keresendő szöveg: banán
keresési tartomány: E15:E19
Keresendő érték: 5 azaz az E oszloptól számított 4. oszlop mivel az E az első, azaz I oszlop.
Nálad #HIÁNYZIK mivel nincs egyezés az E oszlopban, nem is lehet, mert ott értékek vannak.ezt a képletet írd be J15-ös cellába, ha az összegre vagy kiváncsi:
=INDEX(E15:I39;HOL.VAN("alma";I15:I39;0);1) -
mexel
veterán
Sajnos nem találok megoldást, sehogy sem sikerül. a "szövegből oszlopok" funkció működne, de sajnos az értékeket nem helyezi egymás alá. Hogyan lehetne sorba rendezni az adatokat, hogy az első oszlopban csak "a" legyen, a másodikban csak "b" stb? Van erre vajon lehetőség? Mert sajnos olyan táblát kapok, mint itt Delila_1 képén a bal szélső adatok.
Ha ezt nem sikerül megoldanom akkor igen sok-sok adatot kellene újból felvinni és azt nem szeretném.
-
mexel
veterán
Köszönöm a segítséget
! Közben lejjebb Delila_1-től is érkezett egy megoldás
, az egyszerűbbnek tűnik, azt ki is próbáltam, csak van egy kis szépséghibája:Ha valamelyik sorban nincs pl "a" btű akkor abba az oszlopba rkja az első betűt amit talál, tehát lehet hogy éppen b vgay c lesz abban az oszlopban sajnos.
Erre megintcsak nem tudom mi a megoldás.
Most ha lesz még időm kipróbálom a módszeredet, hogy az hogy működik. Majd jelzem hogy sikerültDelila_1: ezt a szám átalakítót is kipróbálom, köszi, de erre lehet hogy jó a csere funkció is talán.
Már csak azt kellene kitalálnom hogy tegyem egy oszlopba az azonos értékeket. -
Delila_1
veterán
válasz
Geryson #21031 üzenetére
Szia!
A lapokat elrejtheted. Ha úgy gondolod, hogy ezt könnyen felfedik, a VBA szerkesztőben szigorúbb tiltást adhatsz. Lapfülön jobb klikk, Kód megjelenítése. Ha nem látszik a Properties menü bal oldalon, akkor a View menüből megnyitod.
Az utolsó paraméter a lap láthatósága (visible), ezt weryhidden-re állítva a lap a füzetből nem, csak a VB szerkesztőből tehető ismét láthatóvá.
Másik kérdés:
A HOL.VAN függvény megadja az utolsó kitöltött sorod számát, ha olyan nagy számot kerestetsz vele, amilyen biztosan nincs az adataid között.Vegyük, hogy az árfolyamok a B oszlopban vannak, a képlet:
HOL.VAN(10000;B:B;1)Ezt beágyazzuk az INDIREKT függvénybe, ami megadja a tartományt az átlag kiszámításához:
INDIREKT("B2:B" & HOL.VAN(10000;B:B;1))Utolsó lépésként jön az ÁTLAG függvénybe történő beágyazás:
=ÁTLAG(INDIREKT("B2:B" & HOL.VAN(10000;B:B;1))) -
gyga
senior tag
Sziasztok!
Makróban vagy inkább VBA ban hogy lehet azt elkerülni, hogy ha cella formátumot akarok másolni akkor csak a hátteret másolja át és a feltételes formázás képletet ne!?
-
Louro
őstag
válasz
soundsthu #21029 üzenetére
Neked ,ha jól érzem a VLOOKUP vagy magyar verzió esetén az FKERES lehet a jóbarátod.
Első paramétere: Mit keressel.
Második: Melyik táblázatban keresel. Fontos, hogy első oszlop az legyen, ahol az első paramétert keresni akarod.
Harmadik paraméter: Az első paraméter után hanyadik oszlopban levő mezőt/cellát akarod kinyerni. Ha egyből mellette van az adatoszlop, akkor a megfelelő szám a 2.
Negyedik: 0 vagy ha pötyögős vagy, akkor FALSE. -
csongi
veterán
-
Geryson
addikt
Egy Excel dokumentumot kompletten levédtem a múltkor a segítségetekkel (azaz meg lehet nyitni, de csak olvasásra - jelszó hiányában).
Most ezt a jelszót kivenném (ez még megvan), de hogyan tudom azt beállítani, hogy a 2 (vagy akárhány) lap közül csak az elsőt lehessen megnézni? Vagy a legegyszerűbb ilyenkor az, ha egy külön Excelbe átrakom ezt a lapot?
Jajj, meg egy másik komplikáltabb kérdés!
Adott egy idősor a hónap napjaival, azaz 1., 2., 3., 4. nap, stb. Van mellettük (pontosabban azok mellett a napok mellett, amik már elmúltak, egy árfolyam). Ebből szeretnék átlagot számolni! Na mármost az fontos, hogy ha 5 nap telt még csak el, akkor az átlagot úgy számolja, hogy pl. 300+300+300+300+300 Ft osztva 5-el, tehát ne 20-al ossza el (tehát ne a hónap teljes napjaival, hanem csak az eltelt napokkal). Ezt hogyan lehetne megoldani?
-
soundsthu
csendes tag
Sziasztok!
Egy kereséssel kapcsolatos kérdésem lenne, csak nem tudom hogy melyik függvényt használjam, 2010-es excel-ben. Egy megadott szöveget kellene egy adott oszlopban megkeresni, és a megtalált adat mellett lévő oszlopban, azonos sorban lévő értékre lenne szükség.
Bocsi a bénázásért, de hirtelen nem tudom annak idején hogyan oldottam meg ezt a problémát.
-
Delila_1
veterán
válasz
ccs2929 #21026 üzenetére
Nézd meg a 21024-es választ, abban találsz az FKERES függvényre idevágó példát.
Nálad a segédtábla első oszlopa a mintád szerint a számokat tartalmazza 1-től 12-ig, a második pedig a számokhoz tartozó betűt. Mindegyik szám mellé be kell írnod a betűt, ne összevont cellákban egyszerre add meg, az hibát okoz.
-
ccs2929
senior tag
válasz
Delila_1 #21012 üzenetére
Na megpróbálok mégegyszer nekifutni, hogy mit is szeretnék.
Van 2 oszlop /külön munkafüzetben/:és valami ilyesmit szeretnék elérni végeredményként:
Tudom,az egyik oszlopban lévő számokról, hogy az egyik számcsoport pl. jelen esetben 1-3 ig az "a" értékű, a 4-6-ig "b" értékű, stb képen látszik, és a másik munkafüzeten lévő értékek mellé kellene kiíratnom, hogy az most az a,b,c,d csoportba tartozó szám-e, ezért volt első körben jó nekem az első felvetésem, a HA függvény, mert ezzel ki tudtam íratni, de csak az első számra, valahogyan azt kellene elérnem, hogy egy képleten belül, ne csak az első számot, hanem az összes abban az oszlopban lévő számot megvizsgálja, a másik oszlop számait figyelembe véve és kiírja a másik lapon a hozzá rendelt értéket. Elnézést a láma megfogalmazásokért, de remélem így már érthetőbb voltam
Köszönöm a segítséget -
Delila_1
veterán
Nézd meg a "szövegből oszlopok" funkciót, az segít szétszedni az adatokat.
Mikor szétszedted oszlopokba a cella értékeit, összeállítasz egy segédtáblát, ami az egyes betűkhöz tartozó számértékeket tartalmazza. A képen ez nálam az M1:N5 tartomány.
A számokat a G2 cellába írt, és a mellette-, alatta lévőkbe másolt képlet állítja elő.
-
Louro
őstag
Szia,
nem tudom mekkora az adathalmaz, de a left és a search függvényekkel játszanék.
Itt kapott ötlet révén kapásból csinálnék segédoszlopokat, amikben LEFT és RIGHT függvényekkel szétvágnám az adatokat:
Például a mező tartalma: a, b, c, d, e
Első érték (A2): =LEFT(A1;SEARCH(",";A1;1)
Második segédoszlop (A3): =RIGHT(A1;LEN(A1)-SEARCH(",";A1;1)-1) 'a végén a -1 a szóköz miatt van ott
Harmadik segédoszlopban az előző függvényben levő A1-et cserélném A3-ra. Negyedik segédoszlopban levő A3-at A4-re.A végén pedig az A2-ben levő függvénnyel gyorsan kinyerném az első vesszőig levő adatot. Segédoszlopot azért használtam, mert nagyon hosszú lett volna, ha egy mezőben préselem be a "két" műveletet.
Lehet, sőt biztos, hogy van egyszerűbb, de ez működhet
A segédoszlopot nagyon a odébb is lehet pakolni és az adatokat tartalmazó mezőket meg közvetlenül a rekord végére lehet beilleszteni.
Sorry a hosszért, de az első segítségem és próbáltam minden infót leírni
Remélem tudtam segíteni.
-
mexel
veterán
Nem egészen excel, de talán mindkettő progiban lehetetlen a dolog: egy cellában lehet több érték? (most éppen SPSS-ben kellene, de excelben is érdekelne)
egy cellában jelenleg van több érték vesszővel elválasztva. Ezekkel jó lenne dolgozni, de nem megy, le kellett szűrni mindent. Ezért lenne jó, ha lehetne egy cellában több értékből dolgozni, de szerintem nem lehet.
Ha viszont nem lehet, akkor lenne még egy kérdés:Adott egy cella, benne mondjuk 5 értékkel: "a,b,c,d,e" Ezeket akkor 5 oszlopba kellene szétszórni úgy hogy minden oszlopban csak 1 legyen. Az sem ártana, ha az a 1-es, a b2-es stb szám lenne inkább.
Van erre valami automata módszer? Én nem találtam sajnos, pedig nagyon fontos lenne. Ha tud valaki valamit akkor előre köszönöm.
( eleve úgy kellett volna felvinni az adatokat, de már így van és igen sok van belőle)
-
Louro
őstag
Sziasztok!
Most már egész jó kis dolgokat tudok egy fájlon belül csinálni a segítségetekkel. De olykor előfordul, hogy egy új fájlba kell illesztenem az adatokat. Fájlt létrehozni tudok, ellenőrizni,hogy létezik e, szintén.
De az nem megy, hogy egy meglévő fájlban, hozzáfűznék adatot.
Szimpla példa:
Sub Teszt()myfile = "c:\teszt.xlsx"
'ha létezik, akkor törölje
If Dir(myfile) <> "" Then Kill myfile 'Data = ""
For r = 1 To 10
Data = Data & Cells(r, "A") & vbCr
Next rOpen myfile For Append As #1
Print #1, Data
Close #1End Sub
Azt szeretném, hogy ha lefuttatom mégegyszer a makrót, akkor - természetesen a törlős részt kiszedve - hozzáfűzze az információt, ne pedig felülírja.
Van rá lehetőség vagy ez már túlmutat a képességein?
-
csongi
veterán
Még egy kérdés.
Olyat szeretnék, hogy a legördülőben választok, egy színt, akkor a választott színhez a kiválasztott érték kerüljön.
Vagyis:
A1 legördülő: Piros; kék, stb.
Akkor a B2= Pl (A1) pirosnál a C5-el, (A1)kéknél a C6-al .. stb -
ccs2929
senior tag
válasz
Delila_1 #21016 üzenetére
Nem pont erre, mert, ha jól értelmezem, ez megszámolja, melyikből hány sor van, de, ha jobban belegondolok, akkor ez is, és az előző javaslatod is megoldást jelenthet, mert így látom, hogy mely sorok fognak érdekelni /amelyiknek lesz értéke/, és a többit kidobhatom
.
Holnap tesztelem, és megírom, hogy mire jutottam -
csongi
veterán
Látszik, hogy nem most kezdtétek
Működik!!
És olyat hogyan tudok, hogy pl a b2 cellába 0-tól eltérő karakter kerül, akkor a c3 cella értéke a d2 cella értékével legyen egyenlő. Ha b2 értéke 0 akkor a c3 is az legyen. -
alfa20
senior tag
válasz
csongi #21010 üzenetére
esetleg:
A2: "igen/nem"
B2: "=HA(A2="igen";D5;D6)"így mindig "D6" cella értéke lesz amíg B2 nem lesz "igaz"
de ha azt szeretnéd, hogy üres legyen választás előtt:
B2: "=HA(A2="igen";D5;HA(A2="nem";D6;"")"
így viszont ha törlőd az A2 értékét egy üres cellát kapsz B2-benmíg én ezt megírtam addig Delila_1 belőzőtt
-
ccs2929
senior tag
Sziasztok!
Remélem tud valaki segíteni, röviden annyi lenne a lényeg számomra, hogy, mint a mellékelt képen látjátok, adott mondjuk 2 oszlop, és ki kellene egy harmadik oszlopban íratnom az egyezéseket, tehát a b oszlopban lévő összes szám szerepel a d oszlopban lévőkben, és azt kellene megtudnom, hogy mely sorokban van pl. az a szám, ami a b oszlopban a 2-es,3-as stb sorban van, és mondjuk egy 1-est kiíratni ezen egyező oszlopok mellé. Első lépésként a HA függvény jónak bizonyult, de a képen is látszik, így mindig csak egy számot tudok kiíratni.
Remélem viszonylag jól leírtam mit is akarokKöszönöm a segítséget előre is!
-
csongi
veterán
Sziasztok!
Ilyet szeretnék.
Sikerült létre hoznom, egy legördülő választék listát.
És ha ebben választok, akkor a kiválasztotthoz igazodóan válasza ki a listából a beállított cellát.
Tehát:
pl: Igen;Nem. ha igen, akkor B2 cella értéke egyenlő D5-el. Ha Nem akkor B2 cella értéke egyenlő D6-al -
mexel
veterán
Nem tud valaki valami egyszerű és érthető leírást a kétmintás T-próbáról? Az érdekelne hogy pontosan miket kell hozzá kiszámolni az excelben és hogyan. Semmi érthető magyarázatot nem találok, a meglévő könyvemből sem tudom kitalálni pontosan mit és hogyan kell számolnom. Sajnos 1-2 napon belül meg kell tanuljak csinálni egy-két feladatot ezzel és nem találok segítséget.
Ha van valakinek ilyenről egyszerű leírása megosztaná velem? Előre is köszönöm. -
sasfi
csendes tag
Sziasztok!
Azt hogyan lehet megoldani, ha nem akarok munkalapokat másolgatni egyik excel file-ból a másikba, hogy csak megnyitom a két file-t, s s egy előre beállított függvény alapján az alap doksi átveszi a szükséges adatokat a másik file-ból?
Köszönöm!
Tamás
Új hozzászólás Aktív témák
Hirdetés
- OTP Bank topic
- Milyen okostelefont vegyek?
- Geri Bátyó: B550 szűk keresztmetszet, de mi és miért?
- Milyen videókártyát?
- HiFi műszaki szemmel - sztereó hangrendszerek
- Vezetékes FEJhallgatók
- Counter-Strike: Global Offensive (CS:GO) / Counter-Strike 2 (CS2)
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- E-roller topik
- Facebook és Messenger
- További aktív témák...
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- Antivírus szoftverek, VPN
- Microsoft licencek KIVÉTELES ÁRON AZONNAL - UTALÁSSAL IS AUTOMATIKUS KÉZBESÍTÉS - Windows és Office
- Sea of Thieves Premium Edition és Egyéb Játékkulcsok.
- Adobe Előfizetések - Adobe Creative Cloud All Apps - 12 Hónap - NYÁRI AKCIÓ!
- Apple iPhone 12 128GB, Kártyafüggetlen, 1 Év Garanciával
- ÚJ Apple Macbook Air 15,3 M4 10C CPU/10C GPU/16GB/256GB - Ezüst -(2025)- 3 Ciklus-3 év gari - MAGYAR
- BESZÁMÍTÁS! ASROCK B650 R5 7600X 32GB DDR5 1TB SSD RTX 3070 8GB MSI MPG Gungnir 100 Enermax 750W
- ÁRGARANCIA!Épített KomPhone Ryzen 7 5800X 32/64GB RAM RTX 4060 Ti 8GB GAMER PC termékbeszámítással
- Szerezd be most az érzékelhető különbséget! Akár 0% THM-re
Állásajánlatok
Cég: CAMERA-PRO Hungary Kft
Város: Budapest
Cég: Liszt Ferenc Zeneművészeti Egyetem
Város: Budapest