Hirdetés
- Google Pixel topik
- Milyen okostelefont vegyek?
- Itt a Galaxy S26 széria: az Ultra fejlődött, a másik kettő alig
- Poco F8 Ultra – forrónaci
- Szívós, szép és kitartó az új OnePlus óra
- Ennyit szűkít az X300 Ultra a telepen Európában
- Nincs Nothing AI szemüveg? Fogd meg a söröm!
- Poco X8 Pro Max - nem kell ide sem bank, sem akkubank
- Stílussal és friss szenzorokkal futott be a Huawei Watch GT 5
- Xiaomi 15T Pro - a téma nincs lezárva
-
Mobilarena
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
-
Wyll
őstag
Vajon mi a baj?
Azt akarom, hogy egy userform-on lévő toggle button akkor és csak akkor legyen benyomva (value=1), amikor bizonyos oszlopok nincsenek elrejtve (hidden = false); illetve hogy a be vagy kikapcsolása egyben rejtse is el vagy jelenítse is meg a cellákat.
A rejtés/felfedés funkció működik is szépen, csak az inicializálás nem: ha a cellák el vannak rejtve, akkor sem lesz benyomott állapotú a userform indulásakor.
Private Sub togbutTranslate_Click()
If Range("b_forditocellak").EntireColumn.Hidden = True Then
Range("b_forditocellak").EntireColumn.Hidden = False
Else
Range("b_forditocellak").EntireColumn.Hidden = True
End If
End Sub
Private Sub UserForm_Initialize()
If Range("b_forditocellak").EntireColumn.Hidden = True Then
Me.togbutTranslate.Value = True
End If
Me.labVersion.Caption = "Jegyzőkönyv verziója: " & Worksheets("MAGYAR").Range("N2").Value
End Sub
Új hozzászólás Aktív témák
- Hisense LCD és LED TV-k
- PlayStation 5
- HDD probléma (nem adatmentés)
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- Autós topik
- Windows 11
- Milyen billentyűzetet vegyek?
- Intel Core Ultra 3, Core Ultra 5, Ultra 7, Ultra 9 "Arrow Lake" LGA 1851
- Konkrét moderációval kapcsolatos kérdések
- Google Pixel topik
- További aktív témák...
- Xbox / Microsoft Store feltöltőkártya kód (digitális, HU) több címlet, több db, azonnal, olcsón
- Microsoft és egyéb dobozos retro szoftverek
- Vírusirtó, Antivirus, VPN kulcsok GARANCIÁVAL!
- MS SQL Server 2016, 2017, 2019
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- Asus STRIX Gaming PC! 7800X3D / RoG RTX 5070 TI / 32GB 7600MHz / SSD 1TB / 850w Gold! BeszámítOK!
- AKCIÓ! MacBook Pro 13 M1 8GB RAM 512GB SSD notebook garanciával hibátlan működéssel
- Samsung Galaxy A52s 5G / 6/128GB / Kártyafüggetlen / 12Hó Garancia
- Lenovo IdeaPad Slim 3 Ryzen 7 8840HS 15" FHD+ 16GB 1000GB Teljeskörű garancia
- Apple Watch Series 10 46mm GPS+Cellular Titanium, Újszerű, 1 Év Garanciával
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Fferi50
