-
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
-
csferke
senior tag
Sziasztok!
Van egy munkafüzetem több munkalappal. Többek között pl. A(adatokPivot) és B(diagram). Az A az egy Pivot és állandóan változik a tartalma. Ezekből a kiértékelt adatokból készül a diagram. Ha most szeretném a diagramban látni a "képet" az aktuális adatokról akkor előbb aktiválom az A munkalapot, hogy frissüljenek az adatok és ezután lépek a B lapra, hogy megjelenítsem az aktuális adatokkal a diagramot.Amit szeretnék.
Hogyha megnyitom a B(diagram) lapot akkor a háttérben automatikusan frissítse az A(adatokPivot) lapot és csak ezután mutassa a diagramot.
Angol Excel 2007köszi
[ Szerkesztve ]
-
#27549
Delila_1
veterán
ElemiKoczka
#27547
Delila_1
veterán
válasz
ElemiKoczka
#27547
üzenetére
A 27332-es kérdést, és a rá adott, 23333-as választ olvasd el. Az első lapra beteszel egy érvényesítést, amivel kiválasztod a receptet. A makró az első lap H1 cellájából veszi a keresendő értéket, itt lehet az érvényesítésed.
Ha a kód, és a leírás azonos sorban van, ez a makró jó lesz a feladatod megoldására.
-
#27548
Fferi50
Topikgazda
ElemiKoczka
#27547
Fferi50
Topikgazda
válasz
ElemiKoczka
#27547
üzenetére
Szia!
Ehhez azért látni kellene a receptek "tárolási" struktúráját. A recept száma alapján az FKERES függvénnyel dolgozhatsz, minden munkalapra külön-külön megadva - nyilván külön-külön cellában.
A másik megoldás a makró.Üdv.
-
#27547
ElemiKoczka
csendes tag
ElemiKoczka
csendes tag
Sziasztok!
milyen keresési függvénnyel lehet megoldani a következő feladatot.
6 munkalapon vannak késztermékek receptjei (azonos készterméknek lehet akár minden munkalapon más a receptje!); a különféle késztermékeknek nem mindig egyforma fajtájú összetevője van!Egy munkalapon szeretném azt megcsinálni, ha beütöm egy késztermék 4 számjegyű kódját, akkor mind a 6 munkalapról átemeli a recepteket (összetevőket, mennyiségüket).
A cél az egésszel az, hogy 6 üzem receptjeinek különbözőségét lehessen szűrni.
Megoldható?
Előre is köszönöm az infókat:
Koczka -
Fferi50
Topikgazda
válasz
swoody
#27543
üzenetére
Szia!
A Ha és az Fkeres függvények többszörös egymásba ágyazása szükséges, az eredmény attól függ, hogy van-e már előtte levő cellában érték, illetve meg van-e jelölve (1) az adott cella.
Szerintem próbálj végigmenni egy - egy képlet alkotó részein és bizonyára meg fogod érteni.Mást (többet) most ilyen "időtávból" nem tudok gyorsan mondani. Ha konkrét kérdésed lenne, azért írd meg bátran.
Üdv.
[ Szerkesztve ]
-
swoody
senior tag
-
slashing
senior tag
válasz
Fferi50
#27541
üzenetére
félreértettél. Körülmények excelfájlba adott területre kétszer kattint feljön a képbeszúrás párbeszédpanel kiválasztom pl. a pendrive-ról a képet beszúrja az excel füzetbe átméretezi stb... nah ha ez megtörtént akkor még ezt a képet át kéne másolni egy adott könyvtárba, pl. abba ahol van a fájl....
-
slashing
senior tag
Hi, meg tudom azt csinálni makróval ami jelenleg így néz ki(dupla kattintásra kép beszúrás, majd átméretezem az objektummeretezés modullal):
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, Range("D4:AY1048576")) Is Nothing Then
Application.Dialogs(xlDialogInsertPicture).Show
objektumMeretezes
End If
End Subhogy, azt a képet még másolja is át abba a könyvtárba ahonnan megnyitom az excel fájlt? A másolással önmagában nincs gondom csak nem tudom hogy adjak a másolás parancsnak kiinduló útvonalat és fájlnevet?
-
#27538
scott_free
senior tag
scott_free
senior tag
hi,
amikor default értéket állítok be egy comboboxba, akkor kell a ".Text" végződés? (mert így láttam egy fórumban, de működik anélkül is):
Me.ComboBox1.Text = Me.ComboBox1.List(0)
thx!
[ Szerkesztve ]
-
Delila_1
veterán
válasz
azopi74
#27533
üzenetére
Tömbképlettel:
{=HAHIBA(INDEX($A$2:$A$12;HOL.VAN(0;DARABTELI($B$1:C1;$A$2:$A$12);0));"")}
Egyszerűbben, ha tartománnyá alakítjuk az A1:B12 területet, az A2:A12-nek Lista nevet adunk:
{=HAHIBA(INDEX(Lista;HOL.VAN(0;DARABTELI(B$1:$B1;Lista);0));"")}
Ez utóbbi a lista bővülésekor automatikusan bővíti a kigyűjtést.
-
azopi74
addikt
válasz
azopi74
#27533
üzenetére
Egyébként Excel 2016-ban van erre egy gyorsabb és elegánsabb megoldás is (Excel 2010-ben és 2013-ben is megoldható csak kicsit máshogy, de kell hozzá az ingyenes Power Query bővítmény):
Alakítsd táblává az "ismétlődéssel" oszlopot (jobb egér, insert table), aztán Data->Get&Transform-> From table
Utána kattints a query editorban a Remove Duplicates-be, nevezd át az oszlopot "Ismétlődés nélkül"-re (rename), és szúrd be a query-t B1-be. (Close and load to.. existing worksheet)Ezután ha frissül (vagy bővül) az A oszlopban az ismétlődéses lista, ha manuálisan a B oszlopban az ismétlődésen, az is frissül. Vagy megadhatsz neki akár percenti frissítést, vagy hogy minden megnyitáskor frissüljön.
Vagy akár VBA-val eseményvezéreltté is teheted a frissítést - ha frissül az alaplista, frissítsen rá automatikusan az ismétlődés nélkülire.
-
azopi74
addikt
Szia:
Ezt írd B2-be, és húzd le a képletet, ameddig szükséges :
=INDEX($A$2:$A$12;HOL.VAN(0;INDEX(DARABTELI($B$1:B1;$A$2:$A$12);0;0);0))
(Ha 12-nél több sorod van, akkor értelemszerűen A$12-t írd át annak megfelelően)
Ha nem akarod,, hogy #NA hibát hozzon a felesleges cellákba, hanem inkább üres cellát, akkor:
=HAHIBA(INDEX($A$2:$A$20;HOL.VAN(0;INDEX(DARABTELI($B$1:B1;$A$2:$A$20);0;0);0));"")
[ Szerkesztve ]
-
ueva
csendes tag
Sziasztok!
A következőben szeretném a segítségeteket kérni.
Van egy lista, amelyben előfordulnak azonos értékek. (Képen az A oszlop).
B2-be egy olyan képletre lenne szükségem, amelyet a szükséges cellákba másolva megadja az ismétlődések nélküli B oszlopot.
Sem segédcellákat, sem a speciális szűrést nem lehet alkalmazni.
Így nem boldogulok vele.
Köszönöm előre is a segítséget.[ Szerkesztve ]
-
csferke
senior tag
Sziasztok!
Ha egy mezőbe ez van =SaveDate() akkor ez a Modul ebbe a mezőbe beírja a mentés dátumát.
Function SaveDate()
Application.Volatile True
SaveDate = ActiveWorkbook.BuiltinDocumentProperties(12).Value
End FunctionAzt szeretném ha nem a Mentés dátumát hanem a Nyomtatás dátumát írná a mezőbe. Ehhez a 12-es szám helyett kellene valami más. Sajnos nem tudom mit kellene megadni, hogy a Nyomtatás dátumát használja.
Értelemszerűen a mezőben ez lenne =PrintDate() a Modul pedig ez
Function PrintDate()
Application.Volatile True
PrintDate = ActiveWorkbook.BuiltinDocumentProperties(??).Value
End Functionköszi
[ Szerkesztve ]
-
azopi74
addikt
válasz
Zola007
#27519
üzenetére
Csak az utolsó megoldás igényel add-int, én pont nem arra gondoltam, hanem az első négyre
Egyébként a lite verzió ingyen van, deén sem szeretem a kiegészítők telepítgetését, akkor se, ha ingyenes (amit meg lehet oldani kiegészítő és makró nélkül, azt oldjuk meg úgy) . egyébként azt a 15 usd-s full verziót kb egy napos munkával le lehet kódolni akár VBA-ban. Vicc, hogy van pofájuk ezért pénzt kérni -
Delila_1
veterán
válasz
Zola007
#27519
üzenetére
Nem kell semmit telepíteni, vásárolni, makróval megoldhatod. A kijelölt, akár nem összefüggő területek hátterét változtatja meg a lenti két makró.
Sub PirosHatter()
Selection.Interior.Color = RGB(255, 0, 0)
End SubSub ZoldHatter()
Selection.Interior.Color = RGB(0, 255, 0)
End SubA zárójelben lévő értékeket 0 és 255 között változtatva mindenféle színt, árnyalatot előállíthatsz.
Ha ezeket a makrókat a personal.xlsb-be mented, akkor bármelyik füzetedben alkalmazhatod.
Gyorsbillentyű hozzárendelése: Alt+F8-cal megjeleníted a makrókat. Kiválasztod az egyiket, és az Egyebek gomb segítségével megadod a CTRL gombhoz rendelt betűt.A színek RGB értékeit könnyen "kitalálhatod". A Kezdőlapon a háttér beállításánál a További színeket választod, az Egyéni fülön kikevered a megfelelő színt, a hozzá tartozó 3 értéket írod a makróba.
-
qwertly
addikt
Sziasztok!
Sajnos lehet,hogy alap dolog de most nem találom eddig excel 2003 volt abba megvolt már éve óta.Most meg 2010 excel van a ezzen képen az egyes cellába beírt próba rendet szeretném fixen rögzíteni.Vagyis ha 50 eddig vagy 100 sorba görgetnék akkor is látszódjék az 1 sorba mi van írva.
-
Emu
őstag
Sziasztok!
Kaptam egy nem felhasználóbarát adathalmazt, amit MSDOS formátumból importáltak, és dolgoznom kellene vele. Cserével és egyéb módszerekkel mindent átírtam benne, hogy az excel tudjon számolni velük, már csak valahogy az összes cellába be kellene szúrnom egy = jelet. Létezik erre valami függvény, vagy gyors módszer?
Előre is köszi![ Szerkesztve ]
-
#27508
Delila_1
veterán
scott_free
#27507
Delila_1
veterán
válasz
scott_free
#27507
üzenetére
Szivi.
-
#27505
Delila_1
veterán
scott_free
#27501
Delila_1
veterán
válasz
scott_free
#27501
üzenetére
A helyedben a combobox feltöltését a userform aktiválásához rendelném.
Private Sub UserForm_Activate()
Dim szám
For Each szám In Sheets(1).Range("C1:C20")
If Len(szám) = 10 Then
ComboBox1.AddItem szám.Offset(0, -2).Value
End If
Next szám
End SubA len(szám)-nál hiba volt len(szám.value)-t írni, hiszen a len függvény a beolvasott adat hosszát adja, a value pedig az értékét.
-
azopi74
addikt
Ja, tényleg így is lehet darabtelivel, tegnap kissé már fáradt voltam
ennek ellenére a hol.van megoldás jóval közelebb áll a férfi logikámhoz, na és nagyságrendekkel gyorsabb is (több százezer sornál már nagyon nem mindegy) ha az előtt-et így értettes, akkor delila által írtat javaslom )kombinálva a hol.van-os módszeremmel 
-
#27501
scott_free
senior tag
Delila_1
#27500
scott_free
senior tag
köszi, kipróbálom
thx !!
