Hirdetés
- Intel Core Ultra 3, Core Ultra 5, Ultra 7, Ultra 9 "Arrow Lake" LGA 1851
- Ne szórd ki a pénzed pixelekre!
- Ventilátorok - Ház, CPU (borda, radiátor), VGA
- NVIDIA GeForce RTX 5070 / 5070 Ti (GB205 / 203)
- Apple MacBook
- Minőségi ugrást hozhat a One új médiaboxa?
- HiFi műszaki szemmel - sztereó hangrendszerek
- AMD Ryzen 9 / 7 / 5 9***(X) "Zen 5" (AM5)
- RAM topik
- Amlogic S905, S912 processzoros készülékek
-
PROHARDVER!
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
-
Fferi50
Topikgazda
válasz
csferke
#46192
üzenetére
Szia!
Azért ez nem ennyire egyszerű.
A formoknak külön kódlapjuk van, ahova eseménykezelőket és normál eljárásokat is be lehet illeszteni. Ahhoz, hogy a megfelelő helyre kerüljön az adat, nem a formot kell pozicionálni.
A form sem a kiválasztott (selected) cellánál fog megjelenni.
A form pozicionálásra két lehetőség is van:
a.) az Activate eseménykezelőben direktben megadhatod a Top és Left paraméterekkel, hogy hol jelenjen meg a képernyőn. Ugyanitt a Height és a Width paraméterekkel megadhatod a méreteit is.
b.) a form Move tulajdonságát használva szintén meghatározhatod a helyzetét és a méretét a program futása közben is.
FONTOS: a méretek képpontban vannak meghatározva és a képernyő bal felső széle a 0,0 koordináta. Ezt kell figyelembe venned, amikor meghatározod a megjelenés helyét.
Pl. az alábbi eseménykezelők a form kódlapján:Private Sub UserForm_Activate()
With Me
.Top = Range("N1").Top + 10
.Left = Range("N1").Left
End With
End Sub
Ez az N1 cella pozíciójának megfelelően, de a képernyő felső széléhez nagyon közel jeleníti meg a formot - mivel az első sor top pozíció értéke 0.Private Sub UserForm_Click()
With Me
.Move 100, 120, 400, 300
End With
End Sub
Ez a formra kattintáskor áthelyezi a formot a 100,120 kezdőpontra és átméretezi.
Kis gyakorlással el fogod tudni helyezni a formokat a számodra megfelelő helyen.
A formon bevitt értékek elhelyezésére külön eljárásokat kell írni - ami lehet eseménykezelő vagy normál eljárás.
Pl.Private Sub TextBox1_Change()
Range("A1").Value = Me.TextBox1.Text
End Sub
A Textbox1 változásakor az értéket beírja az A1 cellába.
Üdv.
Új hozzászólás Aktív témák
- iPhone topik
- Víz- gáz- és fűtésszerelés
- Apple iPhone 17 Pro Max – fennsík
- iOS alkalmazások
- Lexus, Toyota topik
- Intel Core Ultra 3, Core Ultra 5, Ultra 7, Ultra 9 "Arrow Lake" LGA 1851
- Otthoni hálózat és internet megosztás
- Miskolc és környéke adok-veszek-beszélgetek
- Kerékpárosok, bringások ide!
- Xiaomi 15 - kicsi telefon nagy energiával
- További aktív témák...
- AZONNALI SZÁLLÍTÁS Eredeti Microsoft Office 2019 Professional Plus
- CSX 2x2GB (4GB) DDR 800 MHz kit
- Huawei Quidway S5324TP-SI-AC - 24G, 4SFP, L2, managed switch
- HP ProBook 430 G5 Intel Penium 4415U laptop (kijelző hibás)
- Bomba ár! HP EliteBook 745 G6 - Ryzen 7 3700U I 16GB I 512SSD I HDMI I 14" FHD I Cam I W10 I Gari!
Állásajánlatok
Cég: NetGo.hu Kft.
Város: Gödöllő
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Fferi50

