- Proxmox VE
- A pénzügyi hatóságok helyett ír hamis üzenetet az AI
- Az Apple szerint ejteni kell az USA trösztellenes perét
- Mesterséges intelligencia topik
- Linux kezdőknek
- Aliexpress tapasztalatok
- Sweet.tv - internetes TV
- Zyxel NAS326
- Facebook és Messenger
- Telekom otthoni szolgáltatások (TV, internet, telefon)
-
IT café
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
-
nagyúr
Sziasztok. Helpet szeretnék kérni. Van egy jó nagy táblám, amiben vannak felvéve ID alapján adatok ami mellé van írva egy érték.
Pl:
0001 | Kiss Józsi | 111
0001 | Kiss Józsi | 222Nos milyen függvénnyel tudnám ezeket összeadni? Tehát, hogy mondjuk a Sheet2-n jelenjen meg úgy(csak egyszer), hogy:
0001 | Kiss Józsi | 333 -
Pityke78
őstag
Sziasztok!
megjött az új laptopom és szeretném a régiről a jól bevált, kialakított excel beállításokat áthozni.
Gondolok itt makrók, ikon beállítások, elhelyezések, ilyesmi.Van erre lehetőség, vagy kezdhetek mindent előröl felépíteni?
Köszi
-
Caipi
tag
válasz KaiotEch #21802 üzenetére
Szia,
A példád nem teljesen világos számomra, ha jól értelmeztem, akkor 3 oszlopban vannak az adataid. Ezeket szeretnéd összesíteni, úgy, hogy amennyiben az első két oszlopban azonos adatok szerepelnek, akkor a harmadikban szereplő számokat adja össze.
Ezt a szumhatöbb() függvény el tudja végezni neked.
A Sheet2-n létre kell hoznod egy listát az első két oszlop adataiból, amely csak egyedi értékeket tartalmaz, majd erre kell alkalmazni a függvényt.
Pl:
Sheet2 első két oszlopa az adat, harmadik oszlop függvénye: A1&B1. Ez a két oszlop celláiban szereplő értékeket összefűzi egybe. Ebből már ki tudod szedni az egyformákat. Az excel Adatok/ismétlődések eltávolítása segítségével. A maradék mellé kell a szumhatöbb().Üdv,
Caipi -
klambi
addikt
Szevasztok!
Olyan gondba ütköztem, amikor 2-3 vagy több excel ablak van nyitva win 7 alatt, a tálván látszik az ikonra helyezve az egeret ugye egy kis view ablakban megjelennek a megnyitott táblák. Azonban ha így szeretnék ablakot váltani nem engedi, egyszerűen nem vált ablakot, csak alt tab os megoldással, azonban ez eléggé kényelmetlen és lassú.
Van valakinek ötlete, hogy ezt hogyan, mivel lehet orvosolni?
(egyszer csak megjelent ez a hiba egyik napról a másikra...)"Mond szépen angolul: Gyors róka!"
-
zhari
csendes tag
Szeretnék egy olyan macrót mely megnyitja az adott elérési út összes almappájából (C:\...\mappanév ) az összes aaa_yyyy.yy.yy.xlsx (y változik, aaa_ állandó) tábláját és ezen táblák minden "Munka1" nevű munkalapok L1 celláit és A4:L14 tartományait egymás alá másolja.
Tehát az első L1 menjen A1-be és az A4-L14 menjen B1-M12-be.
Második tábla L1 cellája A13-ba és az A4-L14 menjen B13-M24-be.Szép napot.
-
David888
tag
Sziasztok!
Ezekkel a feladatokkal lenne gondom, valaki legyen szíves segítsen, mert nagyon szeretnék átmenni táblázatból :S
A H1 cella tartalma: „Átlagos súly”. Alatta jelenjen meg az egyes iskolák nevében induló kutyák átlagos testsúlya! Az eredmény egy tizedes jegyre kerüljön kiírásra!
A K3 cellába írd be „Iskola neve”! Alatta jelenítsd meg. hogy melyik kutya, milyen nevű iskolából jött! A megoldáshoz használd fel az „iskola” munkalap adatait, de azokat nem másolhatod (nem szervezheted át) a megoldásod érdekében!
http://www28.zippyshare.com/d/85874890/2184/05_tablazat.xlsx
Előre is köszönöm nektek!!!
XLive: SentineLHUN | Nintendo: SW-1636-2305-7415
-
Delila_1
Topikgazda
válasz David888 #21812 üzenetére
Szia!
A verseny lap D4-es cellájában a képlet
=INDEX(iskola!A:D;HOL.VAN(D4;iskola!D:D;0);1)A súgóból:
Szintaktika: INDEX(tömb;sor_szám;oszlop_szám)
Táblázat vagy tömb azon elemének értékét adja vissza, amelyet a sorszám és oszlopszám mint index meghatároz.A képletben a sor_számot a HOL.VAN függvénnyel határoztam meg, ahol pontos értéket kerestem (az utolsó paraméter 0). Az oszlop_szám értéke 1, mert az iskolák nevét az első oszlop tartalmazza.
Így is lehetett volna:
=INDEX(iskola!$A$1:$D$5;HOL.VAN(D4;iskola!D:D;0);1)
Ha az iskola lapon nem a teljes A oszlopot adom meg, akkor a tartományt fixen kell megadni, erre szolgálnak a $ jelek.Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
veterán
sziasztok!
van több, ugyanolyan hosszú adatsorom, és ezekből ugyanolyan hosszú részleteket szeretnék megjeleníteni két diagramon, az egyiken 4 adatsor van, a másikon pedig 3. azt szeretném megoldani, hogy egy inputboxban definiálom az adatsor elejét és végét, a makró pedig frissítse ezáltal a diagramokon az adatsorokat.
köszönöm a segítséget!
"a jövötsajnos nemlehet tudni csakhamárotvagy deakormegmár azajelen"
-
bagira82
csendes tag
Sziasztok
Excel makró írásban szeretném újra a segítségeteket kérni:
Van egy cellám, aminek a tartalma pl.: a következő:
155367A-01L,193135D-01,193135E-01L
Hogyan tudnám a vessző előtt lévő 11 vagy 10 karaktereket beolvasni jelen esetben 3 (a, b, c) változóba?
Köszi szépen előre is!
Üdv
Jani -
bagira82
csendes tag
válasz Delila_1 #21817 üzenetére
Szia,
A megoldásodat az alábbira formáltam. Hogyan tudnám meghatározni, hogy mennyi ilyen Tomb változó keletkezett? A lényege az egésznek az lenne, hogy a vesszőig beolvasott karaktereket az "a"változóban tárolnám, addig, amig egy másik munkalapon megkeresem az "a" változóban lévő értéket. Utána jöhet a következő vessző előtti 10 vagy 11 karakter, amit szintén "a" váltzóban tárolnám, és ez az egész addig megy, amíg el nem fogynak a karakterek a cellában.
Do
lep = ActiveSheet.Cells(i, 4).Value
Dim Tomb
Tomb = Split(ActiveSheet.Cells(i, 4).Value, ",")Do
a = Tomb(j)
j = j + 1
Loop Until Tomb(j) = Empty ' HIBAÜZENET ITT (subscript out of range)i = i + 1
Loop Until lep = Empty
Köszi
-
PistiSan
addikt
Excel makró tanulásoz tudtok ajánlani valami könyvet, weboldalt, akármit?
-
lappy
őstag
Szia!
Az első részre a megoldás:
Sub Open_My_Files()
Dim MyFile As String
MyPath = " M:\Access Files\ "
MyFile = Dir(MyPath)
Do While MyFile <> ""
If MyFile Like "*.xls" Then
Workbooks.Open MyPath & MyFile
Sheets(1).Select
Range("C3") = 6
ActiveWorkbook.Close True
End If
MyFile = Dir
Loop
End SubA második részre meg szerintem találsz itt is a fórumon leírást, a kettőt már csak össze kell tenni és kész.
Bámulatos hol tart már a tudomány!
-
Delila_1
Topikgazda
válasz bagira82 #21818 üzenetére
Sub mm()
Dim Tomb, i As Integer, j As Integer, a As Variant
For i = 1 To 5
Tomb = Split(ActiveSheet.Cells(i, 4).Value, ",")
For j = 0 To UBound(Tomb)
a = Tomb(j)
MsgBox a
Next
Next
End SubProgramozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
toth60
csendes tag
Én is segítségre szorulok:
Meg lehet(ne) azt egy(vagy több) cellával tenni, hogy a beleírás után zárolja (ne lehessen többet beleírni) és csak egy jelszóval lehessen újra szerkeszteni?
Jelen pillanatban csak kézi zárolással tudom ezt megoldani, de jó lenne ezt ha az excel automatikusan elvégezné!
Nagyon hálásan köszönök minden segítséget! -
Delila_1
Topikgazda
válasz toth60 #21826 üzenetére
1. Jelöld ki együttesen a cellákat, amikbe engeded a beírást. Ezt például a Ctrl billentyű nyomva tartása mellett a cellákra kattintással teheted meg.
2. Adj nevet a kijelölt területnek, legyen a név zárolni.
3. Védd le a lapot. A védelemnél a Zárolt cellák kijelölése elől vedd ki a pipát, a Nem zárolt cellák kijelölése legyen kijelölve. Nálam a jelszó aaa, ehelyett vigyél be valami mást.
4. Lapfülön jobb klikk, Kód megjelenítése. Bejutottál a VB szerkesztőbe, ahol a jobb oldali üres felületre másold be a lenti makrót.
5. Írd át az
ActiveSheet.Protect Password:="aaa", UserInterfaceOnly:=True
sorban az aaa-t a saját jelszavadra, indulhat a munka.Private Sub Worksheet_Change(ByVal Target As Range)
ActiveSheet.Protect Password:="aaa", UserInterfaceOnly:=True
If Not Intersect(Target, Range("zárolni")) Is Nothing Then Range(Target.Address).Locked = True
End SubProgramozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
toth60
csendes tag
válasz Delila_1 #21827 üzenetére
Ez eddig szuper,köszi szépen...csak most minden egyes cella beíráskor le kell venni a lapvédelmet !
Konkrétan a problémám:
egy olyan excelt kell használnunk, amibe ha 1x egy cellába/sorba beír valaki, azt ne lehessen megváltoztatni többé, csak olvasni ( a példádban a lapvédelem felszabadítása után bármelyik cellát lehet módosítani a tartományon belül is, én pont ezt szeretném elkerülni!)
Tehát egy felhasználó rögzít egy sort a táblában (pl. 5 cellát), majd utána mentéskor ennek a sornak kellene zárolódni, azért hogy a leírtakat ne lehessen megváltoztatni csak olvasni és így menne tovább minden bejegyzés!
Biztos én nem magyaráztam el a problémámat érthetően, bocsi érte! -
Delila_1
Topikgazda
válasz toth60 #21828 üzenetére
Én vagyok a hibás. Az 1. pontban nem írtam meg, hogy az írható cellák zárolását vedd le, akkor már nem lesz hiba.
Ha azt akarod, hogy az 5. (E) oszlopba írás után legyen a teljes sor zárolt, akkor az A:E oszlopok celláinak a zárolása elől vedd ki a pipát a cellaformázásnál, a makró pedig a laphoz rendelve:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 5 Then
ActiveSheet.Protect Password:="aaa", UserInterfaceOnly:=True
Rows(Target.Row).Locked = True
End If
End SubA makró bemásolásakor írd át az aaa jelszót a saját jelszavadra.
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 toth60 #21831 üzenetére
A lapvédelem előtt add meg a háttérszínt az összes cellának. A makró a védett tartomány hátterét fehérre állítja a védelemmel azonos időben.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 5 Then
ActiveSheet.Protect Password:="aaa", UserInterfaceOnly:=True
Rows(Target.Row).Locked = True
Range("A" & (Target.Row) & ":E" & Target.Row).Interior.Color = vbWhite
End If
End SubProgramozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
pigster
senior tag
Lehetséges olyan számformátum létrehozása (esetleg vmilyen feltételes formázás), ami így jeleníti meg a számokat:
Beírt (számított) adat ---> megjelenik:
123,5 ---> 123,50
123 ---> 123,--
Magyarul, kettő tizedesre kerekít, de ha egész számról van szó, akkor a
,00 helyett ,--
jelenjen meg[ Szerkesztve ]
FIGYELEM! A többszázezres Samsung okostévék kéretlen reklámokat tolnak az arcodba.
-
pigster
senior tag
válasz pigster #21837 üzenetére
Alakul:
Feltételes formázásnál beartam:
=(MARADÉK(<<ez_itt_a_cella_hiv>>;1) =0)
Megadtam a megfelelő számformátumot. Most már csak aza gondom, hogy hogyan lehetne a tiezdesvesszőre igazítani az egymás alatti adatokat?FIGYELEM! A többszázezres Samsung okostévék kéretlen reklámokat tolnak az arcodba.
-
pigster
senior tag
Köszi.
Ez eddig ok is lenne, de csak akkor működik, ha ténylegesen ott van a szám is, tehát pl:
1,234
12,34
123,4Ezeket szépen tizedesre igazítaná
De az én problémám az lenne, hogy hogyan lehetne ezt úgy megoldani, hogy ebben az esetben is tizedesre igazodjon, az elsó szám az az előzőekben megfejtett feltételes formátum miatt nézzen így ki, tehát egész számnál ne 00-t írjon ki a tizedesekhez, hanem "--". Ennek a formátumkódja meg "# ##0,--". Ezt meg sehogy sem sikerült összehozni a kérdőjellel.:123,--
1,23
12,30
Na, szóval ilyesmi kéne, de úgy, hogy ne kelljen monospace karaktert beállítani Excelben (Lucida Console, Courier New stb)
illetve:
Ha egész szám van megadva, akkor még sikerült megoldanom, hogy semmit se írjon kia tizedesekhez, de a nyamvadt tizedesvesszőt ekkor is kiteszi. El lehet tüntetni vhogy, hogy egész értékeknél ne jelenjen meg a tizedesveszző, de mégis ahhoz igazodjon így?123
1,23
12,30[ Szerkesztve ]
FIGYELEM! A többszázezres Samsung okostévék kéretlen reklámokat tolnak az arcodba.
-
Delila_1
Topikgazda
válasz pigster #21841 üzenetére
A feltételes formázás képlete: =a1=Int(A1), a formátum: # ###",—"
A hosszú vízszintes vonalat a bal Alt lenyomása mellett a számbillentyűzeten beírt 0151 adja.Szerk.: a teljes oszlop nem feltételes formátuma ezres csoportosítás, 2 tizedessel.
[ 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.
-
Delila_1
Topikgazda
válasz pigster #21841 üzenetére
Formátum a vonal eltüntetéséhez: # ###_,_— (alsó kötjel, vessző, alsó kötjel, 0151)
A képlet marad az előbbi.A formátumnál az alsó kötjel után megadott karakter szélességének megfelelően ad egy jobb oldali behúzást.
Például a 0,0_W a bevitt szám mögött egy W-nek megfelelő szélességű üres helyet hagy.Itt két karakterrel, a vesszővel, és a hosszú kötjellel kell behúzni, mindegyikhez külön be kell írni az alsó kötjelet.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
pigster
senior tag
-
pigster
senior tag
válasz Delila_1 #21845 üzenetére
Hú, látom nagyon beleástad magad, köszi!
Úgy tűnik, hogy tizedesvesszőhöz igazodnak, pedig nem. Nagyobb szövegméretnél, meg "exotikusabb" betűtípusoknál (Algerian, de akár Arial Black is) látszik, hogy mégsem. Legalábbis nekem nem. Mindegy, majd azt gondolom, hogy tényleg egymás alatt vannak...FIGYELEM! A többszázezres Samsung okostévék kéretlen reklámokat tolnak az arcodba.
-
Delila_1
Topikgazda
válasz pigster #21846 üzenetére
Kísérletezd ki, hogy a különleges karaktereidhez mit kell a számok mögé tenni, vagy ne használj a számokhoz egzotikus karaktereket.
Verdana: # ###_,_—_N
[ 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.
-
pigster
senior tag
válasz Delila_1 #21847 üzenetére
Aztán közben rájöttem, hogy hiába sikerül valahogyan a tizedesvessző környékén az igazítás, az egyes helyiértékek már szépen elcsúszva lesznek egymás alatt amúgy is - főleg nagyobb számértékeknél. Erre csak a fix szélességű betűkészletek adnak megoldást.
FIGYELEM! A többszázezres Samsung okostévék kéretlen reklámokat tolnak az arcodba.
-
-szabi-
őstag
Helló
Cellatartomány átlagát akarom kiszámíttatni, azzal a feltétellel, hogy üres cellák, 0 értékű illetve szöveget tartalmazó cellákat ne vegye számításba.
#zéróosztó-nál tovább nem jutok.
Köszi.üdv
szabi
Új hozzászólás Aktív témák
- Kerti grill és bográcsozó házilag (BBQ, tervek, ötletek, receptek)
- Gyúrósok ide!
- Vezeték nélküli fülhallgatók
- Milyen autót vegyek?
- Kipróbáltuk a Xiaomi 14 Ultra fotós szettjét
- Nvidia GPU-k jövője - amit tudni vélünk
- Óvodások homokozója
- WoW avagy World of Warcraft -=MMORPG=-
- Autós kamerák
- Világ Ninjái és Kódfejtői, egyesüljetek!
- További aktív témák...
Állásajánlatok
Cég: Promenade Publishing House Kft.
Város: Budapest
Cég: Ozeki Kft.
Város: Debrecen