-
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
-
Mutt
senior tag
válasz
the radish
#20568
üzenetére
Hello,
Létrehoztam egy "userformot", bemásoltam az általad leírtakat, de nem tudom működésre bírni.
A macro-ba kell valami hivatkozás, hogy menjen?A userformot be kell tölteni, majd meg kell jeleníteni. Ezt mind egy modulban, a userformon kívül kell megtenned.
A betöltés elhagyható, csak akkor érdemes külön foglalkozni vele, ha a form elindítása időigényes és nem akarod hogy a felhasználó erre várjon.Tipikusan egy form elindítása így megy:
Sub SajatForm()
UserForm.Show
End SunEkkor a UserForm Initialize eseményében megadott eljárások futnak le és megjelenik a form.
A form bezárása annyiban tér el, hogy a UserForm egyik eleméhez (többnyire egy Bezárás gombhoz) írod, nem pedig egy külön modulba. A bezárás Unload paranccsal megy, el is lehet rejteni a Hide-al, ekkor memórában marad, de nem látható.
Ide felraktam egy egyszerű mintát.
...TextBox1.Text = Format$(Date, "yyyy.mm.dd")
miért csak a mai dátummal tölti ki a cellát amit ráadásul át sem tudok írni.A Date VBA függvény, amit használsz mindig az aktuális dátumot adja meg.
A szövegdonboz vezérlőnek valószínű a locked tulajdonsága True-ra van állítva. Esetleg az Enabled pedig Falsera, ekkor szürke a tartalma.Az egyik nagy hiányosság, hogy alapból nincs olyan vezérlő az Excelben, amely a dátumválasztást segíti. Korábbi változatokban volt egy DatePicker, de az megszűnt, helyette mindenki vmit összerakott és azt használja. Én ezt használom.
üdv
Új hozzászólás Aktív témák
- Milyen egeret válasszak?
- Honor Magic8 Pro - bevált recept kölcsönvett hozzávalókkal
- WoW avagy World of Warcraft -=MMORPG=-
- ASZTALI GÉP / ALKATRÉSZ beárazás
- Nyomtató topik
- Itt a Galaxy S26 széria: az Ultra fejlődött, a másik kettő alig
- Samsung Galaxy A52s 5G - jó S-tehetség
- Apple iPhone 17 Pro Max – fennsík
- AMD vs. INTEL vs. NVIDIA
- Assetto Corsa Rally
- További aktív témák...
- Microsoft és egyéb dobozos retro szoftverek
- Kaspersky, BitDefender, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.
- Antivírus szoftverek, VPN
- Játékkulcsok ! : PC Steam, EA App, Ubisoft, Windows és egyéb játékok
- Dell Latitude 5430 14" Touchscreen i5-1235U 16GB 1000GB 1 év garancia
- ÓRIÁSI AKCIÓK! GARANCIA, SZÁMLA - Windows 10 11, Office 2016 2019 2021,2024, vírusírtók, VPN
- Mini Pc HP ProDesk 600 G2 / G4 / G5 Acer Vertion // 6-9. gen // i3 / i5 // garancia / Bp., MPL, Fox
- Alienware 17r4 olvass
- RÉSZLETFIZETÉS.BANKMENTES.KAMATMENTES. Új noblechairs EPIC Mercedes-AMG Petronas
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Fferi50