- Samsung Galaxy A34 - plus size modell
- Nothing Phone (3a) és (3a) Pro - az ügyes meg sasszemű
- Honor Magic6 Pro - kör közepén számok
- Elérhető az iOS 18.4, vele pedig megérkezett az Apple Intelligence is
- Samsung Galaxy Watch7 - kötelező kör
- Nem várt platformon a OnePlus Nord 5
- Samsung Galaxy S23 és S23+ - ami belül van, az számít igazán
- Samsung Galaxy S21 FE 5G - utóirat
- Samsung Galaxy Watch (Tizen és Wear OS) ingyenes számlapok, kupon kódok
- One mobilszolgáltatások
-
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
-
m.zmrzlina
senior tag
válasz
jani-wan #12360 üzenetére
Bocs nem voltam egyértelmű, és összekeverted a két dolgot.
Tehát ha jól értem van (legalább) két munkalapod. Az egyik amin az adatokat akarod ellenőrizni a másik amin beállítod, hogy mely oszlopokra van szükséged.
Van még a következő kód (most csak erre lesz szükséged semmi másra):
Private Sub Worksheet_Change(ByVal Target As Range)
For i = 1 To 60
If Cells(2, i).Value <> "igen" Then Sheets("Munka1").Columns(i).EntireColumn.Hidden = True Else Sheets("Munka1").Columns(i).EntireColumn.Hidden = False
Next
End SubEzt a kódot a beállító munkalapodhoz rendeled úgy, hogy a lapfülön jobbkatt majd Kód megjelenítése opciót választod. Az így kapott VBA mezőbe bemásolod a kódot úgy, hogy a Munka1 munkalapneveket átírod a saját munkalapod nevére. Nem amelyik fülén kattintottál az előbb, hanem azéra amin az adatokat fogod ellenőrizni.
Ebbe a munkafüzetbe semmi más kód nem kell!
Új hozzászólás Aktív témák
- Luck Dragon: Asszociációs játék. :)
- Counter-Strike: Global Offensive (CS:GO) / Counter-Strike 2 (CS2)
- Azonnali fotós kérdések órája
- Torrent meghívó kunyeráló
- Samsung Galaxy A34 - plus size modell
- Parkside szerszám kibeszélő
- Tesla topik
- Gyúrósok ide!
- TP-LINK routerek
- PlayStation 3
- További aktív témák...
- PS3 Játékok 1500Ft/db - RÉSZLETEK A LEÍRÁSBAN
- Bomba ár! Dell Latitude 7480 - i5-6GEN I 8GB I 256GB SSD I 14" FHD Touch I HDMI I Cam I W10 I Gari!
- Mini PC, tiny PC HP Fujitsu Esprimo i5-7500T
- BESZÁMÍTÁS! MSI Z790 i5 14600KF 64GB DDR5 512GB SSD RTX 3070 8GB Rampage SHIVA Enermax 750W
- MikroTik CCR1009-7G-1C-1S+ Cloud Router
Állásajánlatok
Cég: PC Trade Systems Kft.
Város: Szeged
Cég: Liszt Ferenc Zeneművészeti Egyetem
Város: Budapest