-
GAMEPOD.hu
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
-
LonGleY
veterán
Hali! Automatikus kiegészítésekre lenne szükségem egy táblázatban:
- Egy sorba többféle adat kerül be, de jellemzően pl. a cégnév cellához ugyanaz a cím és mondjuk fizetési mód tartozik a legtöbb esetben.
- Amit tudnia kéne: ha egy új sorban egy már előzőleg felvitt cégnevet vagy címet beírunk, akkor a sorban a többi adatot is vegye át a rögzítettek alapján.
Erre simán írnánk egy adatbázisos progit jó felülettel, de nincs annyi idő rá, és szerintem ez az Excelben is kivitelezhető lenne a dolog, akár külön adatbázisozás nélkül is. A kérdés az csak az, hogy miként? Előre is köszönöm a segítséget!
[ Szerkesztve ]
-
Attas
aktív tag
Sziasztok! Kezdek megőrülni. Szivat az Excel. Van egy ilyen makróm.:
If Range("Típus").Value = "06H103023L" Then
Sheets("Elvárt ütemidő adatok").Select
Range("E5").Select
Selection.Copy
Sheets("Ütemidő műveletenként (2)").Select
Range("C33").Select
ActiveSheet.PastePersze van tovább is, de ez akaszt ki. A Value feltételnél, bármit írok be a Típus cellába és a Value után akkor szépen átviszi az adatot. De ha a fenti adatot írom be akkor nem. MIÉRT? Ha csak a 06H103023 írom be akkor jó, vagy ha az L helyett bármilyen betüt használok jó. De ha így 06H103023L akkor istennek sem. Hálás lennék bármilyen tanácsért.
"Az élet olyan mint az ásás. Néha pár gyökér feltart, de annak jól odacsapsz és mehetsz tovább!"
-
Attas
aktív tag
Hát igen... Meglett a baj. Mivel a típus cella alatt a 06H103023L számtalanszor szerepel, beíráskor rögtön felajánlotta az autómatikus kiegészítést, csak épp ott van egy szóköz is a végén. amit nem vettem észre, de a makró igen. Oh...
"Az élet olyan mint az ásás. Néha pár gyökér feltart, de annak jól odacsapsz és mehetsz tovább!"
-
Ujjlenyomat
csendes tag
Sziasztok!
Segítséget szeretnék kérni.
Különböző gyököket szeretnék vonni az excelben.
Sajnos csak négyzetgyököt tudok vonni.
Milyen kódot kell használni, hogy tudjak köbgyököt, meg negyedik, ötödik,.... gyököt vonni?Előre is köszönöm, hogy szántok rám időt.
"Mindazt tehát, amit akartok, hogy az emberek megtegyenek veletek, ti is hasonlóképpen tegyétek meg velük; mert ezt jelenti a Törvény és a Próféták." (Máté 7:12)
-
bugizozi
őstag
válasz Ujjlenyomat #15106 üzenetére
VCP7-DCV, CCNA ||| Ami működik, ahhoz nem szabad hozzányúlni!
-
Attas
aktív tag
Üdv. Egy Gomb (űrlap-vezérlőelem) -nek a színét meg lehet változtatni? A benne lévő felirat színét sikerül módosítanom, de magának a gombnak a színét nem. Köszönöm a választ előre is.
"Az élet olyan mint az ásás. Néha pár gyökér feltart, de annak jól odacsapsz és mehetsz tovább!"
-
Geryson
addikt
Köszönöm, kimásoltam, bemásoltam, de sajnos nem működik. Hibajelenség nincs, de nem számol, így valószínűleg nem jól írtam le a feladatot. Az egyszerűség kedvéért bemásolom a táblázat ezen részét és leírom, hogy nekem mire lenne szükségem:
az "M" és "N" oszlopokban a képlet: =HA(SZÁM(J3);J3*L3;"") és =HA(SZÁM(K3);K3*L3;"")
Tehát továbbra is az "O" és "P" oszlopokra kellene baromira egy képlet, aminek a következőt kellene számolnia:
- A "H" oszlopban van/nincs érték
- A "J" oszlopban van/nincs érték
- A "K" oszlopban van/nincs érték- Ha van a "H"-ban, akkor "H" és ha van a "J"-ben, akkor +"M" és ha van a "K"-ban, akkor +"N"/1,27 és mindezt persze úgy, hogy pl. lehet, hogy nincs "H" és "J", de van "K".
Rinderkennzeichnungsfleischetikettierungsüberwachungsaufgabenübertragungsgesetz
-
Dj Sügi
őstag
Üdv mindenkinek!
Először is megpróbálom érthetően leírni, hogy mit szeretnék megtudni tőletek, remélem sikerül!
Lenne egy olyan kérdésem, hogy van 9 oszlopom és 10 sorom az excelben 0-15millióig mindenféle egész szám vegyesen.
A 0-999 közöttiekre ezt kellene kiírja nekem, hogy pl: 542 fő.
Az 1000-999999 közöttiekre azt kellene hogy kiírja, hogy pl: 1E fő, vagy pl: 999 E fő
A 1000000-15000000 közöttiekre azt kellene hogy kiírja, hogy pl: 1M fő, vagy pl: 15 M főCsak az a bökkenő, hogy ezt mindenképpen függvényekkel kellene megcsinálni. A HA és az ÖSSZEFŰZ függvényekkel, ha jól gondolom.
Tehát megkellene neki keresni az összefűzött tartományban a fentebb leírt feltételeket, és ha teljesül a feltétel, akkor úgy írja ki, mint ahogy a példákban leírtam, ha pedig nem akkor csak az értéket adja vissza( azt a számot), ami eredetileg is a cellában volt.
Remélem valakinek van valami tippje rá, Köszi előre is!!!
[ Szerkesztve ]
🚗 FORD - First On Race Day 🚗
-
félisten
Űrlap vezérlőjét nem lehet állítani. használj ActiveX vezérlőt(CommandButton), jobb égér rajta/Tulajdonságok/ és a BackColor tulajdonságnál módosíthatod a színét.
(ForeColor meg az írás színe)Dj Sügi
Ha több feltétel nem lesz, azaz nem lesz még, hogy 15M feletti érték is lesz, akkor sima cellaformázással is kivitelezhető.
Persze az kérdéses számomra, hogy pl a 999999-ből hogyan is lesz 999E, mert 999000 esetén még érthető.Mindegy, azért beteszem a formázást, arra ügyelj, hogy a formázásban több szóköz van egymás után, nem véletlenül, viszont ha pl Firefox-ot használsz, akkor amikor kimásolod majd a formátumot, az eltávolítja a felesleges szóközöket, ami ebben az esetben hibás működést von majd maga után.
Chrome vagy Dragon rendesen tudja másolni vagy kézzel bepötyögöd.[<1000]###" fő";[<1000000]#####0 " E";#######0 " M"
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
-
Attas
aktív tag
válasz Fire/SOUL/CD #15111 üzenetére
Nagyon köszönöm a válaszod !
"Az élet olyan mint az ásás. Néha pár gyökér feltart, de annak jól odacsapsz és mehetsz tovább!"
-
lappy
őstag
válasz Geryson #15109 üzenetére
Szia!
=HA(ÉS(SZÁM(H3);SZÁM(J3);SZÁM(K3));H3+M3+(N3/1,27);HA(ÉS(SZÁM(H3);SZÁM(J3));H3+M3;HA(SZÁM(H3);H3;"")))
ezt az O oszlopba írtam csak meg.
Bár van ami nem tiszta számomra "mindezt persze úgy, hogy pl. lehet, hogy nincs "H" és "J", de van "K"" hogy ilyenkor mit számoljon?Bámulatos hol tart már a tudomány!
-
-
kekkec
aktív tag
Sziasztok!
Feltételes formázásban kérnék segítséget (2007es verzióban).
Egy táblázatban szeretnék feltételesen megformázni cellákat színskálával az alattuk lévő cellák változó értéke alapján.
Sajnos csak azt a cellát tudtam formázni amiben az érték van.
Hogyan tudnám azt beállítani, hogy az egyes cellák megformázása az alattuk lévő cella értéke alapján történjen, vagy felvegyék azok kitöltő színét ?Előre is köszi!
-
poffsoft
addikt
Üdv!
Egy nagy szakértésre lenne szükségem (asszem jóval komolyabb a feladat, mint amit én meg tudok oldani).
Szóval, van egy szép munkafüzet százegynéhány munkalappal.
A munkalapokon levő adatokat kellene egyetlen táblába összefésülni, összegezve meg osztályozva, bizonyos feltételek szerint...
Ha van lelkes szakértő a környéken, szívesen megosztanám vele a részleteket is....
köcce![ Szerkesztve ]
-
-
Attas
aktív tag
Üdv.
Kis help kellene. Létre hoztam ComboBox -ot. (Az egyes kép) Azt szeretném megoldani, hogy ha a boxban a felhasználó kiválaszt egy adatot, akkor a második képen látható ugyanazon adat melletti cella tartalma (pl. Típus 1.) beleíródjon egy cellába. Előre is köszönöm a helpet!!"Az élet olyan mint az ásás. Néha pár gyökér feltart, de annak jól odacsapsz és mehetsz tovább!"
-
Delila_1
Topikgazda
Például így oldhatod meg.
A listbox tartománya a Munka1 lap A1:A10.Ezzel indítod a userformot.
Sub start()
UserForm1.ListBox1.List = Sheets("Munka1").Range("A1:A10").Value
UserForm1.Show
End SubA listbox kiválasztott elemén duplaklikkre beírja az elemet a füzet aktuális cellájától egy cellával jobbra.
Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
Dim sor As Integer
sor = Me.ListBox1.ListIndex + 1
Selection.Offset(, 1) = Range("A" & sor)
End SubA +1 azért kell, mert az index nullával kezdődik.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Attas
aktív tag
válasz Delila_1 #15125 üzenetére
Nagyon öszönöm a válaszod. Vagy roszúl követtem instrukcióidat, (bár a megírt vezérlés működött csak nem az általam várt eredménnyel), vagy csak nem jó fogalmaztam.
A cél az alábbi kép lenne. Nekem a Típus 1, 2, 3..stb adat kell majd a továbbiakban.Köszönöm!!!
"Az élet olyan mint az ásás. Néha pár gyökér feltart, de annak jól odacsapsz és mehetsz tovább!"
-
Delila_1
Topikgazda
-
Attas
aktív tag
válasz Delila_1 #15129 üzenetére
Igen a táblázat fix, és csak az adatok tárolására kell. Igazából egész más helyen lesz majd. De a lényeg, hogy nekem elsősorban ne a a képen látható kiválasztott adat, hanem a mellette fixen elhelyezkedő Típus adat kell.
Köszönöm
"Az élet olyan mint az ásás. Néha pár gyökér feltart, de annak jól odacsapsz és mehetsz tovább!"
-
Delila_1
Topikgazda
Mivel nem árultad el, hol lesznek az adatok, a D2:E8 tartományra írtam meg, majd átalakítod a makrókat.
Sub Start()
UserForm1.ListBox1.List = Sheets("Munka1").Range("E2:E8").Value
UserForm1.Show
End SubPrivate Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
Dim sor%, usor%, nev$
sor% = Me.ListBox1.ListIndex + 1
usor% = Cells(Rows.Count, "A").End(xlUp).Row + 1
nev$ = Me.ListBox1.List(Me.ListBox1.ListIndex)
Range("B" & usor%) = nev$
Range("A" & usor%) = Range("D" & Application.WorksheetFunction.Match(nev$, Columns(5), 0))
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.
-
Delila_1
Topikgazda
válasz Delila_1 #15131 üzenetére
Az előzőből benne maradt az itt már feleslegessé vált sor, amivel működik, de nincs szükség rá:
sor% = Me.ListBox1.ListIndex + 1
Ezt törölheted, és a Dim sorból is a sor%-ot.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Attas
aktív tag
válasz Delila_1 #15131 üzenetére
Valamiért nekem nem működik. Egyenlőre ebben a képen szereplő próbatáblázatban, az általad írt utasítást használva. Most adatra klikkelve az A2 és A3 cellába semmi sem jelenik meg.
Én rontottam el valamit?
Chrome böngészőt használva másoltam ki az utasítást, ha ez jelent valamit.[ Szerkesztve ]
"Az élet olyan mint az ásás. Néha pár gyökér feltart, de annak jól odacsapsz és mehetsz tovább!"
-
Delila_1
Topikgazda
Duplaklikket neki!
A Start makró modulba kerül, a másikat úgy vidd be, hogy a VBE-ben a listboxra klikkelsz.
A2 és B2 cellában kell megjelenni az adatoknak. A következő kiválasztás adatai az A3 és B3 cellában lesznek.
[ 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.
-
kekkec
aktív tag
Hi.
Amit linkeltél 2010es verzióhoz segítség.
Ahogy első válaszodban javasoltad, úgy nem megy, mivel az adott cella értéke alapján fogja formázni a színskálákkal, nem az alatta lévő alapján, nekem pedig úgy kell.
Tehát például a képen látható "Formázandó cella" (N20) kitöltő színét az alatta lévő "Érték" (N21) cella értéke alapján szeretném színezni. Ergó N21 értéke adná meg a saját maga és N20 színét is a színskálán.
Bocs, ha félreértettelek, de még mindig nem vágom, hogy lehet ezt megoldani.
-
Delila_1
Topikgazda
A bővítményeket 2007-től Az Excel beállításainál találod.
Kezelés: Excel bővítmények, Ugrás. Ott kapcsold be a 2 Analysis kezdetűt, hogy működjön a MATCH függvény.Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
lappy
őstag
válasz kekkec #15136 üzenetére
2007 es verzióban!
Ha jól láttam akkor bizonyos tartományok vannak a kép alapján!
akkor én így csinálnám meg:
feltételes formázáson belül csak az adott tartalmú cellák formázása esetén a cellaérték a következők között van pl 0-10 beállítasz neki egy színt , majd az érvényességet a teljes tartományra állítod be! ezt megismétled addig amíg 90-100 % el nem jutsz!Bámulatos hol tart már a tudomány!
-
Attas
aktív tag
válasz Delila_1 #15140 üzenetére
Szia. Még egy kérdés. Az alábbi modulban a vastagon kiemelt D -nek mi szerepe van? Mit jelent?
Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
Dim nev$
nev$ = Me.ListBox1.List(Me.ListBox1.ListIndex)
Range("Típus") = nev$
Range("CellTip") = Range("D" & Application.WorksheetFunction.Match(nev$, Columns(5), 0))
End Sub"Az élet olyan mint az ásás. Néha pár gyökér feltart, de annak jól odacsapsz és mehetsz tovább!"
-
kekkec
aktív tag
Naja. Pont a babra munkát próbáltam volna elkerülni, ezért is akartam színskálákkal megoldni, és ami lényegesebb, hogy a különböző árnyalatok szemléltessék az esélyeket, de ahogy elnézem az Excelt ilyet színskálával nem tud ezek szerint. Százalékonként meg nincs kedvem játszani a színekkel és szabályokkal.
-
Delila_1
Topikgazda
A MATCH (hol.van) függvény megkeresi az 5. (E) oszlopban a kiválasztott adat sorát, és ebben a sorban, a D oszlopban található értéket viszi be a B2-be, vagy ahogy elnevezted ezt a cellát.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Attas
aktív tag
válasz Delila_1 #15144 üzenetére
Nem kell megadni a lap nevét is? Mert "típus" és a "CellTíp" nevü célcellák más munkalapban vannak mint az adatok. Ilyenformán kapok hibaüzenetet. A kiválasztot adatot már beírja ahova kell csaka "Típus 1." beírásakor megy hibára...aszem
Azért X mert az oszlop betűjele is X[ Szerkesztve ]
"Az élet olyan mint az ásás. Néha pár gyökér feltart, de annak jól odacsapsz és mehetsz tovább!"
-
w.miki
veterán
Hali!
Excelben kérnék segítséget. Excel 2003. 11.8302.8221 SP3 alatt.
Egy oszlopban szeretnék sorozatot csinálni, egymás alá, ilyen formában:
3halado_1/Halado03_mondatok_001_angol.mp3
3halado_1/Halado03_mondatok_002_angol.mp3
3halado_1/Halado03_mondatok_003_angol.mp3
Szóval a 3 jegyű szám növekedjen a kezdetektől.
Ezt szeretném a lehúzásos módszerrel csinálni.
de ha rákattintok az (néhány) első tagra, és azt húzom le, akkor az .mp3-től számol mp6.-ig, és még tovább. Szóval csak az utolsó tagot növelni.
Hogyan lehetne beállítani, hogy a szöveg közepén lévő 3 jegyű számsorozatot növelje automatikusan az excel?Vagy... ami még jobb lenne... hogy egy másik XLS táblázat első (A) oszlopában lévő számokat(és betűket) vegye át, és azt írja be a mondatok_xxx_ angol.mp3 közé.
(xxx helyére kéne, ami a másik (file)táblázat A oszlopában van)De ha az elsőre van egy könnyű megoldás, az is jó lenne.
kösziOlcsó kütyük: http://tiny.cc/fbkutyu
Új hozzászólás Aktív témák
- 15 éves az első androidos Samsung telefon
- AGM M7 - elnyűhetetlen okostojás
- Telekom mobilszolgáltatások
- Kínai, és egyéb olcsó órák topikja
- VR topik (Oculus Rift, stb.)
- ASUS routerek
- E-roller topik
- Kínában túl sok az EV, fokozódik az árháború
- Robogó, kismotor
- Modern monitorokra köthető 3dfx Voodoo kártya a fészerből
- További aktív témák...
- Steam, Windows, Origin kulcsok, előfizetések közvetlenül a kiadótól, a LEGJOBB ÁRON!
- Windows, Office licencek a legolcsóbban, egyenesen a Microsoft-tól - 2990 Ft-tól!
- Game Pass Ultimate előfizetések 1 - 25 hónapig azonnali kézbesítéssel a LEGOLCSÓBBAN!
- AKCIÓ! - STEAM kulcsok /Anuchard, Aragami, Children of Morta, stb. - 2024.04.17.
- Bitdefender Total Security 3év/3eszköz! - "Tökéletes védelem most kedvező áron..."