-
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
-
sztanozs
veterán
válasz RAiN91 #42699 üzenetére
Nézd meg debuggerrel, hogy melyik sorral/objektummal van gondja:
Set WB = Workbooks("C:\mappa\asd.xlsx")
Set WS = WB.Worksheets("Diagram")
Set R = Range("A45")
Range("C8") = RHa az utolsóval, akkor
Range("C8").Value2 = R.Value2
'vagy
Range("C8").Value2 = Workbooks("C:\mappa\asd.xlsx").Worksheets("Diagram").Range("A45").Value2
Hogy explicit legyen, hogy csak értéket adsz át[ Szerkesztve ]
JOGI NYILATKOZAT: A bejegyzéseim és hozzászólásaim a személyes véleményemet tükrözik; ezek nem tekinthetők a munkáltatóm hivatalos állásfoglalásának...
-
sztanozs
veterán
válasz sztanozs #42702 üzenetére
Ehh, helyesen:
Set WB = Workbooks("C:\mappa\asd.xlsx")
Set WS = WB.Worksheets("Diagram")
Set R = WS.Range("A45")
Range("C8") = R
'illetve
'Range("C8").Value2 = R.Value2[ Szerkesztve ]
JOGI NYILATKOZAT: A bejegyzéseim és hozzászólásaim a személyes véleményemet tükrözik; ezek nem tekinthetők a munkáltatóm hivatalos állásfoglalásának...
-
RAiN91
őstag
válasz Fferi50 #42705 üzenetére
Köszi a válaszokat.
Ellenőriztem a fájlneveket, jók.
Meg is nyitja ezzel a paranccsal:
Workbooks.open("C:\Users\Balint\Desktop\asd.xlsx")
Szóval, a munkalap hivatkozásnál lehet a probléma, tehát ezzel a résszel:
.Worksheets("Diagram").Range("A1")
Van diagram fül, és táblázat, A1-be beírtam egy számot.
[ Szerkesztve ]
-
Fferi50
őstag
válasz RAiN91 #42706 üzenetére
Szia!
Akkor ne Worksheet-ként hivatkozz rá, hanem Sheet-ként. Sheets("Diagram").
Illetve a fájlneved a Workbooks("asd.xlsx") legyen, amikor hivatkozol a munkalapra.
De még jobb, ha hozzárendeled a nyitáskor egy változóhoz:Set wb=Workbooks.open("C:\Users\Balint\Desktop\asd.xlsx")
Utána pedig wb.Sheets("Diagram") -ként hivatkozhatsz a munkalapra.
Üdv.[ Szerkesztve ]
-
RAiN91
őstag
válasz Fferi50 #42707 üzenetére
Mennyire helytálló, amit feljebb is írtak, hogy nyitva kell, hogy legyen?
Mert így működik, ha meg van nyitva:Sub szamol()
Range("C1") = Workbooks("asd.xlsx").Sheets("Diagram").Range("A1")
End Sub
Ha zárva van akkor nem, és úgy sem, ha az elérési út be van írva, helyesen:
Sub szamol()
Range("C1") = Workbooks("C:\Users\Balint\Desktop\asd.xlsx").Sheets("Diagram").Range("A1")
End Sub
[ Szerkesztve ]
-
Fferi50
őstag
válasz RAiN91 #42709 üzenetére
Szia!
Csak akkor működik a közvetlen érték átvétel, ha nyitva van a fájl.
Ha nincs nyitva, akkor képletként kell beírni. Makróban a Formula tulajdonságot kell használni és az Excel "3dimenziós" hivatkozását. A képlet így néz ki:=[asd.xlsx]Diagram!$A$1
Ezután bezárod a fájlt és megnézed, mi lett a képlet, ami az elérési utat is tartalmazza majd. Ezt kell reprodukálnod a makróban.
(Makrórögzítés a barátod. Csak kijelölöd a C1 cellát, F2 és enter. Utána megnézed, mit rögzített.)
ActiveCell.Formula = "='C:\Users\Balint\Desktop\[asd.xlsx]Diagram'!A1"
Üdv.[ Szerkesztve ]
-
torrentwarez
csendes tag
Sziasztok!
Ennek a függvénynek kellene a magyar változata, office 2019 nem értelmezi a FILTER függvényt mert nem találja...
=FILTER(A2:A32,ISNUMBER(SEARCH(Report!B5,A2:A32)),"not found")
Köszönöm!
-
Mutt
aktív tag
válasz torrentwarez #42711 üzenetére
Szia,
FIlTER (SZŰRŐ) jelenleg csak Office 365 insider változatban érhető el, Excel 2019ben nem fog menni. Helyette tömbfüggvény/pivot használható. Írd le hogy mit szeretnél elérni (szerintem hibás az eredeti képlet), milyen adatokon.
ÜdvA tanácsaimat ingyen adom. Ha nem tetszik, akkor kérlek ne kritizáld! / https://github.com/viszi/codes/tree/master/Excel
-
Louro
őstag
válasz torrentwarez #42711 üzenetére
Én a Google-be beírom, hogy "Excel angol magyar függvények". Az első találat elég jó. A biprojekt kellően komoly, hogy hihető legyen Sok hasznos dolog van ott.
Wow, ez nincs ott. Valami új függvény lehet. (Megpróbáltam, így off-ba teszem.)
[ Szerkesztve ]
Mess with the best / Die like the rest
-
Sesy
aktív tag
Sziasztok!
A következőt szeretném megoldani, nem tudom van-e rá mód:
Ha mondjuk a C3 cella értéke 15 akkor a C10 cella legyen bekeretezve és félkövér betűkkel legyen bele írva, hogy igaz. Ha nincsen benne semmi akkor ne történjen semmi a C10 cellával.
Előre is köszönöm a segítséget
Born stupid... Try again!
-
Sesy
aktív tag
válasz Delila_1 #42715 üzenetére
köszönöm, hogy erre magamtól miért nem jöttem rá?
azt hogyan tudom megoldani, ha egy másik xlsx-ből érkező adatokkal feltöltök egy cellát, akkor annak automatikusan beállítsa a magasságát?
manuálisan megy, a sortöréssel több sorba gomb nyomogatásával, de ez így nem túl elegáns
Born stupid... Try again!
-
Pöttön
őstag
Sziasztok!
Olyan kérdésem lenne,hogy lehet e olyan függvényt csinálni excelben, aminél ha az A4 cellának az értéke 1, akkor a B4-től az F4-ig feltölti a cellákat bizonyos számokkal, viszont ha az A4 értéke 2 akkor a B4-F4 cella tartományt megint feltöltené bizonyos számokkal, és ezt eljátszva egészen 6-ig.
Meg lehet ezt oldani? (2007-es excelt használok)
A segítséget előre is köszi!A sport a legjobb kikapcsolódás...
-
Mutt
aktív tag
válasz torrentwarez #42711 üzenetére
Szia,
FILTER függvény hiányában ezt az összetett képletet tudod használni a D-oszlopban (ha máshol kell, akkor érdemes a D$2:D2 hivatkozást javítanod:
=HAELSŐIGAZ(ÉS(DARABTELI($A$2:$A$32;"*"&Report!$B$5&"*")=0;SOROK(D$2:D2)=1);"not found";SOROK(D$2:D2)>DARABTELI($A$2:$A$32;"*"&Report!$B$5&"*");"";SOROK(D$2:D2)<=DARABTELI($A$2:$A$32;"*"&Report!$B$5&"*");INDEX(A:A;ÖSSZESÍT(15;6;SOR($A$2:$A$32)/SZÁM(SZÖVEG.KERES(Report!$B$5;$A$2:$A$32));SOROK(D$2:D2))))
üdv
A tanácsaimat ingyen adom. Ha nem tetszik, akkor kérlek ne kritizáld! / https://github.com/viszi/codes/tree/master/Excel
-
huliganboy
addikt
válasz Pöttön #42717 üzenetére
A4 cellába írt érték esetén meghatározott számhoz tartozó értéket:
=FKERES($A$4;Munka2!$A$2:$B$7;2;HAMIS)
1. Először a Munka2 fülön hozz létre a A4 cellába írt értkhez párosítani kívánt adatokat:
[kép]2. A következő föggvényeket írd be a B4-F4 celléákba:
B4- F4:=FKERES($A$4;Munka2!$A$2:$B$7;2;HAMIS)
3. Eredmény:
[kép]MEgj: Ha a B4-F4 cella értéke az A4 cell számához viszonyítva mind más szám, akkor minden egyes cellára a Munka2 lapon létre kell hozni egy segédtáblát, és minden cellábaban arra kell hívatkozni...
(#42719) lappy : A függvények összefűzése plusz feltételek megadásával nem annyira egyszerü szerintem, de az általad javasolt is egy jó megoldás hisz a feltételek és az eredményeket is tartalmazza a függvény.
-
torrentwarez
csendes tag
Szia!
Ezt akartam használni :https://www.youtube.com/watch?v=Z-h2UER3b_0 sajátra átdolgozni, de már megoldottam ezzel: https://officeguru.blog.hu/2018/04/28/automatikusan_frissulo_data_validation_list_vba_nelkulKöszönöm szépen!
[ Szerkesztve ]
-
Talala
senior tag
Sziasztok!
Van egy excel (2016-os) doksim amit régebben jelszóval védtem (megnyitáskor kéri). Tudom a jelszót nincs ezzel baj, de nem tudom eltávolítani a jelszó védelme róla. Mi lenne a megoldás erre? (akár privátban is jöhet)
Néztem netem, nevezzük át zip-re ...stb megoldásokat, de nálam nem úgy jelennek meg a dolgok mint ott.
Előre is köszi a segítséget! -
pentium4
senior tag
Sziasztok,
Google Sheet-ben hogy lenne megoldható hogy bizonyos cellák tartalmát elküldi emailben?
KösziP4
-
RAiN91
őstag
Sziasztok
Az alábbi kóddal kapcsolatban a kérdésem, hogy ha teljesül a feltétel, akkor az egymás alatt lévő parancsokat (4 cella törlése), felülről lefelé sorrendben törli, vagy egy időben, vagy olyan sorrendben, ahogy gondolja? Ez egy For - Next ciklus részlete.
Ha nem felülről lefelé sorrendben, akkor erre lenne megoldás?If Range("L" & i) <> "" And Range("O" & i) <> "" And Range("DC" & i + 1) <> Range("DB" & i + 1) Then
Range("L" & i).ClearContents
Range("M" & i).ClearContents
Range("N" & i).ClearContents
Range("O" & i).ClearContents
End If
-
róland
veterán
Adatsorok alapján dinamikusan animált diagramot miként lehet készíteni Excelben?
Öltözők telítődését kellene bemutatni. (Igazából animáció kellene, hogy gyorsítva mutassa, adott öltözőszekrényt adott leolvasó mikor adja ki, mikor szabadul fel.)
http://logout.hu/cikk/mi_is_az_a_htpc/teljes.html; Három emeleten át egy teljes liftrapszódiát játszik!
-
sztanozs
veterán
válasz RAiN91 #42733 üzenetére
Sorrendben, de nem törli, csak kiüríti.
Ha törölni akarsz, akkor célszerű hátulról előrefelé haladni:
FOR I = legnagyobbtörlentősor to legkisebbtörlendősor STEP -1
' Ide jön a törlés
NEXTJOGI NYILATKOZAT: A bejegyzéseim és hozzászólásaim a személyes véleményemet tükrözik; ezek nem tekinthetők a munkáltatóm hivatalos állásfoglalásának...
-
Zsolt_16
tag
Sziasztok, hogyan tudom megjeleníteni egy adott cellában történt rögzítésének idejét egy másik cellában? jelenleg ezt a képletet használom pl.: =HA(D4="";"";HA(A4=""; MOST(); A4))
Viszont körkörös hivatkozás illetve a most képlet nem megfelelő frisítés során szét ugranak a dátumok.
Köszönöm előre is a segítséget! -
Zsolt_16
tag
válasz sztanozs #42739 üzenetére
Jelenleg 18 fül van 1000 sorral és ma úgy gondolta, hogy nem írja ki tovább a dátumokat , visszamenőleg próbáltam törölni egy D oszlopban lévő értéket dátum eltűnik újra írás esetén nem jelenik meg , képlet nem változott így teljesen nem értem mi a gond
Az excel fent van a onedriveban onnan van szétosztva a kollégáknak, néha néha olyan is előfordul hogy egyes sorokban lévő dátum átvált a kezdő dátumra amit kezelni képes az excel (1900…) -
Misi_D
tag
Sziasztok!
Egy listából, melynek fix értékei vannak, hogyan tudom kiválogatni gyorsan azokat, melyek szummája egy előre adott értéket adnak ki?
A probléma: adott hónap napi értékesítési db-jai adottak, ill. egy bizonyos végösszeg is (ami nem egyenlő a hónap valamennyi napi teljesítményének összegével, annál kevesebb), s azt szeretném tudni, h mely napok összege adja ki ezt az értéket, ill. mely napokat kellene kiszűrnöm.
Most ezt egyszer-kétszer próbálkozással meg lehet oldani, de többször kellene vizsgálnom, az meg már nem vicces...Köszi szépen!
Ha nem tetszik, ahogy vezetek, akkor tünés a járdáról!
-
Fferi50
őstag
válasz Misi_D #42744 üzenetére
Szia!
Használhatod hozzá a Solvert. A napi értékesítések mellé felveszel két segédoszlopot. Az egyikbe 0 és 1 kerül, a másikba az értékesítés és a mellette levő 1/0 szorzata. Ennek az összegét kell célértékként megadnod. Változóként pedig a 0/1-es oszlopot. Továbbá korlátozni kell ennek az oszlopnak a felvehető értékeit 0 és 1-re.Üdv.
-
Delila_1
Topikgazda
válasz Misi_D #42744 üzenetére
Láthatsz egy képpel illusztrált példát a megoldásra itt.
Feltöltöd a C oszlopot nullákkal, majd indítod a Solvert az Adatok menü Elemzés csoportjában. Ha nem találod, előbb a Beállítások | Bővítményeknél be kell jelölnöd a Solvert.[ Szerkesztve ]
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
huan
őstag
Sziasztok!
Egy színátmenetes formázást szeretnék alkalmazni egy táblázat minden során.
A táblázatban rengeteg sor van, de a színátmenetes formázásnál, ami a kijelölt cellák legkisebb-legnagyobb elemeiből színezi a cellákat, azt csak a sorokra szeretném alkalmazni.
Magyarul ezt szeretném egyszerűen megoldani:
Egy sort kijelölve formázni színátmenettel. Majd másik sort kijelölve formázni színátmenettel.
(ha az összes sor lenne kijelölve, akkor a halmaz legkisebb eleme lenne az egyik szín és a legnagyobb eleme a másik szín. Ehelyett a sorokban lévő legkisebb-legnagyobbat szeretném)
Remélem érthető
Köszönöm! -
Fferi50
őstag
Szia!
Mivel ebben a formázási szabályban nem lehet relatív hivatkozást megadni, ezért sajnos soronként kellene ismételten bevinni.
DE! A formátummásoló simán megoldja ezt a problémádat. Egy sort leformázol a kívánalmak szerint. Utána jobb egérgomb. Megkeresed a formátum másolót (nálam a kis menü jobb alsó szélénKét egymás utáni gyors bal egérgomb kattintás bekapcsolja. Ezután kijelölöd a kívánt sorokat. Bal katt. A formátum másoló addig bekapcsolva marad, amíg ESC-t nem nyomsz neki. Ezért annyiszor és olyan részletekben használod, ahányszor csak akarod, a kikapcsolásig.
Üdv.
[ Szerkesztve ]
-
Fferi50
őstag
Új hozzászólás Aktív témák
- Microsoft licencek a KIVÉTELES ÁRAK - UTALÁSSAL IS AUTOMATIKUS KÉZBESÍTÉS - Windows és Office
- Steam, Windows, Origin kulcsok, előfizetések közvetlenül a kiadótól, a LEGJOBB ÁRON!
- Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- World of Warcraft Shadowlands Collectors edition EU EN
- Game Pass Ultimate előfizetések 1 - 25 hónapig azonnali kézbesítéssel a LEGOLCSÓBBAN!