Hirdetés
- sziku69: Fűzzük össze a szavakat :)
- bambano: Bambanő háza tája
- MasterDeeJay: Harc a DDR5 árak ellen
- sziku69: Szólánc.
- Luck Dragon: Asszociációs játék. :)
- HUNNIA1920: Kínaiwebáruház, amit jobb elkerülni
- sh4d0w: Árnyékos sarok
- Sub-ZeRo: Euro Truck Simulator 2 & American Truck Simulator 1 (esetleg 2 majd, ha lesz) :)
- eBay-es kütyük kis pénzért
- urandom0: Száműztem az AI-t az életemből
Aktív témák
-
rdi
veterán
-
gorlin
őstag
HuHa!
Itt mindenki ennyire ért az excelhez??
Kezdem magam rosszul érezni,de a nagyon szépen köszönöm a tanácsokat.
Szóval még egy utolsó kérdés.
Csinálok egy függvényt ,és ahhoz rendelek egy makrót?.
Vagy magában a makróban van ilyen lehetőség(ha van hol tudom megnézni hogy például a random számhoz milyen makro tartozik.?)
Remélem nem fogalmaztam túl hülyén
Üdv. -
REAL WORLD
tag
Hello!
Ha egy kicsit tudsz programozni, akkor nem lehet baj! (Ha basicben tudsz, akkor az egyenesen ISTENI!)
Csinálsz egy makrót és a súgóban megnézed, amit nem tudsz.
Pl: a véletlen számok eloállításához ha tudod, hogy máshol randomize kell, akkor beírod a súgóba és akár a példán keresztül is, de meg lehet csinálni. Ha még angolul is tudsz, akkor a részletes leírást is megértheted... :)
Konkrétan jelen esetben:
Sub makro1()
Randomize
ActiveCell.FormulaR1C1 = Int((600 * Rnd) + 1)
End Sub
Pl egy nyomógombhoz hozzárendelve, az aktuális cellában minden gombnyomáskor 1 és 600 közötti véletlen szám jelenik meg. -
gorlin
őstag
Oké,még egy kérdés,hogy kell egy cellába beirni egy véletlen számot??
-
Gh0sT
addikt
Nya, én kb annyit értek a makró-íráshoz, mint Te. :) Azt csináltam, hogy beírtam a két értéket a két cellába. Ezután Eszközök menü, Makrók, Új makró rögzítése. Majd az A2 cellába beírtam a következőt: =összefűz(A1;A2).
Végül megnyomtam a STOP gombot a makro rögzítésnél.
Eztán beszúrtam egy command buttont, aminek a click eseményéhez hozzárendeltem az adott makrót.
Mindezt kb 1 perc alatt, úgy hogy lövésem nincs a makrókészítésről. :) -
gorlin
őstag
VÁÓ!!!
Köszönöm szépen!!
Tudom hogy furcsa kérdés,de szerinted milyen ehhez hasonló példákat kaphatok.Azt mondta lesz ActiveCell,WorkSheet(ez a munkalap ha jól tudom),ActiveWorkBook.
Tehát az elöbbi példaprogramhoz hasonló 'nehézségi szintű' feladatok mik lehetnek.?
Remélem nem kérdezek túl nagy hülyeséget ,de nekem ez a makró dolog még új.
De mégegyszer köszönöm az eddigi segítségedet. -
loszerafin
senior tag
Google: ''excel macro tutorial''
De:
[L]http://spreadsheets.about.com/od/excelmacrosandvba/[/L] -
Gh0sT
addikt
Ehh, közben megcsináltam Neked makróval:
Sub Rögzítés1()
Range(''A2'').Select
ActiveCell.FormulaR1C1 = ''=CONCATENATE(R[-1]C,R[-1]C[1])''
Range(''A2').Select
End Sub
Értelemszerűen az A1 és a B1 cellákban volt a két érték, és A2-be fűztem össze.
[Szerkesztve] -
Gh0sT
addikt
Makró nélkül nem jó az összefűz függvénnyel?
-
gorlin
őstag
Sziasztok!
Az lenne a problémám ,hogy holnap írok egy zárthelyit,és lesz benne egy rész a makróprogramozásról.
A multkori csapatnak az volt a feladata hogy volt két cella ,az eggyikbe az hogy alma a másikba az hogy torta és makróval kellett egyesíteni.Ezt szereetném megoldani,hátha rájövök hogy kell elkezdeni a makró programozást
És valamilyen oldalt ahol esetleg ilyen alapszintú példaprogramok vanna,tudnátok mondani ,?
A válaszokat előre is köszönöm
Aktív témák
- Apple asztali gépek
- Több száz játékban kezdi meg karrierjét az FSR Redstone
- Vezeték nélküli fülhallgatók
- Samsung Galaxy Watch (Tizen és Wear OS) ingyenes számlapok, kupon kódok
- NVIDIA GeForce RTX 5080 / 5090 (GB203 / 202)
- Autós topik
- Amit látnod kell 80’ – 90’ évek, egész estét betöltő mozi filmjei.
- TCL LCD és LED TV-k
- Windows 10
- Xbox Series X|S
- További aktív témák...
- Antivírus szoftverek, VPN
- MS SQL Server 2016, 2017, 2019
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- Game Pass Ultimate előfizetések 1 - 36 hónapig azonnali kézbesítéssel a LEGOLCSÓBBAN! AKCIÓ!
- Kaspersky, BitDefender, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- BESZÁMÍTÁS! ASUS H81M-A H81 chipset alaplap garanciával hibátlan működéssel
- Xiaomi Redmi Note 14 Pro+ 5G 256GB, Kártyafüggetlen, 1 Év Garanciával
- HP EliteBook 840 G10 - 14"WUXGA - i7-1360P - 16GB - 512GB - Win11 - MAGYAR - 3 év garancia
- Bomba ár! Lenovo ThinkPad L480 - i5-8G I 16-24GB I 256SSD I 14" FHD Touch I HDMI I Cam I W11 I Gar
- GYÁRI TÖLTŐK DELL LENOVO HP FUJITSU TOSHIBA Macbook---------- Budapest,/MPL/Foxpost
Állásajánlatok
Cég: BroadBit Hungary Kft.
Város: Budakeszi
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest

