-
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
-
robull5
csendes tag
Sziasztok, bocsánat hogy zavarok de ha valaki tudna egy gyors segítséget azt megköszönném, ha találkozunk kap egy tábla csokit.
Nos kérdésem a Munka1-ben vannak adataim A1-E120
"A" oszlop Név, "B" lakcím, C" utca, "D" szám "E" ajtó. mondjuk de ugyanezen ember többször is szerepel a listában (csak szemléltetés nem emberek vannak a listában) pontosan 6-szor ismétlődik.Én a Munka2-ben az A oszlopban mondjuk az A2 szimpatikus itt szeretnék egy legördülő listát és a 120 emberből kiválasztom Kisi Pistit akkor egyrészt kiírja az A oszlopba 6-szor Kis Pistit és mellé automatikusan B, C, D, E oszlopba hozza a mellette lévő adatokat. Tehát én az összes Kis Pisti adatait ki akarom iratni, nem csak egyét (és munka1-et "A" oszlopát nem akarom ABC-be rendezni mert vannak közte bizonyos sorok amik kellenek másra). Választó listát tudok csinálni, csak nem tudom hozzátársítani a B,C,D,E adatokat.Valaki tud ebben segíteni? Üdvözlettel Robi
-
Fferi50
őstag
válasz robull5 #31501 üzenetére
Szia!
A 2. és további oszlopok értékeit az FKERES függvény használatával rendelheted hozzá a találathoz:
A B2 cella képlete =FKERES($A2;Munka1!$A$1:$E$120;2;0)
A C2 cella képlete =FKERES($A2;Munka1!$A$1:$E$120;3;0)
és így tovább.Ha viszont van fejléc mindkét munkalapon, akkor egyszerűsödik a képlet a HOL.VAN függvény használatával:
A B2 cella képlete:
=FKERES($A2;Munka1!$A$1:$E$120;HOL.VAN(B$1;Munka1!$A$1:$E$1;0);0)
Ez végighúzható a többi oszlopon és a sorokon egyaránt.Ha viszont többször is előfordul a keresési érték és a mellette levő értékek esetenként mások, akkor bonyolultabb lesz a keresés, mert mindig az előző találat utáni tartományban kell a következő keresést indítani az FKERES 2. paraméterében. Ehhez a Darabteli függvénnyel meg kell számolni, hány találat volt már. Ma este már nem mennék bele ennek a képletnek a meghatározásba, de volt már ilyen mintám, majd körülnézek a gépen.
Üdv.
-
fila
senior tag
munkalapot szeretnék elrejteni,
ez nem nehéz,de meg lehet azt csinálni, hogy csak jelszóval lehessen felfedni?
Előre is köszi a segítséget.
5% kedvezmény kód minden rendelésre. iherb.com: ZCD546
-
Fferi50
őstag
Szia!
A VBA nézetben (amelyre Alt+F11 visz át) a Properties ablakban (ha nem látod, akkor F4 előhozza) a munkalap Visible tulajdonságát xlVeryHidden -re kell állítani - ebben az esetben a felhasználó nem is látja a munkalap listákban sehol. Így felfedni is csak akkor tudja, ha tudja, hogy létezik ilyen munkalap.
Jelszavas felfedést csak makróval lehet megoldani: Írsz egy makrót, amiben bekéred a jelszót, ha egyezik, akkor felfeded a munkalapot. Jelszóbekérés az Inputbox tulajdonsággal lehetséges. Ezt a makrót egy vezérlőhöz, vagy billentyű kombinációhoz rendeled.
Viszont ha csak magadnak szeretnéd ezt a munkalapot használatra, akkor az első verzió szerintem megfelel. Más kérdés, hogy gyakorlott exceles ettől azt még gyorsan felfedi (a jelszós megoldásnál is!).
Persze nehezíthető a dolog munkafüzet védelemmel...Üdv.
-
bsasa1
csendes tag
Sziasztok!
Ha jól tudom az excel cellák úgy is hivatkozhatóak, hogy a "sorszámukat" adom meg. Erre gondolok: A1=1, B1=2, C1=3...
Nem tudja véletlenül valaki, hogy vba-ban hogyan tudom ezt az értéket lekérdezni, anélkül hogy számolni kelljen?Köszi,
bsasa -
Fferi50
őstag
válasz bsasa1 #31506 üzenetére
Szia!
Ilyen lehetőség a VBA-ban szerintem nincs. (De igazából nem is látom a szükségességét, hiszen a "hagyományos" címzéssel is megtalálható a cella).
Ugyanakkor működik a Tartomány, vagy akár munkafüzet cells(x) = akármi értékadás, de a cells(x).address és minden tartományhoz kapcsolódó tulajdonság és metódus.Üdv.
-
robull5
csendes tag
válasz Fferi50 #31502 üzenetére
Szia Feri, gyönyörű a képlet ami írtál megfelelően működik, egy szépséghibája van (ahogy írtam) ha kiválasztom a Ferit akkor valamiért csak 1 Ferit mutat, és nem hozza az összes 6-ot a mellette lévő adatokkal együtt (vagy ha 8 Anita van akkor mind a 8-at hozza elő egy kattintásra). 1-re tökéletesen működik.
Lehetséges ezen segíteni? Üdv Robi[ Szerkesztve ]
-
Fferi50
őstag
válasz robull5 #31508 üzenetére
Szia!
Ahogyan írtam, természetesen van arra - egy jóval bonyolultabb - képlet, hogy minden tételt kihozzon, csak meg kell keresnem a fájlt. Annyit még árulj el lsz. hogy az egymás alatt levő sorokban hogyan szeretnéd látni, az A oszlop marad üres, de B-F oszlopban annyi sor van kitöltve, ahány tétel van, vagy az A oszlop is legyen kitöltve?
Lehet kicsit hosszabb lesz a dolog, ezért légy türelmes.Üdv.
-
Fferi50
őstag
válasz robull5 #31508 üzenetére
Szia!
Ide feltöltöttem azt a mintát, ami megteszi, amit szeretnél.
A képleteket megtalálod külön is kimásolva.Üdv.
-
robull5
csendes tag
válasz Fferi50 #31511 üzenetére
Ferenc, köszönöm szépen amit küldtél, belelátsz a gondolataimba Én nem vagyok ekkora nagy excel guru, de lenyűgözött ez a 1,5 soros képernyő hosszúságú képlet amely teszi a dolgát mint a gép. Teljesen "kielégítettél" vele.Hogyan juttathatom el a tábla csokit? Köszönettel Robi
-
spe88
senior tag
Hello,
Olyat tudok csinalni, hogy egy adott oszlop ures cellaiba irjon 1-et egy fuggveny, de ugy, hogy ne kelljen semmi segedoszlopot letrehoznom?
Koszi
Spóroljunk! Kerül, amibe kerül!
-
Delila_1
Topikgazda
Nem kell függvény.
Kijelölöd a tartományt, amiben az üres cellák vannak. Ctrl+g-re bejön az Ugrás menü. Ott Irányított gomb, majd Üres cellák. Kijelöli az üres cellákat, amik közül az első lesz aktív. Nem szünteted meg a kijelölést, hanem beírsz egy 1-est, és Ctrl+Enterrel beviszed, egyszerre az összes kijelölt helyre.
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
Igen. Match függvénnyel megkeresed az oszlopot, és annak az utolsó kitöltött celláját. Kijelölöd a tartományt, és a
Selection.SpecialCells(xlCellTypeBlanks) = 1
sor már be is írja.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
bsasa1
csendes tag
-
spe88
senior tag
válasz Delila_1 #31517 üzenetére
Azt hiszem, már is előjött egy lehetséges programhiba!
Szóval, az adott oszlopban, ha az utolsó sorba (sorokba) is kellene írnia makrónak egyest, akkor azt nem találja meg, hiszen nincs kitöltve, a tartományban nincs benne. Valahogy úgy kellene csekkoltatni, hogy mekkora tartományban keresse meg az üres cellákat, hogy a fejlécben egy másik nevű oszlopra keres és abban keresné meg az első üres cellát és akkor az már biztos, hogy jó lesz, mert abban oszlopban mindenhol van érték az első üres celláig.
Ezt, hogy oldanád meg? Csak most tanulgatom ezt az egészet, de nem egyszerű.
Spóroljunk! Kerül, amibe kerül!
-
Delila_1
Topikgazda
Range("D2:D" & Range("E" & Rows.Count).End(xlUp).Row).Select
Selection.SpecialCells(xlCellTypeBlanks) = 1Itt a D oszlop üres celláit tölti ki az E oszlop alsó kitöltött sora szerint.
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
Másképp:
Sub Egyes()
Dim oszlop, usor As Long
oszlop = Application.Match("Cím1", Rows(1), 0)
usor = Range("E" & Rows.Count).End(xlUp).Row
Range(Cells(2, oszlop), Cells(usor, oszlop)).Select
Selection.SpecialCells(xlCellTypeBlanks) = 1
End SubA Cím1 szöveget keressük az első sorban.
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 Delila_1 #31521 üzenetére
A Select-et kiküszöbölve:
Sub Egyes()
Dim oszlop, usor As Long
oszlop = Application.Match("Cím1", Rows(1), 0)
usor = Range("E" & Rows.Count).End(xlUp).Row
Range(Cells(2, oszlop), Cells(usor, oszlop)).SpecialCells(xlCellTypeBlanks) = 1
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.
-
Declare
őstag
Sziasztok!
Segitettek mar többször, ujra lenne egy macros kerdesem
Van egy ilyen macrom, ami szepen teszi a dolgat, ahogy kell:
Sub myDeleteRows()
Dim MyCol As String
Dim i As Integer
For i = 1 To Range("A" & "1353").End(xlUp).Row Step 1
If Application.WorksheetFunction.CountIf(Range("H" & i & ":H" & i), "Charge") > 0 Then
Range("A" & i).EntireRow.Delete
End If
Next i
End SubEzt szeretnem ugy atalakitani (csak nem sikerül, pedig szerintem nem lehet nehez ), hogy keresse a "Charge" ertekeket a H oszlopban es ha talal egyet az "i-edik" sorban, akkor masolja az "E13" - "AB14" tartomanyt az "E(i)" - "AB(i)" tartomany helyere
Elöre is köszi
-
Declare
őstag
válasz Declare #31523 üzenetére
Megvan nem er nevetni
Sub copy()
Dim MyCol As String
Dim i As Integer
For i = 1 To Range("A" & "1353").End(xlUp).Row Step 1
If Application.WorksheetFunction.CountIf(Range("H" & i & ":H" & i), "1") > 0 Then
Range("E13:AB14").copy Range("E" & i & ":AB" & i + 1)
End If
Next i
End Subha esetleg van egyszerübb megoldas es van valakinek ideje/kedve leirni, szivesen olvasnam el ettöl függetlenül, hogy ez most müxik
-
Spet
addikt
Sziasztok,
Egyszerű kérdéssel fordélnék hozzátok. Ezreléket (‰) szeretnék beállítani excelben, így az lenne a kérdésem, hogy a szám/egyéni mezőbe mit kell beírnom (képlettel számíttatott értékek, nem szeretném végig pötyögni)? Válaszokat előre is köszönöm.
Eladó Seiko 7016-5000 Seiko Monaco
-
Delila_1
Topikgazda
válasz Declare #31524 üzenetére
Néhány megjegyzés:
A makró címének ne adj VBA kulcsszót (copy).
Deklaráltál egy MyCol változót, amit később nem használsz fel (apró dolog, nagyobb baj lenne fordítva).
A for-next ciklusnál alapérték az 1-es lépésköz, ezért nem kell kiírni.
Ha az A oszlop utolsó értéke >=13, akkor a másolt E13:AB14 tartomány felülírja a vizsgált H oszlop értékét.
Nincs szükség a függvényre, hiszen 1 cella értékét vizsgálod, nem egy tartományét.Sub Masolas()
Dim i As Integer
For i = 1 To Range("A1353").End(xlUp).Row
If Range("H" & i) = "1" Then Range("E13:AB14").Copy Range("E" & i)
Next i
End Sub[ 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
-
Spet
addikt
-
Delila_1
Topikgazda
Szorozd a tartományt 10-zel. Beírod a 10-et egy üres cellába, Ctrl+c-vel másolod, kijelölöd a felszorzandó tartományt, jobb klikk, irányított beillesztés, szorzás.
Az újonnan bevitt celláknál már eleve a képletben legyen a szorzás.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
DS39
nagyúr
a DARABTELI függvénynek lehet több kritériumot megadni, plusz feltételt?
azt szeretném megoldani, hogy adott C oszlop benne számok, a darabtelinek megadtam hogy nézze az egész C oszlopot, és kritériumnak egy adott értéket. ez eddig rendben is van. de szeretnék egy plusz feltételt is, ha pl. a C3 cella értékét akkor számolja, ha a B3-ban egy másik adott érték szerepel. a lista nem rendezett, és később változik, hogy miből mennyi van, ezért nem tudok szűkített tartományt megadni neki, csak úgy ha rendezem B oszlop szerint, és mindig újradefiniálom a tartományt.
remélem érthetően írtam le.
azt is el tudom képzelni, hogy van erre a problémára egy másik, okosabb függvény is.
[ Szerkesztve ]
-
rebb
tag
Sziasztok!
Segítségre lenne szükségem.
Van két táblázatom (A és B)
A B-ben lévő időket kellene lecserélnem az A-ban lévőkre, de hiába idő formátum mindkettő, mégsem egyforma (a B-ben lévő a szerkesztő lécben 6:30:00-nak látszik az A-ban lévő meg csak 06:30-nak)
Ha duplán bele kattintok az A-ban lévő időre, akkor átíródik a megfelelő formátumra, de 12000 cellánál ez kicsit soknak tűnik.
Valami megoldást esetleg tudna valaki, hogy egyszerűbb legyen?Készítettem egy xls-t, ami mindkét formátumot tartalmazza, ha esetleg a fenti írásom egy kicsit kusza lenne.
https://drive.google.com/open?id=0B77CHvUPfVf0TjBhMlhJYkRlNFUKöszönöm szépen.
-
#36268800
törölt tag
[Excel 2007]
Sziasztok!
Hogyan tudok négyzetkilométert megadni egyéni formátumnál? Tehát arra vagyok kíváncsi, hogy ha beírom a szám után, hogy " km2", a 2 hogyan kerül felső indexbe anélkül, hogy ki kellene keresnem a karaktertáblából, vagy a Word-ből kellene kimásolnom? Van erre valamiféle "sup" parancs, vagy ilyesmi?
Köszönöm előre is!
-
Musuz
csendes tag
válasz föccer #31538 üzenetére
De,komolyan gondoltam a lényegét,csak nemtom,hogy megvalósítható-e.
A meglévő adatok alapján kellene a legvalószínűbb számokat megsaccolni 1 és 999 között a következőkhöz:
Front wing:
Rear wing:
Engine:
Brakes:
Gearbox:
Suspension:Ha van rá vmi megoldás,örömmel fogadnám.
Köszönöm! -
detroitrw
addikt
Szerintem ehhez sokkal több info kellene, hogy valamilyen szinten "használható" adathalmazt kapjál
ill. pályákra lebontva kellene legalább ennyi variáció mint amennyit itt felsoroltál
nagy valószínűséggel akkor is kellene pluszba egy tapasztalati tényező pályánként az adott beállításra -
Pá
addikt
Sziasztok!
Van egy templatem, amin szeretnék picit automatizálni, mert nagyon fárasztó kézzel backsolvolgatni...
Valahogy így néz ki:
A oszlopban egymás alatt vannak random számok (értékként)
B oszlopban vannak formulák egymás alatt, amik az A oszlopban lévő párjukra hivatkoznakAzt kéne csinálni, hogy én mondjuk C1-be beírom, hogy '100'. És akkor az excel az A oszlopban lévő számokat úgy állítja be, hogy mellettük a B oszlopban minden cella '100' legyen.
A sorok egymástól függetlenek. Szóval A1-B1 páros és A2-B2 egymástól független.
Target solverrel meg tudom csinálni, de egyesével kell minden alkalommal és 32 párocskával naponta többször eljátszani elég fárasztó.
''Annyira vagyunk egészségesek, amennyire a gondolataink humánusak.''
-
Pá
addikt
Jólvan, közben rájöttem, hogy solverrel meg tudom csinálni.
Ha esetleg van valakinek egyszerűbb vagy elegánsabb megoldása, azért kíváncsi vagyok.
szerk: viszont jó lenne, ha solverben be tudnám állítani, hogy csak X tizedesjeggyel dolgozzon, mert az is fontos lenne. Erre van esetleg mód? Globálisan excelben nem szeretném átállítani, csak ezen az egy dolgon kéne lekorlátozni.
[ Szerkesztve ]
''Annyira vagyunk egészségesek, amennyire a gondolataink humánusak.''
-
ktomee
csendes tag
válasz ktomee #31405 üzenetére
Van esetleg valakinek ötlete, a fenti kérdésemre.
Csatolok egy minta fájlt, hogy miről is lenne szó:A feladat az lenne, hogy a Január, Február és Március sheeteken lévő adatokat szeretném összesíteni egy PIVOT táblába, lehetőleg úgy hogy ne kelljen egy sheetre másolnom, mivel a sheetek egyesével kb 30 MB-s fájlokban vannak.
Van valakinek valamilyen ötlete erre Ecel 2016ban?
Előre is köszi minden segítséget.
-
bigsee
addikt
Sziasztok! Kaptam egy PDF fájlt, amibe bevan ágyazva két xls. Ezeket hogyan lehet ebből kiexkaválni? Légyszi segítsetek, nem lelem a megoldást! Köszi!
MDA Compact II - ... - Galaxy A54 5G
-
föccer
nagyúr
válasz bigsee #31545 üzenetére
Keress online konvertereket pdf2doc vagy pdf2xls néven. Sok reményt ne fűzz hozzá, lehet egyszerűbb és gyorsabb lesz felgépelni és megformázni. Az ingyenes verziók kb semmit sem tudnak kezdeni az táblázatokkal, pláne, ha magyar nyelven van. párszor csináltam ilyt, annyi hibát rakott bele, hogy újra kellett gépelnem. Profi, fizetős cuccot még nem hazsnáltam.
üdv, föccer
Építésztechnikus. Építőmérnök.
Új hozzászólás Aktív témák
- Eredeti Windows, telepítéssel! Digital Doctor Számítógép Szerviz
- World of Warcraft Shadowlands Collectors edition EU EN
- Steam, Windows, Origin kulcsok, előfizetések közvetlenül a kiadótól, a LEGJOBB ÁRON!
- PC JÁTÉKOK (OLCSÓ STEAM, EA , UPLAY KULCSOK ÉS SOKMINDEN MÁS IS 100% GARANCIA )
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
Állásajánlatok
Cég: Promenade Publishing House Kft.
Város: Budapest
Cég: Ozeki Kft.
Város: Debrecen