[Összes szavazat: 1 Átlag értékelés: 5]
Kísérletezzen a kóddal, zárja be a Visual Basic Editor programot, majd indítsa el újra a makrót. Figyelje meg, hogy ezúttal más lesz-e az eredmény. Következő lépések A makrók létrehozásával kapcsolatos további tudnivalók a Makró létrehozása vagy törlése című témakörben olvashatók. A makrók futtatásával kapcsolatos tudnivalókat a Makró futtatása című témakör tartalmazza. Ügyeljen arra, hogy a menüszalagon látható legyen a Fejlesztőeszközök fül. Excel makró ha függvény 3. A Fejlesztőeszközök fül alapértelmezés szerint nem látható, ezért hajtsa végre az alábbi műveleteket: Ugrás a Excel >... > menüszalag & eszköztár. A Menüszalag testreszabása kategória Fő lapok listájában jelölje be a Fejlesztőeszközök jelölőnégyzetet, és kattintson a Mentés gombra. A Fejlesztőeszközök lapon kattintson a Makró rögzítése elemre. Kattintson a Fejlesztőeszközök lap Kód csoportjában a Rögzítés vége gombra. A makró szerkesztéséhez a Fejlesztőeszközök lapon kattintson a Makrók gombra, jelölje ki a makró nevét, majd kattintson a Szerkesztés gombra.
Feladat: 1. Készítsünk egy gombot, amely megnyomására a következő fog történni: 2. Ha egy különálló cellába – pl. A gomb előttibe – beírjuk a táblázat egyik sorának számát, akkor egy MsgBox kiírja nekünk az adott sor adatait. 3. Ráadásul, ha ügyfél az illető és az irányító száma kisebb mint 5000, akkor az E oszlop megfelelő sorába kiírjuk, hogy "Ingyenes kiszállítás" 1. Segítség, valahogy így nézzen ki: 2. Itt találod a teljes kódot, megjegyzésekkel ellátva: 'Definiáljuk a sor változót Dim sor As Integer 'Megadjuk a sor változó értékét, ami a G2 cella értéke 'Beleteszünk egy IF elágazást is a biztonság kedvéért, ha üres a cella, akkor figyelmeztessen. If Range("G2") = "" Then MsgBox "Nem adtad meg a sort! " 'Ha a G2 cella nem maradt üresen, akkor a beleírt érték lesz a változónk értéke sor = Range("G2") 'Az első sor oszlop címkéket tartalmaz, így azt szűrjük ki. If sor <= 1 Then MsgBox "1-nél nagyobb számot írj be! Excel CELLA függvény magyarázattal - Exceltanfolyam.info. " 'Ide fog jönni az, amit ténylegesen el akarunk végeztetni: '1. E oszlopba vigyük fel, ha ingyenes kiszállításra jogosult If Cells(sor, 4) = "Igen" And Cells(sor, 2) < 5000 Then Cells(sor, 5) = "Ingyenes kiszállítás" '2 Kiírjuk az aktuális sor adatait MsgBox Cells(sor, 1) & " " & Cells(sor, 2) & " " & Cells(sor, 3) & " " & Cells(sor, 4) & " " & Cells(sor, 5) Összefoglalás – Megismertük az If elágazást – Megismertük a hozzátartozó logikai operátorokat – Tudunk feltételeket szabni VBA-ban Mennyire találtad hasznosnak ezt cikket?
MEGOLDÁS EGYÉNI FÜGGVÉNY HASZNÁLATÁVAL A fenti megoldás tökéletes a feladathoz. Azonban több szemeszteren keresztül, szemeszterenként több kurzus esetén újra és újra megírni vagy a korábban használtat előkeresni körülményes. Ezért hatékonyabb lehet ugyanezt a logikát átültetni egy makróba, ez esetben egy Functionbe. Először a Function és End Function kulcsszavak segítségével létrehozzuk a kód kereteit. Adunk neki egy nevet is, pl. giveMarks. Excel makró ha függvény 2. Írunk komment formájában egy rövid magyarázatot is, hogy később könnyebben tudjuk értelmezni saját kódunkat. Function giveMarks() 'A makró célja, hogy létrehozzon egy olyan függvényt, amely segítségével az összpontszám' 'kijelölésével, valamint a maximális pontszám megadásával meghatározható az érdemjegy. ' End Function Következő lépésben megadjuk a függvény bemeneti paramétereit. Az egyik egy tartomány ( Range) típusú objektum lesz, amire az rng karaktersorozattal hivatkozunk majd a makró belső logikájának felépítésekor. A másik egy szám típusú objektum ( maxPoints), amely a kurzuson szerezhető maximális pontszámot jelenti majd.
Tejszínes-gombás csirkemell, szarvacska tésztával | Feri Lakatos receptje | Recipe | Cooking, Recipes, Food
Leírás A csirkemellfiléket 2 szeletre vágjuk. Sózzuk, borsozzuk és kevés olajon, mindkét felét megsütjük. A szeletekre vágott gombát olajon megfuttatjuk és megszórjuk liszttel. Felengedjük kevés vízzel. Ízesítjük és tejszínnel dúsítjuk. A mártásba beleforralhatjuk a húsokat, finomabb ízük lesz. Köretnek rizs, vagy tészta illik mellé.
Csodás íze van és pikk-pakk összedobható! Ha gyors finomságra vágysz, ez tetszeni fog! Hozzávalók: 1 nagy csirkemell 20 dkg gomba (konzerv) 5 gerezd fokhagyma 2 dl főzőtejszín 1 evőkanál tejföl 1 evőkanál liszt friss petrezselyemzöld só, bors olaj Elkészítése: A húst vékony szeletekre vágjuk és átkenjük a fűszerekkel. Kevés olajban mind a két oldalát 2-3 percig sütjük, majd hozzáadjuk a felaprított gombát és a zúzott fokhagymát. Tejszínes-gombás csirkemell recept Bagyinszkiné Évi konyhájából - Receptneked.hu. Öntünk alá egy kevés vizet és fedő alatt pár percig pároljuk. A tejszínhez keverjük a lisztet és a tejfölt, ráöntjük. Elkavarjuk, a hússzeleteket megforgatjuk és felforraljuk. Rászórjuk a felaprított petrezselyemzöldet és már le is vehetjük a tűzhelyről. Melegen tálaljuk.