- bitpork: Augusztus 2- szombat jelen állás szerint.
- Luck Dragon: Asszociációs játék. :)
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- sziku69: Fűzzük össze a szavakat :)
- Geri Bátyó: B550 szűk keresztmetszet, de mi és miért?
- Fogkefe: elektromos vagy manuális?
- Magga: PLEX: multimédia az egész lakásban
- Parci: Milyen mosógépet vegyek?
- sziku69: Szólánc.
- Aggregátor gondjai, örömei, és elmélkedései
-
LOGOUT
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
-
Fferi50
Topikgazda
Szia!
Ez bizony a súlyozott számtani átlag alapján van sorbarakva, a helyezési szám minél kisebb, annál jobb a helyezés.
A súlyozott számtani átlagot az Mszorzat (súlyok,helyezési számok) / szum(súlyok) képlettel tudod kiszámítani. Ehhez a helyezési számokat át kell tenni függőleges helyzetbe.
A helyezést pedig sorbarendezéssel és a sorszám függvénnyel tudod megoldani.
A helyezések az első sorban vannak, a súlyok az adott tényezőhöz tartozó számok.
Üdv.
-
ett
aktív tag
Sziasztok!
Egy kis segítségre lenne szükségem. Adott egy táblázat. Nem ez amit linkeltem, de lényegében ugyanez a feladat. Én tök hülye vagyok az excelhez, mindig is utáltam. A páromnak lenne fontos. Ebből a táblázatból az alatta lévő a kimutatás. Arra kéne rájönni, hogy ez hogy jött ki, milyen parancs vagy függvény segítségével.
Tud valaki ebben segíteni?
-
slashing
senior tag
válasz
slashing
#24396
üzenetére
Áááágghrrrrr nem tudom már még1x szerkeszteni ha a végére még beszúrjuk ezt is ;"link" akkor csak annyi fog látszódni hogy link nem a teljes elérési út nem kell külön fölé rakni egy link szöveget is:
=HIPERHIVATKOZÁS(BAL(CELLA("filenév");SZÖVEG.KERES("[";CELLA("filenév"))-1)&"ipari_mt.pdf";"Link")
-
#24396
slashing
senior tag
localhostadm
#24392
slashing
senior tag
válasz
localhostadm
#24392
üzenetére
Egy megoldás makró nélkül.
Kinevezel egy cállát a munkafüzeten amibe a következő képletet rakod nálam ez az A2 cella: =CELLA("filenév")
a linkes cellába meg a következő képlettel íratod ki a hivatkozást: =HIPERHIVATKOZÁS(BAL(A2;SZÖVEG.KERES("[";A2)-1)&"akarmi.pdf")
Így tökmindegy milyen meghajtó azon bellül melyik könyvtárban vannak ezek a fájlok a lényeg annyi hogy ugyan abban a fájlban legyen mindkettő. de még az sem fontos csak akkor a hiperhivatkozásba hozzá kell írni még az alkönyvtár nevét is.... &"\alkönyvtár" az &"akarmi.pdf" elé...
Excel 2013-ban tuti működik visszafele sajnos nem tuodm hogy milyen de nem hiszem hogy ezek közül bármelyik formula olyan új lenne hogy csak 2013-ban működne...
szerk. sőt nem is kell egy cella hozzá elég csak a hiperhivatkozás csak így elég bonyolultnak néz ki, lényegében ki lett cserélve az A2 hivatkozása a képlet az A2 cella képletére:
=HIPERHIVATKOZÁS(BAL(CELLA("filenév");SZÖVEG.KERES("[";CELLA("filenév"))-1)&"akarmi.pdf")
-
Fferi50
Topikgazda
válasz
Thrawnad
#24391
üzenetére
Szia!
Akkor most nem egészen értem:
"Sőt ha kézzel csinálom akkor is ez van hogy mentek, mentek másként, bezárok.
Így létrejön, és be is veszi az SAP és már hibát sem kapok
Csak a végét kellene automatizálni."Ezt amit kézzel csinálsz megoldja egy pár sor a makróban:
Activeworkbook.Save
Activeworkbook.SaveAs filename:=név, fileformat:=forma
Activeworkbook.Close FalseEzzel bezártad a fájlod.
Ha csak az aktív munkalap A oszlopát akarod kitenni egy fájlba, akkor viszont:
Activesheet.Copy ' ezzel az adott munkalapot egy új munkafüzetbe másolod, ami azonnal aktív is lesz.
Activesheet.Usedrange.Offset(0,1).ClearContents 'az A oszlopon kívüli adatok törlése
Activeworkbook.SaveAs filename:=név, fileformat:=forma 'elmented
Activeworkbook.Close False
Ezek után ismét az eredeti munkafüzeted lesz az aktív munkafüzet. Csinálhatsz benne bármit, amit szeretnél.Üdv.
-
#24393
Delila_1
veterán
localhostadm
#24392
Delila_1
veterán
válasz
localhostadm
#24392
üzenetére
Workbooks.Open Filename:="fájnév kiterjesztéssel"
Ha nem adsz meg útvonalat, akkor abban a mappában keresi a megnyitandó fájlt, amelyik éppen aktív.
-
#24392
localhostadm
tag
localhostadm
tag
Sziasztok!
Olyan problémám lenne, hogy úgy szeretnék linkelni egy fájl elérési utat Excelben, hogy a fájlt mindig abból a mappából hívja be, amelyikben éppen benne van. 1 mappa tartalmazza az xls-t és a hivatkozni kívánt fájlt és a mappa folyamatosan mozog, pl pendriveon van és gépenként más meghajtójelet kap, így a direkt link nem működik. ( példa: a LINK szöveg alá be szeretnék tenni egy linket ami egy XY.PDF-re mutat és kattintásra megnyitja ) A hiperhivatkozás olvasatom szerint nem alkalmas erre.
Van valakinek ötlete ezzel kapcsolatban? Van valami wildmark erre? Gondolok itt olyanra, mint windows alatt a %\ .
-
Thrawnad
senior tag
válasz
Fferi50
#24390
üzenetére
Szia!
Azt már leprogramoztam!
Annyi van hogy az A oszlopban ott a karakteres cucc aminek nem kézi mentés másként-tel kellene egy txt-ben landolnia ami az SAP alá betölthető. Az A oszlop tartalma már teljesen el van készítve.
Sőt ha kézzel csinálom akkor is ez van hogy mentek, mentek másként, bezárok.
Így létrejön, és be is veszi az SAP és már hibát sem kapok
Csak a végét kellene automatizálni.
Thrawnad -
Fferi50
Topikgazda
válasz
Thrawnad
#24384
üzenetére
Szia!
Ne haragudj, hogy értetlenkedek és visszakérdezek:
Milyen típusu textfájlt szeretnél kapni. Ez azért fontos, mert annak megfelelő módszereket kell alkalmazni.
Közvetlen fájlkezeléssel bármit ki tudsz íratni fájlba, anélkül, hogy az alapfájlod megváltozna.
Nézz körül az Open - Print -Put - Close utasítások körül (nem a Workbook.Open metódus, hanem a fájl megnyitó Open).
Ha felteszel egy mintát, szívesen segítek. DE: meg kell mondanod, hogyan nézzen ki a text fájl: azonos szélességű rekordok, határolójellel elválasztott értékek - és ha igen, akkor mi legyen a határolójel,oszlop vagy sor alapján kerüljenek ki az adatok a fájlba stb.Üdv.
-
Fferi50
Topikgazda
-
PETEE78
senior tag
válasz
Fferi50
#24386
üzenetére
nem jól fogalmaztam, elnézést.
- a kritérium 1-3 ig úgy értettem, hogy ezeknek mind igaznak kell lenniük ahhoz, hogy az egészet 1 értéknek számolja az adott N segéd oszlopban.
igen a J2-nek 1 értékűnek kell lennie ( 1 vagy 0 szerepel benne)
-igen I2 ben 02 krumpli szerepeljen
-
Fferi50
Topikgazda
válasz
PETEE78
#24382
üzenetére
Szia!
Bocs, hogy visszakérdezek:
"kritérium1 : egyéb!U2=0;egyéb!V2=0;egyéb!W2=0;egyéb!X2=0"
Ez mindjárt három kritérium, de ezt tudja kezelni a SZUMHATÖBB függvény
"kritérium2 : DARABTELI(J2;1)"
Ezt nem tudom kritériumként értelmezni, mennyi legyen a darabteli értéke, vagy a J2-ben 1-nek kell lennie?
"kritérium3: DARABTELI(I2;"02 krumpli")"
Erre ugyanaz a kérdésem, mint az előbbinél, 02 krumpli -nak kell lenni az I2 cellában?Üdv.
-
Fferi50
Topikgazda
válasz
Thrawnad
#24381
üzenetére
Szia!
Ez sajnos a Mentésmásként (SaveAs) logikája, ha kézzel mented, akkor is ez történik!
Ezért a megoldás szerintem az, hogy először elmented a fájlodat activeworkbook.save, majd utána mented SaveAs metódussal textfájlként.
Eután visszanyithatod az első fájlodat.(Létezik ugyan egy SaveCopyAs metódus is, ami az eredeti fájlt érintetlenül hagyja, de ott nem adhatod meg, hogy milyen típusu legyen a mentett fájl.)
Üdv.
-
PETEE78
senior tag
válasz
Fferi50
#24378
üzenetére
nem értem...
ha mindegyik kritérium igaz akkor kell 1 értéket kapnom az N2-es cellába.
kritérium1 : egyéb!U2=0;egyéb!V2=0;egyéb!W2=0;egyéb!X2=0
kritérium2 : DARABTELI(J2;1)
kritérium3: DARABTELI(I2;"02 krumpli")ez N20000-ig beképletezve kiadja az 1 vagy a 0 értékeket.
ha az egyeseket szummázom a 20001-es cellában kijön mondjuk 510dbén azt szeretném, hogy 1 db cellában mondjuk az O2-ben kijöjjön ez az 510-es szummázott érték úgy, hogy ne kelljen beképleteznem hozzá semmilyen segédoszlopot (jelen esetben N), főleg nem 20000-ig.
-
Wyll
őstag
Ha már volt szó feltételes formázásról, itt van egy érdekes feladat, amire én hirtelen nem tudok megoldást:
Egy kép többet mond ezer szónál:
A lényeg, hogy különböző számban lehetnek egymás alatt azonos tartalmú cellák, és a változó méretű de azonos tartamú "szakaszokat" kéne felváltva színezni, hogy elkülönüljenek egymástól. Ja, és persze VBA nélkül, mert "úgy túl könnyű lenne" - szóval persze sejtem, hogy vba-val meg lehet csinálni, de engem az érdekel, hogy elvileg egy mezei (non-VBA) user is meg tudná-e csinálni.
A hiányosság amúgy szerintem abban áll, hogy a formázásra nem lehet forrást megadni. Ha lehetne, akkor így lehetne okoskodni: "amennyiben a tartalmam egyenlő a felettem lévőével, akkor a formázásom is legyen azonos; ha nem akkor pl. egy megadott mintacelláéval egyezzen meg". A jelen körülmények között annyit lehet szerintem csinálni, hogy a szakaszok első elemét különböző színűvé tudom tenni, de nem az egész szakaszt.
Várom a meglátásokat
-
PETEE78
senior tag
válasz
Fferi50
#24376
üzenetére
szia!
2-től 20000 sorig, ha igazak a feltételek, akkor 1-nek számolja az aktuális sort egy cellában. Ez teljesen jó, de nem szeretném 20000 sorig lehúzni az erre vonatkozó képleteket és úgy összeadni a darabszámot, hanem azt szeretném, hogy az egész szummázást 1 cellába jelenítse meg.
tehát az a probléma, hogy most van egy rakat 1 és 0 amit utána még szummázok. Baromira megnöveli az excel méretét, ezt viszont nem szeretném, mert még van pár ilyen eshetőség, amire meg kell csinálnom.=HA(ÉS(egyéb!U2=0;egyéb!V2=0;egyéb!W2=0;egyéb!X2=0;DARABTELI(J2;1);DARABTELI(I2;"02 krumpli"));1;0)
egy másik egyszerűbb helyzetben már sikerült így szummáznom:
=SZUM(HA($O2 : O20000=1;Adatok!$L2:L20000;0))
Bocs a regényért, remélem érthető volt...
-
slashing
senior tag
Makróval nálam ez így van megoldva:
C oszlop az első legördülő listám ahol kiválasztom a szerszám számát. Ide van rakva egy Worksheet change:
If Target.Column = 3 Then
Sheets("Segédtábla").Range("E2") = Target
Ervenyesites
End IfA kiválasztott szerszámot a segédtábla E2 cellájába másolja ész lefut az érvényesítés makró ami csinál egy szűrést egy 3 oszlopból és kb. 1000 sorból álló listából az E2 cella alapján:
Sub Ervenyesites()
Application.ScreenUpdating = False
Set WS1 = Sheets("Segédtábla")
Set WS2 = Sheets("Kritikus")
WS1.Activate
usor = Application.CountA(WS1.Columns(1))
Range("A1:C" & usor).AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range( _
"E1:E2"), CopyToRange:=Range("G1:H1"), Unique:=False
WS2.Activate
Application.ScreenUpdating = True
End SubMajd a G és a H oszlopba kiszűri az adatokat ahol szintén van névkezelővel adva egy dinamius tartomány amit a kiinduló táblázatuk következő két oszlopában le tudok nyitni de ez a kettő már az előzőleg kiválasztott szerszámhoz tartozik csak...
-
#24372
m.zmrzlina
senior tag
looser
#24370
m.zmrzlina
senior tag
válasz
looser
#24370
üzenetére
Én validált listával (adatérvényesítés>lista) próbálkoznék, mivel ott forrásnak feltételeket is meg lehet adni (Excel2010-ben biztosan)
A1, B1, C1,-ben vannak a listák.
A1 forrása:=$F$1:$F$2
B1 forrása:=HA(A1=$F$1;$G$1:$G$3;$I$1:$I$3)
C1 forrása:=HA($B$1=$G$1;$H$1:$H$3;$J$1:$J$3)Ezzel a módszerrel én max 3 lépcsős feltételrendszert kezelnék, mert afelett egy kezelhetetlen piramisjátékká alakulna ez a megoldás.
-
Fferi50
Topikgazda
válasz
looser
#24370
üzenetére
Szia!
Egy makró nélküli mód:
1. A1 - adatok - érvényesítés - érvényesítés lista és a lista helyére beírod Bor;Sör
2. A2 - adatok - érvényesítés - érvényesítés lista - kijelölsz egy 3 cellás területet -mondjuk S1:S33. S1 cella képlete: =ha(A1="Bor";"fehér";"alsóerjesztésű")
S2 cella képlete: =ha(A1="Bor";"vörös";"felsőerjesztésű")
S3 cella képlete: =ha(A1="Bor";"rozé";"spontán")ezután ha az A1-ben kiválasztod a bort, akkor az első értékek jelennek meg az A2 listájában, ha a sört választod, a második értékek jelennek meg a listában.
Makróval pedig a Worksheet_change eseménykezelőbe kell tenni az érvényesítés változtatását.
Üdv.
-
looser
addikt
Sziasztok!
Megoldható az, hogy egy listából választott elem hatására egy másik lista elemei leszűküljenek az elsődleges választás alapján? Pld. első menü (A1) két tagja: borok és sörök. Utóbbit választva újabb menü (már létezik, vagy ennek hatására jön létre, mindegy, amelyik egyszerűbb) (A2), amelyből választható hogy alsóerjesztésű, felsőerjesztésű és spontán erjesztésű. Elsőt választva pedig fehér, vörös és rozé.
Üdv & köszönet
-
Fferi50
Topikgazda
válasz
Zola007
#24362
üzenetére
Szia!
Szerintem írhatsz kifejezéseket a hatvány függvénynél is mind az alapba, mind a kitevőbe, függvény formában beírva és ^ jelet használva is.
Nálam legalábbis megy, mind a 2010-es, mind a 2003-as excelben. Csak megfelelően kell zárójelezni a műveletek precedenciája miatt (inkább legyen egy zárójelpárral több, mint kevesebb...).
Pl. =((C36*3)/6)^(SZUM(C40:C41)-4)Üdv.
-
Fferi50
Topikgazda
válasz
Thrawnad
#24367
üzenetére
Szia!
Nem egészen értem, hogy mit "borzol össze" nálad amit leírtál.
Viszont azt gondolom, a Fileformat:=xlText megadása nagy valószínűséggel nem jó. A help szerint vagy
xlTextMac
xlTextMSDOS
xlTextPrinter
xlTextWindows
xlUnicodeTextlehet az értéke, sima xlText konstanst nem látok a fileformat típusok között.
Üdv.
-
Thrawnad
senior tag
Sziasztok!
fajlNev = ActiveWorkbook.Path & "\" & Mid(File_Ez, 1, 7) & ".txt"
ActiveWorkbook.SaveAs fajlNev, FileFormat:=xlText, CreateBackup:=FalseEz összeborzolja a file-omat, de nekem egy TXT kimenet kellene a lapról.
A
FileFormat:=xlTextPrinter
Nem jó mert a sorok hosszúak és az meg össze borzolja a kimenetet.
Tud nekem segíteni valaki?
Thrawnad -
#24366
Thrawnad
senior tag
Bocimaster
#17803
Thrawnad
senior tag
válasz
Bocimaster
#17803
üzenetére
Simán lazán FoxPro-t vennék elő 35 giga TXT-hez
-
emitter
őstag
Sziasztok!
Egy automatikus "kottázót" szeretnék Excelben megvalósítani. Van egy tetszőleges hangsorom az első munkalap első oszlopában, pl.:
D
C
A
E
C
G
EÉs van két oszlopban egy adatpárosom egy másik munkalapon, amiben az adott hangnak megfelelő frekvencia-számérték van (Hz-ben).
pl.:
C 261.63
D 293.66
E 329.63
F 349.23
G 392.00
A 440.00
H 493.88Azt szeretném, hogy az Excel az első munkalap második oszlopában az egyes hangjegyek mellé automatikusan behelyettesítse a neki megfelelő frekvenciaértéket (a második munkalap adatbázisa alapján).
Remélem érthető a megfogalmazás, és még inkább, hogy tudtok javasolni valami egyszerű megoldást, mert egyelőre én nem jöttem rá..
Köszi! -
Zola007
veterán
válasz
Fferi50
#24349
üzenetére
Köszönöm.
Gondoltam rá én is, csak mivel a egyenlet vagy 3 sor, próbáltam olyan megoldást találni, ahol könnyebben észreveszem, ha elírtam valamit (akár egy zárójelet).
Csinálok majd hozzá pár tesztmezőt, hogy ellenőrizni tudjam, hogy valóban úgy működik-e ahogy én azt megálmodtam.
egyelőre kitevő-vel működik,mert csak 2 e-hez kell, de azt nem értem viszont, hogy a hatvány függvény miért nem tud zárójellel fogadni több számból álló hatványkitevőt
nem lett volna nehezebb nekik ugyanazt implementálni mint a másikban -
zolynet
veterán
Sziasztok!
Excel makróban kérnék segítséget, erről az oldalról szeretnék leszedni infot: http://www.nfh.hu/pozitiv-lista?title=&field_shop_value=&page=0 ... úgy hogy az üzlet mögötti url-t is lementse.
Gondolom a WebSelectionType = xlSpecifiedTables kellene használnom, de nem igazán értem.
Tudok ez ügyben segíteni.Az odáig rendben van hogy hogy szedem le az alapadatokat: (a formázással sincs utána gond)
With ActiveSheet.QueryTables.Add(Connection:= _
"URL;http://www.nfh.hu/pozitiv-lista?title=&field_shop_value=&page=0" _
, Destination:=Range("A1"))
.FieldNames = False
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
'.WebSelectionType = xlAllTables
.WebSelectionType = xlEntirePage
.WebFormatting = xlWebFormattingNone
.WebPreFormattedTextToColumns = True
.WebConsecutiveDelimitersAsOne = True
.WebSingleBlockTextImport = False
.WebDisableDateRecognition = False
.Refresh BackgroundQuery:=False
End WithTudom a végén egy ciklus kell rá, de az most még nem érdekes.
-
Telda
addikt
Hali!
Régebbi verzióból ahol még csak ~65000 sor volt használható, több munkalap tartalmát szeretném egymás alá másolni(tatni)
. A kézzel való másolgatáson kívül van valami módszer?
A munkalapok tartalma formailag megegyezik, csak külön lapon vannak, mert anno még nem fért el ennyi adat egy lapra. -
tPedro_
őstag
válasz
Delila_1
#24357
üzenetére
Office 2007
Kozben rajottem, hogy mitol mukodott:
A Formulas ful Name Manager alatt volt beallitva egy ertek, aminek a neve _FilterDatabase volt, a Refers To resz pedig ='Sheet Name'!$A$1:$AQ$36-re volt beallitva.
Ezt lehetett aztan megadni a pivot tabla forrasmegjelolesenel es valamiert ez akkorara bovul mikor lefut, amennyi adat szerepel a lapon.
-
tPedro_
őstag
válasz
Delila_1
#24355
üzenetére
Ertem, azert koszonom.
Az adatokat sikerult kozben kitorolni, mar csak a frissitest kene megoldani.
Gondolom a !_FilterDatabase-ben rejlik a megoldas, de nem tudok rajonni, hogy az mi lehet. Nem latok ra sehol utalast a tablazatban. Pedig kell ott lennie valaminek, mert a file merete kozel 1.5 MB, adatok nelkul.
Probaltam atmasolni a masik sablonba, a pivot forrasanak megadasahoz, de azt irja "Data source reference is not valid."
-
-
-
tPedro_
őstag
Sziasztok!
Van 2 excel sablon file-om, az elso alapbol ures lapra adatokat masolok be, a tobbi lapon pedig pivot tablak vannak grafikonokkal.
Az adatok bemasolasa utan egy macro-t futtatok le, ami rendezi es formazza az adatokat majd frissiti a pivot tablakat.Az egyik ilyen sablon alapbol tok ures, a pivot tablakban sincs adat, a mezo listaban a mezok hozza vannak adva a megfelelo helyre, a pivot tabla forrasakent pedig a kovetkezo van megadva:
'az adatokat tartalmazo lap neve '!_FilterDatabase
Igy akarhany adatot masolok be az elso lapra, mindig az alapjan tolti ki adatokkal a tablakat.A masik sablonba bele lett piszkalva: Itt manualisan lett megadva a pivot tabla forrasa (pl. A$1$:AA$200$), es a pivot tablakban is latszodnak a legutobbi adatok.
Igy az adatok bemasolasa utan, nem tudom a macroval frissiteni, mindig manualisan kell megadnom neki az eppen aktualis adatmennyiseg alapjan a forrast.Hogyan tudnam a tablakbol kitorolni a regi adatokat es a forrast automatikusra beallitani?
Koszonom elore is, remelem ertheto volt, hogy mit is szeretnek.
Udv.
-
Fferi50
Topikgazda
-
Fferi50
Topikgazda
válasz
Zola007
#24347
üzenetére
Szia!
Igen, a kitevő csak az e alapú logaritmusra működik. Minden másra ott a hatvány függvény, vagy rövidítve a "kalap": 4^2 = Négy a négyzeten. Elől az alap, utána a kitevője.
"De ha egy makrót illesztek be, akkor elég csak a makrót átírni és mindenhol változik"
Ez akkor igaz, ha a módosítandó celláid valamilyen rendszer szerint helyezkednek el. Egyébként pedig a makróba ugyanúgy meg kell adni a pár(száz) módosítandó cella címét, csak nem egérrel jelölöd ki. Igaz a makrót csak egyszer kell megírnod ilyen "részletességgel".....
De az is lehet, félreértelmezem amit írtál....
Üdv.
-
Zola007
veterán
válasz
Fferi50
#24346
üzenetére
Kitevővel működik egybe írva
ezt a függvényt nem ismertem, de akkor ez csak az Euler-féle számra működik?Azért lényeges, mert összevisza egymással váltakozva vannak cellák, amiket nem akarnék később változtatni, így a módosítandókat meg egyenként kellene kijelölni, ami pár ezernél már nem annyira mókás
De ha egy makrót illesztek be, akkor elég csak a makrót átírni és mindenhol változik -
Fferi50
Topikgazda
válasz
Zola007
#24344
üzenetére
Szia!
"a gondom az, ha bármelyik képleten változtatni akarnék, akkor mindenre rá kell húzni a módosítottat, nem elég mondjuk 1 helyen"
Szerintem ez minden képlettel így van, akkor is, ha külön cellában van a képleted, akkor is, ha egy cellában van egy hosszú képlet.
Próbáld az Átlag függvényt, aminek a paraméterihez beírod a 7 függvényedet szépen egymás után (természetesen a W és R helyett az A1 és a B1 cella szerepeljen).
Pl: =ÁTLAG(A1*(36/(37-B1));A1*(1+0,0333*B1);(100 *A1) / (101,3 - 2,67123 * B1);A1*B1*0,1;(100*A1)/52,2+(41,9*KITEVŐ(-0,055*B1));A1* (1 + 0,025 * B1);(100 * A1) / (48,8 + (53,8 * KITEVŐ(-0,075 *B1))))
Viszont, ha angol exceled van, amire a tizedespontból következtetek csak, akkor nyilván nem Kitevő a függvényed neve.
Üdv.
-
#24345
Vizes Tomi
tag
Vizes Tomi
tag
Sziasztok !
Egy kis segítségre lenne szükségem.
A probléma a következő:
Vannak napi jelentéseim excelben. Valami ilyesmi struktúrábanTelepülésnév : adat 1, adat 2
ebből kellene nekem egy olyat csinálni, hogy
2014.01.01. adat1, adat 2
2014.01.02 adat1, adat2
Az fkerest próbáltam, de ugye a fájlnevek mások( dátum szerint neveztem el őket) , hogyan lehetne ezt a problémát áthidalni, hogy ne kelljen 365 ször átírnom a képletet.Köszönöm
Sziasztok
-
Fferi50
Topikgazda
válasz
Zola007
#24342
üzenetére
Szia!
Egyrészt, hat képletről írsz, de hét sor van.
Másrészt, milyen excel verziód van.
Harmadrészt elég sok képletet be lehet "zsúfolni" egy cellába, miért gondolod, hogy ezt nem lehet.
Nálam az ehatvány (excel 2010-ben a KITEVŐ függvény) simán elfogad kifejezéseket, amelyekben cellára hivatkozok.Kérlek, pontosíts egy kicsit.
Üdv.
-
Zola007
veterán
Gondban vagyok:
mondjuk A1 és B1 cella tartalmaz adatot
A1: W
B1: Radott több egyedi képlet:
W x (36 / (37 - R))
W x (1 + 0.0333 x R)
(100 x W) / (101.3 - 2.67123 x R)
W x R0.1
(100 x W) / (52.2 + (41.9 x ehatvány-0.055 x R))
W x (1 + 0.025 x R)
(100 x W) / (48.8 + (53.8 x ehatvány-0.075 x R))Ennek a 6 képlet eredményének az átlagát kellene megjelenítenem az A2 cellában, de nincs hely külön mellette kiszámoltatni, tehát egy cellába kellene valahogy beírni az egészet
Nem sikerül beírni egyetlen cellába, mert a hatványt sem tudja így elfogadni csak egyetlen konkrét számnak, de akkor mindig +2 cella kellene minden egyes W-R viszonyra kiszámolni és annak az eredményét beírni a kitevőbe
Még sok másik ilyen adatcella lenne, de mindegyiknél ugyanígy az első adatcella alá kell az eredményt megjeleníteni. Lehet erre valami összevont képletet vagy makrót írni?
-
#24340
Delila_1
veterán
LordVader80
#24339
Delila_1
veterán
válasz
LordVader80
#24339
üzenetére
Eltolás helyett Ofszet-et írj. Az eltolás függvényt a 2010-es verzióban vezették be.
-
#24338
Fferi50
Topikgazda
LordVader80
#24337
Fferi50
Topikgazda
válasz
LordVader80
#24337
üzenetére
Szia!
Az A1 képlete maradjon az, amit írtál.
B1-től a képlet: =ELTOLÁS($A$1;2;(OSZLOP()-1)*3;1;1)Üdv.
-
#24337
LordVader80
őstag
LordVader80
őstag
Jó reggelt! Hogyan tudok úgy hivatkozni, illetve kitölteni, hogy egy cella "egy cellára" hivatkozzon, a mellette levő az "egy cella" mellett 3-mal, a mellette levő az "egy cella" mellett levő 6-tal, és így tovább. Érthetően foglamaztam?
A1=A3
B1=D3
C1=G3és így tovább...
-
Declare
őstag
válasz
Delila_1
#24333
üzenetére
+ (#24334) m.zmrzlina : Amit Te irtal az viszont nagyon hasznos lesz masik makros dolgaimnal, ahol ugyan csak ugral a kepernyö
ez lett volna a következö kerdesem...amint lesz ra idöm, kiprobalom igy, ahogy irtad! Köszönöm szepen!!
Ereztem, hogy valami nagyon nagyon egyszerü dolog a megoldas
-
Declare
őstag
Sziasztok!
VB segitsegre lenne szüksegem, eleg alap kerdes szerintem, de nem talalom neten a megoldast
VB topic nem igazan pörög, azert kerdeznem itt.Olyat hogy tudok csinalni (ha jol emlekszem lehet), hogy a VB müveletek között valami ne jelenjen meg a kepernyön, de attol meg lefusson. Arra gondolok, hogy csinalok felvetellel egy egyszerü dolgot (pl egy gomb megnyomasara jelöljön ki 2 cellat es törölje ki), de azt akarom, hogy a köztes lepesek ne latszodjanak (azaz törölje ki a cellakat, de ne ugy, hogy ugrik a kepernyö a cellekra amiket kijelölök, majd törli öket).
Kisse bonyolultan irtam le de szerintem igy erthetö mi a bajom
Ezt a fenti problemat felvetellel igy tudtam megoldani
eleg tre tudom, de igy megy Sub Optionsfeld3_Klicken()
Range("C80: C91").Select
Selection.ClearContentsEnd Sub
Ha valaki tud segiteni azt nagyon köszi
-
#24329
gyu84
tag
m.zmrzlina
#24326
gyu84
tag
válasz
m.zmrzlina
#24326
üzenetére
@ (#24325) Delila_1
@ (#24326) m.zmrzlinaKöszönöm szépen mindkettőtöknek, működött!
-
-
#24327
soundsthu
csendes tag
m.zmrzlina
#24322
soundsthu
csendes tag
válasz
m.zmrzlina
#24322
üzenetére
Egy adott hónap munkalapjait szeretném kinyomtatni, egyetlen kattintással, úgy hogy minden lapon más dátum szerepeljen. (Valamikor utólag kell kinyomtatni, valamikor pedig előre a munkalapokat az aktuális dátumhoz képest.)
-
#24326
m.zmrzlina
senior tag
gyu84
#24323
m.zmrzlina
senior tag
Ez a pár sor át fogja másolni a Munka1 lap A1 cellában megadott nevű munkalap A1:B10 tartományát a Munka1 lap A2 cellában megadott nevű munkalap A1:B10 tartományába
Sub masol()
Dim strHonnan As String
Dim strHova As String
strHonnan = ThisWorkbook.Worksheets("Munka1").Range("A1").Value '"Munka2"
strHova = ThisWorkbook.Worksheets("Munka1").Range("A2").Value '"Munka3"
Worksheets(strHova).Range("A1:B10").Value = Worksheets(strHonnan).Range("A1:B10").Value
End Sub -
Delila_1
veterán
A két füzet és a hozzájuk tartozó lapok nevét a B1:B4 tartományba vittem be szövegként.
Sub másolás()
Dim WBInnen As String, WSInnen As String
Dim WBIde As String, WSIde As String
WBInnen = Range("B1") 'füzet neve kiterjesztéssel
WSInnen = Range("B2") 'lap neve
WBIde = Range("B3") 'füzet neve kiterjesztéssel
WSIde = Range("B4") 'lap neve
Workbooks(WBInnen).Sheets(WSInnen).Range("F1:H20").Copy Workbooks(WBIde).Sheets(WSIde).Range("D1")
End Sub -
Fferi50
Topikgazda
Szia!
Ahol a makróban a forrrás és a cél munkalap neve van, ott az adott cellára kell hivatkozni, ahova a nevet beírtad.
Pl. sheets("Munka1").range("B1").copy helyett sheets(activesheet.range("A1").value).range("B1").copyA másolandó munkalap neve az activesheet A1 cellában van.
Ugyanígy a cél munkalappal is.Ha felteszed a makródat "kamu" nevekkel, akkor még pontosabb választ kaphatsz.
Üdv.
-
gyu84
tag
Üdv!
Makróval kapcsolatban szeretnék segítséget kérni. Meg lehet-e adni a makróban a munkafüzet nevét úgy mint az INDIREKT függvénnyel.
Van egy munkalapom onnan kell adatot átmásolni egy másik munkalapra, a másoláshoz a makró már megvan, de a forrás- és célmunkalap nevét egy cella értékéből venné.Köszönöm előre is.
-
soundsthu
csendes tag
Sziasztok!
adott hónapra -pl. november- kitöltött (csak hétköznapok) munkalapokat szeretnék nyomtatni mindig ugyanazokkal az adatokkal. Nem szeretném emiatt állandóan a dátumot változtatni, hanem valahogyan egyben kinyomtatni az egészet.
Megoldható valamilyen módon?
-
#24319
Bunken
tag
m.zmrzlina
#24317
Bunken
tag
válasz
m.zmrzlina
#24317
üzenetére
Jó volt az első megoldás is. Mindkettővel ugyan azok az eredmények jöttek ki.
-
#24318
Bunken
tag
m.zmrzlina
#24317
Bunken
tag
válasz
m.zmrzlina
#24317
üzenetére
Akkor majd újra fogom csinálni.
Az egyik oszloppal megnézem ha nem stimmel az első eredményekkel akkor újracsinálom az egészet.
Köszi, hogy szóltál. -
#24317
m.zmrzlina
senior tag
Bunken
#24316
m.zmrzlina
senior tag
válasz
Bunken
#24316
üzenetére
Nincs mit örülök, hogy sikerült.
Azt azért ellenőrizd le hogy a =DARABTELI() fv-id jó cellára hivatkoznak-e ugyanis a #24310. hsz-ban elírtam a képletet.
Az "A oszlopban vannak a számok A1-től kezdődően. B1 képlete =DARABTELI(A:A;A2)"
helyesen:
A oszlopban vannak a számok A1-től kezdődően. B1 képlete =DARABTELI(A:A;A1)
-
#24316
Bunken
tag
m.zmrzlina
#24314
Bunken
tag
válasz
m.zmrzlina
#24314
üzenetére
Sikerült megoldani a dolgot!
Minden oszlopot kijelöltem és a cellabeállításoknal beállítottam, hogy Szám és úgy már minden jó volt.Ezer köszi a segítségért!
-
#24315
Bunken
tag
m.zmrzlina
#24314
Bunken
tag
válasz
m.zmrzlina
#24314
üzenetére
A darabteli nem működik jól. De majd megpróbálom amit írtál.
-
#24314
m.zmrzlina
senior tag
Bunken
#24313
m.zmrzlina
senior tag
válasz
Bunken
#24313
üzenetére
Ott ahol nem működik ott már a DARABTELI() sem működik vagy csak a szűrés?
Ha a már DARABTELI() sem működik lehet, hogy a szám oszlopod formátuma valójában szöveg. Próbáld meg megszorozni a számokat 1-gyel.
1. Beírsz egy 1-t valamelyik cellába ahol nem zavar.
2. Másolás
3. Kijelölöd az oszlopot amiben a számaid vannak.
4. Jobbklikk>Irányított beillesztés>Szorzás>OK
5. Az 1-et törölheted -
#24313
Bunken
tag
m.zmrzlina
#24312
Bunken
tag
válasz
m.zmrzlina
#24312
üzenetére
5 oszlopom van ebből 3-nál tökéletesen működött a darabteli képlet is meg a szűrés is de a másik két oszloppal nem akarja az igazságot.
Azért köszi szépen ez is nagy segítség volt.
A másik két oszlopot meg majd holnap átnyálazom manuálisan. -
#24311
Bunken
tag
m.zmrzlina
#24310
Bunken
tag
válasz
m.zmrzlina
#24310
üzenetére
Köszi a választ!
Megpróbáltam de nem igazán jött be. 2013 Professional Plus-t használok (ha ez jelent valamit)
Bemásoltam a képletet a B1-be és végig lehúztam, de már két egyforma szám mellett más számot hozott ki. Ennek ellenére elkezdtem a szűrést de nem minden olyan mint ahogy leírtad.
Ahogy rámentem az Egyéni szűrőre ez a kis ablak jött be:
Egyedi rekordot nem is láttam sehol, meg Listatartományt, Szűrőtartományt sem.
-
#24310
m.zmrzlina
senior tag
Bunken
#24309
m.zmrzlina
senior tag
válasz
Bunken
#24309
üzenetére
Két lépésben tudok rá tippet.
A oszlopban vannak a számok A1-től kezdődően. B1 képlete =DARABTELI(A:A;A2)
Ezt lemásolod amíg vannak számaid az a oszlopban. Ezzel megszámoltuk, hogy melyik szám hányszor szerepel.Ezután Szűrés>Speciális
Helyben szűrje
Listatartomány $A$1:$B$3011
Szűrőtartomány $B$1:$B$3011Csak az egyedi rekordok megjelenítése bekattintva
Mostmár az A oszlopban minden szám csak egyszer látszik és mellette a szám, hogy valójában hányszor található a listában.
-
#24308
hülyegyerek
addikt
m.zmrzlina
#24307
hülyegyerek
addikt
válasz
m.zmrzlina
#24307
üzenetére
Jelszavas, úgyhogy sajnos nem nyitja meg. VBA Project a neve.
-
#24307
m.zmrzlina
senior tag
hülyegyerek
#24306
m.zmrzlina
senior tag
válasz
hülyegyerek
#24306
üzenetére
Miután megnyitottad a munkafüzetet nyomsz egy ALT+F11-et. Ekkor megnyílik a VBA szerkesztő. Itt a jobb oldalon található ablakból a szokásos Ctrl+C Ctrl+V-vel
-
#24306
hülyegyerek
addikt
m.zmrzlina
#24305
hülyegyerek
addikt
válasz
m.zmrzlina
#24305
üzenetére
Nagyon láma leszek, de azt hogy kell ?
-
#24305
m.zmrzlina
senior tag
hülyegyerek
#24304
m.zmrzlina
senior tag
válasz
hülyegyerek
#24304
üzenetére
Bemásolnád ide a makrót ami a munkafüzetben van?
Hátha valaki kiszúrja,hogy hol akad ki. -
#24304
hülyegyerek
addikt
hülyegyerek
addikt
Sziasztok. 2010-es Office-t használok.Van egy 97-2003-as Excelben írt táblázat, amit a munkámhoz kellene használnom, viszont nem tudja megnyitni. A fájl megnyitásakor rábökök a makrók engedélyezésére, de hibaüzenet ugrik fel : Compile error in hidden module: Module1
Van erre valami megoldás ?
A választ előre is köszönöm. -
Wyll
őstag
válasz
bumlet
#24302
üzenetére
Ehhez kelleni fog egy segédoszlop, ugyanis önmagában nem lehet egy cellából (VBA nélkül) kivenni az abban lévő képletet. A formulák csak más formulák eredményeivel tudnak dolgozni, magukkal a más formulákkal nem.
A segédoszlop kezdődjön mondjuk Munka2!A1-ben. Ez tartalmazza a kívánt sor számát (akár képlettel kiszámolva, akár kézzel beírva, nem tudom, hogy hogyan keletkezteted), és innen már adja magát a dolog:
Munka2!A2 képlete: =A1+1
Ezt lehúzhatod, ameddig akarod, egy szép növekvő számsort fogsz kapni A1 értékétől kezdődően.Mellé a B oszlopba meg lehet írni a hivatkozást, ami ezeket a számokat használja fel:
Munka2!B1 képlete: =INDIREKT("Munka1!A"&A1)
Ezt lehúzod az A oszlop mellé, és kész.Ezután az A oszlopot akár el is rejtheted, habár módosítani mindig az A1-et kell majd. De persze ez is kikerülhető, ha a kezdőszámot egy látható cellába teszed, és A1 arra hivatkozik. Ez már csak esztétika.
-
bumlet
csendes tag
Sziasztok!
A következő problémához kérnék segítséget. Adott két munkalap, az elsőn adatok vannak, amikből a másodikon jelenítenék meg bizonyos adatokat egy meghatározott formában. A lényeg az lenne hogyha a második lap A1 cellája az első lap A1 cellájával egyenlő, akkor a 2.lap A2 cellája az 1.lap A2 cellájával legyen egyenlő. De ha a 2.lap A1 cellája az 1.lap A2599-vel egyenlő, akkor a 2.lap A2 cellája 1.lap A2600-val legyen egyenlő. Tehát a 2.lap 2. sora mindig egy sorral lentebb hivatkozna mint az első sor.
A lényeg az hogy ez kb. 20 soron keresztül működne amik mindig egymásután jönnek és azt szeretném elérni, hogy csak az első sorban kelljen módosítani a hivatkozást, a többi 19 sorhor ne kelljen hozzányúlni.
Tud valaki erre megoldást? Előre is köszönöm.
-
#24301
Fire/SOUL/CD
félisten
Pampipapi
#24297
nem lett volna nehezebb nekik ugyanazt implementálni mint a másikban
Alternatíva esetleg?
Új hozzászólás Aktív témák
Hirdetés
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- Microsoft licencek KIVÉTELES ÁRON AZONNAL - UTALÁSSAL IS AUTOMATIKUS KÉZBESÍTÉS - Windows és Office
- Vírusirtó, Antivirus, VPN kulcsok
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.
- Kaspersky, McAfee, Norton, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- Apple iPhone SE 2020 64GB, Yettel függő, 1 Év Garanciával
- ÁRGARANCIA!Épített KomPhone i5 13400F 16/32/64GB RAM RTX 4060 Ti 8GB GAMER PC termékbeszámítással
- Eredeti, új Lenovo 330W töltők - ADL330SDC3A
- Gamer szék noblechairs LEGEND TX Szövet Antracit
- BESZÁMÍTÁS! Samsung Galaxy A34 5G 128GB mobiltelefon garanciával hibátlan működéssel
Állásajánlatok
Cég: CAMERA-PRO Hungary Kft
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest