-
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
-
-
wjani
tag
válasz
Amilo78
#17977
üzenetére
Szia!
Én az FKERES függvényt használnám. A lényege, hogy a 10000 sorosban elhelyezel egy FKERES függvényt, amiben megadod az első helyen, hogy mit keresel. Itt a cikkszám lesz, a második a tartomány, ahol keresni kell a cikket. Itt figyelj arra, hogy benn elegyen az az oszlop is, amit majd el akarsz helyezni a 10000-esben. A következő beviteli mező, itt az 5000-esből a cikkszámtól számított x-ik mező számát kell megadni, ahol az érték van. Az utolsóba én nullát "0" szoktam írni, akkor a nem talált mezőkbe beírja, hogy hiámyzik.
Üdv.
Wjani -
wjani
tag
Sziasztok!
Most egy olyan kérdéssel fordulnék hozzátok, hogy a prn kiterjesztésre történő mentésnél az üzenetet miként tudnám kikapcsolni?
A felhasználó által elkészített táblázatot szóközzel tagolt formátumba kell lementeni, de 2-szer is rákérdez a mentésre. Ezeket kellene valahogy letiltani. Mentés az szükséges, csak az üzenet nem kellene.Üdv.
Wjani
-
#17674
wjani
tag
m.zmrzlina
#17655
wjani
tag
válasz
m.zmrzlina
#17655
üzenetére
Szia!
Létezik egy olyan makró utasítás ami az ActiveWorkbook.Path nevet viseli.
Ezzel a saját mappájában tudsz hivatkozni, vagy ehhez a mappához tudod viszonyítani.Üdv.
Wjani
-
wjani
tag
válasz
alfa20
#17656
üzenetére
Szia!
Én is így kezdtem. Aztán következett a sok-sok súgó, meg a sok-sok apró kis program összerakása.
Tudod ezután jön meg az ember étvágya. Ha már ezt és ezt megtudtam csinálni, akkor jó enne még ez is, így szép lassan az agy rááll az excel makró készítésére.Én az excel 5 makrózással kezdtem. Az egy elég vastag fekete könyv. De mióta lézetik a barátunk. (Google), azóta nem biztos, hogy szükséges a könyv.
A másik dolog, hogy apránként kell haladni. Mindig egy kicsit tanulj meg és azt gyakorold. Aztán próbálj kitalálni valami egyszerű kis programot, amit megtudnál csinálni excelben. Stb.Üdv.
Wjani -
wjani
tag
válasz
paatrick
#17645
üzenetére
Szia!
Lehet, hogy most hülyeség, amit írok neked, de a képen is ott látható a csökkenő és növekvő szöveg.
Ha a keresett adat nagyobb, akkor csak meg kell nyomni a csökkenő módot és akkor közelebb kerül a láthatósági határhoz. A 2007 és a 2010-ben már keresési lehetőség is van.Üdv.
Wjani -
-
wjani
tag
Sziasztok!
Egy elég összetett dolgot szeretnék, de nem találtam a google-ba eddig semmit erről.
A lényeg, hogy egy inputbox-ot szeretnék, de nem beíratni szeretnék szöveget, hanem egy listából kellene választani a felhasználónak.A dolog lényege, hogy az A oldalon a felhasználó beállít jó pár dolgot, köztük olyat is, ahol akkor éppen azt választja, hogy nem igényel. Majd megy a következő B oldalra. Itt a sorokban nyomógombokkal lehet válogatni. Ha odaér ahhoz a tételsorhoz, aminél az előző oldalon azt jelezte, hogy nem igényel, akkor nem szeretném visszaugratni az előző oldalra, hanem inkább egy üzenetet küldök, hogy sajna a nem igénylést választotta, de itt lehetősége lenne ezt módosítani.
Na itt lenne egy olyan felugró üzenetablak, amiben listából választhatna ki pár dolgot.Ebben szeretném a segítségeteket kérni.
Problémás lenne, ha számokat kérek be tőle, de ha nincs más, akkor ezzel kell és az INPUTBOX-val.Üdv.
SOS
Wjani
-
wjani
tag
Szia!
Első kérdés.
Makró engedélyezve van?
Második kérdés.
A makróban direkt hivatkozást adtál a másik fájl megnyitásához?
Én nemrég dolgoztam egy olyan excel-en, ahol a táblázat adataiból 255 karakternél hosszabb sorú txt állományt kellett előállítani. Kutakodtam a neten és találtam egy olyan lehetőséget, ahol lekérdezheted, hogy hol helyezkedik el az excel fájlod és utána pedig ez alapján már ha azonos mappában vannak a fájlok, akkor már csak meg kell hívni a másik excelt.Üdv.
Wjani
-
wjani
tag
Sziasztok!
Cuci3 megoldása is jó dolog, de itt a függvényt folyamatosan kell másolni a cellákba, addig, amíg a függőleges oszlopba el nem fogy a sor.
Én a makróval azért adtam ciklust, hogy ne kelljen meghatározni az egy oszlopos adatok utolsó sorát.
De látom mennyire gyorsan léptünk, hogy segítséget nyújtsunk Core1113-nak.
Üdv
Wjani -
wjani
tag
válasz
core1113
#5034
üzenetére
Erre azt tudom ajánlani, hogy a makróban kell megadni, hogy melyik sor melyik munkalap fülre ugorjon.
Az egyben lévő adatoknál azért kell lennie olyan oszlopnak, ahol ezt össze lehet vetni (megyék neve), vagy pedig egy külön munkalapon az irányítószámok és mellette, a megye neve.
Így átemelhető.Üdv
Wjani -
wjani
tag
válasz
core1113
#5035
üzenetére
Szia itt a kód:
Sub átemelés()
'
' átemelés Makró
'
'=========================================================================================
'Ez a makró egy adott oldal első oszlopának adatait emeli át egy mások munkalapra úgy, hogy
'az első oszlop eslő értéke az első oszlopba, az első oszlop második sorának értéke a
'a második oszlopba, az első oszlop harmadik értéke a harmadik oszlopba kerül.
'
'A zárójelben Munka1 és Munka2 értékeket cseréld le a te munkalapjaid nevére, de pontosan
'Készítette: Weisz János, wjani@freemail.hu
'=========================================================================================
'Első és második munkafüzet változóinak felvétele,
Dim i, j As Variant
'A sor változók megadása
Dim s, o, m, n As Integer
'A sor kezdő értékeinek megadása
s = 1
o = 1
m = 1
n = 1
' Egy ciklus ami addig megy, amíg az első munkalapon az első üres sort nem talál
Do
' Az első érték felvétele a változóba
i = Worksheets("Munka1").Cells(s, o).Value
' Ez a ciklus második oldalon fogja az adatokat átadni
Do
'Az első érték felvétele a változóba
j = Worksheets("Munka2").Cells(m, n).Value
'Ha az első cella értéke üres, tegye bele az értékeket a megadott cellákba
If j = Empty Then
'első cella értéke legyen egyenlő az első cella értékével
Worksheets("Munka2").Cells(m, n).Value = Worksheets("Munka1").Cells(s, o).Value
'második cella értéke legyen egyenlő a második sor első cellájának értékével
Worksheets("Munka2").Cells(m, n + 1).Value = Worksheets("Munka1").Cells(s + 1, o).Value
'harmadik cella értéke legyen egyenlő a harmadik sor első cewllájának értékével.
Worksheets("Munka2").Cells(m, n + 2).Value = Worksheets("Munka1").Cells(s + 2, o).Value
'lépjen ki a ciklusból
Exit Do
'Ha a cella értéke nem üres
Else
'A második lap első oszlopában ugorjon a következő sorba
m = m + 1
'Feltétel vége
End If
' Addig fusson a ciklus, amíg a második lap első oszlopának a sorában üres nem lesz a cella
Loop Until j = Empty
'Első munkalap első oszlopában ugorjon 3 cellával lejebb
s = s + 3
Loop Until i = Empty
'Üzenet ha a feladatot végrehajtotta
MsgBox "Az adatok átemelése megtörtént", vbInformation, "Üzenet a feladat végrehajtásáról!"
End SubEz tedd bele abba a makróba, amit létrehozól.
A makró elején leírtam, hogy mit csinál, minden részre odaírtam a magyarázót.
Ha valamit nem megy, vagy nem érted jelezz.
ÜdvWjani
-
wjani
tag
válasz
core1113
#5029
üzenetére
Szia!
Ezeket, gondolom egy gombnyomásra akarod indítani, ugye?
Az elsőnél, még megoldható valami hivatkozás képletekkel, de a törlés, szerintem már nem megy, így lehetséges, hogy inkább az egészet egy makróval kell megcsinálni.
A másodiknál az a kérdés, hogy neked annyi munkalap fül lesz, amennyi irányítószám van, vagy csoportosítod. Ezt pedig csak makróval lehetne megoldani.Üdv
Wjani -
#5007
wjani
tag
toth_janika
#5006
wjani
tag
válasz
toth_janika
#5006
üzenetére
Szia!
Szerintem a SZUMHA függvényt használd.
A mezőbe csak azokat adja össze, ahol a feltételnek megfelel. A feltétel pedig ebben az esetben a "Mérnökök" szó.
Üdv
Wjani -
wjani
tag
válasz
Musicbox
#4951
üzenetére
Szia Musicbox!
Az alábbi képen megpróbáltam szemléltetni a szorzást.
A kép felső részében látod magát a képletet, ezt kell csak egymás után végrehajtani.
Ahogy már korábban írták, kijelölöd az első cellát és a jobb sarkába viszed az egeret, majd amikor egy fekete kereszt lesz belőle, akkor az egér bal gombját lenyomva tartva lefelé lehúzod addig a sorig, ameddig a számítás kell.
Ezután az oszlopot kijelölőd, jobb egér klikk és másolás, majd ráállsz a "C" oszlopra és a jobb egér klikkre megjelenik az irányított beillesztés. Itt kiválasztod a másodikat, ha jól emlékszem, ez az "Érték".
Majd visszamész a "D" oszlopra és ha kijelölted lenyomod a DEL-t és kitörlődik.Ennyi
Ha gond van nyugodtan jelezz.
Üdv
Wjani. -
Új hozzászólás Aktív témák
- Opel topik
- Mibe tegyem a megtakarításaimat?
- „Új mérce az Android világában” – Kezünkben a Vivo X300 és X300 Pro
- Villanyszerelés
- Fallout 4
- Brogyi: CTEK akkumulátor töltő és másolatai
- iPhone topik
- LG LCD és LED TV-k
- Kerékpárosok, bringások ide!
- Soundbar, soundplate, hangprojektor
- További aktív témák...
- Apple iPhone 14 Pro Max / Kártyafüggetlen / 256GB / 12Hó Garancia / 87% akku
- Bomba ár! Lenovo ThinkPad T495 - Ryzen 5 PRO I 16GB I 256GB SSD I 14" FHD Touch I Cam I W11 I Gari!
- BESZÁMÍTÁS! LG 24GM79G-B 24 144Hz FHD TN 1ms monitor garanciával hibátlan működéssel
- iKing.Hu - Google Pixel 10 Tensor G5, 120 Hz OLED, tripla kamera-128 GB Használt, karcmentes Gari
- Apple iPhone 13 Pro ( picit Karcos Kijelző) / 256GB / Kártyafüggetlen / 12Hó garancia / 86% Akku
Állásajánlatok
Cég: NetGo.hu Kft.
Város: Gödöllő
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest