-
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
-
Caipi
tag
válasz littleNorbi #21193 üzenetére
Szia,
Mellette lévő oszlopba az alábbi képletet írod:
= "1"&A1, ahol az A1 a számot tartalmazó cella. Majd ezt lemásolod mindegyik cella mellé.Üdv,
Caipi -
Caipi
tag
válasz littleNorbi #21195 üzenetére
Kijelölöd, másolás, irányított beillesztés, és felülírod az eredeti számokat vele.
Üdv,
Caipi -
alfa20
senior tag
válasz littleNorbi #21494 üzenetére
Szia,
Hát szerintem FKERES függvénnyel keresd összes (többhöz a kevesebbet), majd ahol van találat az kuka, aminél meg #HIÁNYZIK van az marad.
"Az agy olyan, mint az ejtőernyő: csak akkor működik, ha nyitott." (Thomas Dewar)
-
Delila_1
Topikgazda
válasz littleNorbi #21494 üzenetére
Vegyük, hogy a Munka1 lapon van a hosszabb-, és a Munka2-n a rövidebb névsorod, mindegyiken az A oszlopban, és mindkét lapon van címsor.
A Munka1 B2 cellájának képlete =DARABTELI(Munka2!A:A;A2)
Ez nullánál nagyobb értéket ad, ha a név szerepel a Munka2 lapon, és nullát, ha nem.
Autoszűrővel kiszűröd a nullánál nagyobb értéket tartalmazó sorokat, és az összeset törlöd.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 littleNorbi #21569 üzenetére
Nincs mit.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
slashing
senior tag
válasz littleNorbi #22577 üzenetére
hát a bármelyik sheetben az egyszerű képlettel biztos nem fog menni, viszont ha erre csak a fő lapot használod akkor csak egy egyszerű cellahivatkozás kell a többi sheetbe.
Pl. sheet2-nél beírod a dátum oszlopba : =főlap!A1 (már ha az a1-ben dátum van) csak ha már van 200 dolgozó akkor ez kicsit macerás lesz használhatod még az fkeres függvényt is de ehhez meg tudni kéne a lap/lapok felépítését mert nem biztos hogy használható.
[ Szerkesztve ]
-
Fferi50
őstag
válasz littleNorbi #22577 üzenetére
Szia!
Képlettel fkeres lehet a barátod, DE ehhez kell egy "főlap" és mindehol erre kell a képletnek hivatkoznia.
Úgy képzelem, hogy a főlapon van egy oszlop, ahol a dolgozók nevei vannak (és az azonosítójuk is még egy másik oszlopban) , mellettük levő oszlopban pedig a belépés dátuma. Ide beírod a változást.A többi lapon a képlet:
=fkeres( dolgozó név; főlapon levő tartomány; 2; 0)Az oszlopszám (2) attól függ, hogy csak név alapján keresel, vagy azonosító alapján és az van az A oszlopban, Ez utóbbi esetben az oszlopszám 3.
Pl: = fkeres( A2;főlap!A1120;2;0)
Ezt a képletet minden egyes lapon a kívánt oszlopon "végighúzod".
Ha a főlapon megváltozik a dátum, ezzel együtt minden másik lapon is megváltozik.
VISZONT: Sehol máshol ne változtass dátumot, mert az nem hat más lapokra, sőt a képlet is elvész abban a cellában.
Üdv.
-
slashing
senior tag
válasz littleNorbi #22580 üzenetére
"Az FKERES függvény egy táblázat balszélső oszlopában keres, és az oszlop_szám-mal megadott oszlop azonos sorából tér vissza egy értékkel"
Így!
Azért mondtam hogy ehhez kéne ismerni a felépítést mert ha neked pl. a főlapon a dátum a nevek előtt van akkor nem lesz jó....
=fkeres(keresési érték = név ; tábla ahonnan az adatokat akarod kikeresni tehá a főlap adatai ; oszlop = annak az oszlopnak a száma ahonnan a dátumot akarod megjeleníteni(az előbb kijelölt táblázatból) ; igaz vagy hamis ez már egyértelmű lesz )
-
Fferi50
őstag
válasz littleNorbi #22581 üzenetére
Szia!
Itt a képlet:
=FKERES(Sheet2!A2;Sheet1!$A$2:$B$10;2;0)
Az előbb rossz helyre válaszoltam.
Üdv.
-
littleNorbi
aktív tag
válasz littleNorbi #22586 üzenetére
Megoldva. Köszönöm!
-
Fferi50
őstag
válasz littleNorbi #22586 üzenetére
Szia!
De, működik, csak légy szíves a cella formátumot dátumra állítani!
Üdv.
-
lappy
őstag
-
lappy
őstag
válasz littleNorbi #23309 üzenetére
Szia!
Hát ha jól van megírva a függvényed és persze nem olyan sok munkalap van akkor inkább manuálisan old meg. Másik módja a macro, de szerintem az nem túl egyszerűBámulatos hol tart már a tudomány!
-
m.zmrzlina
senior tag
válasz littleNorbi #23309 üzenetére
Én úgy írnám a fv-t, hogy pl: =FKERES(D2;A:B;2;0) ahelyett, hogy =FKERES(D2;A1:B400;2;0).
Persze csak ha nem zavar be 400. sor után lévő tartomány, (ha van ott egyáltalán valami)
[ Szerkesztve ]
-
m.zmrzlina
senior tag
válasz littleNorbi #23829 üzenetére
Az nem megoldás hogy levágod a cella utolsó karakterét?
Arra gondolok, hogy van-e a házszámban random előforduló "/" vagy <szóköz> ami bezavarhat egy sima
=BAL(A1;(HOSSZ(A1)-1)) fvnek
-
Delila_1
Topikgazda
válasz littleNorbi #23831 üzenetére
Egy saját függvénnyel megoldható.
Function CsakSzam(cella As Range)
Dim betu As Integer, szam As Integer
If IsNumeric(cella) Then
CsakSzam = cella
Exit Function
End If
For betu = 1 To Len(cella)
If IsNumeric(Mid(cella, betu, 1)) Then
szam = szam & Mid(cella, betu, 1)
Else
CsakSzam = szam * 1
End If
Next
End FunctionAlkalmazása: =csakszam(A1), az A1 cellában lévő házszám kinyeréséhez.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Mittu88
senior tag
válasz littleNorbi #23833 üzenetére
Module-ba tetted a programkódot?
-
littleNorbi
aktív tag
válasz littleNorbi #23835 üzenetére
Bár ez sem teljesen jól működik, mert ha például lakásról van szó, aminke a házszáma 4/6, akkor 46-ot ír ki...
-
Mittu88
senior tag
válasz littleNorbi #23836 üzenetére
Erre szokta az IT-s kollégám mondani, hogy rendszertelenségre nem lehet rendszert fejleszteni. Amivel részben egyet is értek. Szerintem lehet, csak feleslegesen erőforrás-igényes. Ebbe is bele lehet egyesével programozni, hogy milyen karaktert minek kell követnie, hogy egy adott módon értelmezze a program, de egyszerűbb lett volna úgy bekérni az adatokat, hogy Irányítószám; Település; Utca/Tér stb. megnevezése; Utca/tér stb. fajtája; Házszám; Emelet; Ajtó.
Bocsi, tudom nem segítek ezzel a kommenttel, de szerintem a többiek se fognak minden egyes ilyen egyedi esetre leprogramozni neked egy megoldást. -
Mittu88
senior tag
válasz littleNorbi #23838 üzenetére
Ez sajnos hatalmas szívás :/
Hány tétel van nagyjából, amit javítani kell? Nem tudsz gyorsan végigfutni rajta szemmel? -
m.zmrzlina
senior tag
válasz littleNorbi #23851 üzenetére
A videón szereplő példában egy egyszerű, azonos szerkezetű cellaértéken (szöveg>kettőspont, szóköz> szöveg) egyszerűen meg lehet csinálni a szétosztást. Ilyen cellákon még a korábbi hsz-ban leírt fv is működne.
A te legfőbb problémád, hogy ugyanaz a karakter ("/") az egyik esetben használható mint a levágandó rész jelölője (23/A) a másik esetben nem (A épület 3/6).
Próbáld meg kigyűjteni, hogy milyen tipusú értékeid vannak és mit szeretnél belőle látni, hátha valakinek eszébe jut valami.
A további beviteleket pedig (ha lesznek) validált listákkal kell megpróbálni kezelhető formában tartani.
-
m.zmrzlina
senior tag
válasz littleNorbi #23853 üzenetére
Tudom, hogy ez nagyon sikamlós dolog (adatvédelmileg) de akkor is kéne valami fogalmunk legyen róla hogy milyen szerkezetű adattal van dolgunk.
Azt meg tudod oldani, hogy a települést (ha kell az utcát is) leválasztod és megmutatod?
-
Mittu88
senior tag
válasz littleNorbi #23863 üzenetére
részvétem :/
-
Delila_1
Topikgazda
válasz littleNorbi #23863 üzenetére
Kiegészítve a tegnapi makró:
Function CsakSzam(cella As Range)
Dim betu As Integer, szam As Integer
If IsNumeric(cella) Then
CsakSzam = cella
Exit Function
End If
For betu = 1 To Len(cella)
If IsNumeric(Mid(cella, betu, 1)) Then
szam = szam & Mid(cella, betu, 1)
ElseIf Mid(cella, betu, 1) = "/" And IsNumeric(Mid(cella, betu + 1, 1)) Then
CsakSzam = cella
Exit Function
Else
CsakSzam = szam
End If
Next
End FunctionProgramozó: 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 littleNorbi #23863 üzenetére
Itt a végleges-nek látszó füzet.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
littleNorbi
aktív tag
válasz littleNorbi #23897 üzenetére
MEGOLDVA!
Fogtam az egész házszám oszlopot, Replace segítségével a szóközt és a "-"-t megváltoztattam "/"-re.
Az eredeti oszlopomat átmásoltam egy másik oszlopba. Majd Text to Columns-szel, szétdaraboltam a cellám a "/" jelig. A számokat rendeztem növekvő sorrendben. majd használtam az ISEVEN függvényt, akkor az szerint rendeztem, majd utcák szerint, és végül visszamásoltam az eredeti oszlopomat a szétdarabolt (amiben csak számok maradtak) oszlop helyére.Köszönöm szépen a segítséget!!!
-
Fferi50
őstag
válasz littleNorbi #23897 üzenetére
Szia!
Annyit azért elárulhattál volna, hogy angol nyelvű excelt használsz.....
(Mint az a következő hozzászólásodból ki is derül.)Üdv.
-
Fferi50
őstag
válasz littleNorbi #23900 üzenetére
Szia!
Makrókban erősen ajánlott az angol függvényneveket használni (de nem kizárt, mert a formulalocal paraméter a helyi nevekkel működik, csak nem hordozható).
A tisztánlátás kedvéért, ha jól lefordítod angolra, akkor nem lehet NAME hiba! De ha tudjuk, hogy angol az exceled, akkor az angol függvénynevet kapod a munkalapra beírandó képletekhez is, nem kell fordítani.
Üdv.
-
Zola007
veterán
válasz littleNorbi #23900 üzenetére
Mʏ ᴘʜɪʟᴏsᴏᴘʜʏ ɪs: Iᴛ’s ɴᴏɴᴇ ᴏғ ᴍʏ ʙᴜsɪɴᴇss ᴡʜᴀᴛ ᴘᴇᴏᴘʟᴇ sᴀʏ ᴏғ ᴍᴇ ᴀɴᴅ ᴛʜɪɴᴋ ᴏғ ᴍᴇ. I ᴀᴍ ᴡʜᴀᴛ I ᴀᴍ ᴀɴᴅ I ᴅᴏ ᴡʜᴀᴛ I ᴅᴏ. I ᴇxᴘᴇᴄᴛ ɴᴏᴛʜɪɴɢ ᴀɴᴅ ᴀᴄᴄᴇᴘᴛ ᴇᴠᴇʀʏᴛʜɪɴɢ. Aɴᴅ ɪᴛ ᴍᴀᴋᴇs ʟɪғᴇ sᴏ ᴍᴜᴄʜ ᴇᴀsɪᴇʀ. - Sɪʀ Aɴᴛʜᴏɴʏ Hᴏᴘᴋɪɴs
-
Delila_1
Topikgazda
válasz littleNorbi #26897 üzenetére
Autoszűrőt teszel a felső sorba. Szűröd a B oszlopot orvosra, kijelölöd a látható tartományt, másolod, beilleszted a következő lapra.
Új szűrés, új másolás új lapra.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 littleNorbi #26899 üzenetére
Most már tud.
Az eddig felvitt adatokat másold a szűrővel, az új adatok automatikusan másolódnak majd a megfelelő lapra, mikor az utolsó (C) oszlopba beírod az adatot.
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 littleNorbi #26943 üzenetére
Ugorj neki újra, és példaként olyan fájlt tegyél fel, mint a valóságos fájlod, de a nem publikus adatok helyére írj mást. Nem minden sort kell átmásolni 1-1 lapra? Mik a lapok nevei?
A "pl. az E27-ben van az adat" jellegű megfogalmazásokról rendszerint kiderül, hogy egy másik lap D89 cellájáról van szó. Példaként NE írj ilyen meghatározást, csakis a valóságot, másképp mint most, neked és a válaszadónak is az elejétől kell kezdeni mindent.
Nagyon fontos, hogy mintában az adatok úgy helyezkedjenek el, mint az igazi fájlban. Ezt egyébként olvashatod is a topik összefoglalójában.
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 littleNorbi #39490 üzenetére
Minek duplikálnád az adatokat? Egyszerűen teszel egy autoszűrőt a címsorba, majd arra a helységre szűrsz, amelyikre akarsz. Felesleges a sok plusz lap.
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 littleNorbi #39494 üzenetére
Másold a lap moduljába a makrót.
Private Sub Worksheet_Change(ByVal Target As Range)
Dim lapnev, ide As Long
If Target.Column = 4 And Target.Value <> "" And Target.Count = 1 Then
On Error Resume Next
Set lapnev = Sheets(Target.Value)
If Err.Number <> 0 Then
MsgBox "Nincs " & Target & " nevű lap", vbCritical
On Error GoTo 0
Exit Sub
End If
ide = Sheets(lapnev).Range("A" & Rows.Count).End(xlUp).Row + 1
Range("A" & Target.Row & ":D" & Target.Row).Copy Sheets(lapnev).Cells(ide, 1)
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.
-
ny.janos
tag
válasz littleNorbi #39494 üzenetére
Néha azért a kérést megfogalmazónak nem árt óvatosan elmondani, hogy amit kér, arra létezik egy másik lehetséges megoldás is, ami neki jobb, mint amit ő megfogalmazott.
Nehezen tudom elképzelni, hogy bárki is kérte így, kényelmes lesz neki, ha a táblázatban 40 település lesz, s ezáltal 40 plusz fül. Szerintem nem használná mind. Én is azt mondom, hogy autoszűrő, annyival kiegészítve, hogy a leggyakrabban használt szűrési feltételekre egyéni nézeteket hoznék létre. Így talán létrejöhet a kecske és káposzta is esete.
-
Delila_1
Topikgazda
válasz littleNorbi #39496 üzenetére
A laphoz rendelted a makró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.
-
littleNorbi
aktív tag
válasz littleNorbi #46273 üzenetére
-
Delila_1
Topikgazda
válasz littleNorbi #51182 üzenetére
A két, *-gal jelölt sornál az 1-et írd át. A makró itt az első, A oszlopban keresi a megadott keresendő szót, ami fölé oldaltörést kell bevinni. Az 1 helyett azt az oszlopszámot add meg, ahol a keresendő szó szerepel.
Az utolsó sor kikeresésénél most az A oszlop utolsó kitöltött cellájának a sorszáma szerepel.Sub Oldaltores()
Dim sor As Long, usor As Long, szoveg As String
usor = Cells(Rows.Count, 1).End(xlUp).Row
szoveg = Application.InputBox("Melyik sorok fölött legyen oldaltörés?", Type:=2)
For sor = usor To 1 Step -1
If Cells(sor, 1) = szoveg Then '*
Cells(sor, 1).Select '*
ActiveWindow.SelectedSheets.HPageBreaks.Add Before:=ActiveCell
End If
Next
End Sub
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 littleNorbi #51184 üzenetére
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
Új hozzászólás Aktív témák
- Megmaradt - Eredeti Humble, Choice - Steam kulcsok
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- Vírusirtó, Antivirus VPN kulcsok
- Game Pass Ultimate előfizetések 1 - 25 hónapig azonnali kézbesítéssel a LEGOLCSÓBBAN!
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! LEGOLCSÓBB! Automatikus 0-24
Állásajánlatok
Cég: Ozeki Kft.
Város: Debrecen
Cég: Alpha Laptopszerviz Kft.
Város: Pécs