Hirdetés
- Milyen monitort vegyek?
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- Kész, vége, ennyi volt: eladja tévés üzletágát a Sony
- Milyen TV-t vegyek?
- Autós kamerák
- Milyen billentyűzetet vegyek?
- Oh hi Mark: megreccsent a Metaverzum
- Olvad a hó, de ez nem zavarja a hardvereket
- OLED TV topic
- NVIDIA GeForce RTX 5080 / 5090 (GB203 / 202)
-
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
róland
#33604
üzenetére
Szia!
Makró nélkül azért nem fog menni, mert egy cellában vagy képlet (és annak eredménye) van, vagy "konstans érték". Képlettel el lehet érni, hogy az adott hónap legyen látható és még a lista követelményeknek is megfeleljen, viszont amint megváltoztatod az értékét, abban a pillanatban "elvész" a képlet.
Én a Munkalap aktíválási eseményébe tenném be az egysoros kódot - ami 3 sor lesz
Private Sub Worksheet_Activate()
Range("A1").Value=Application.Choose(Month(Date), "Január","Február","Március","Április" stb.)
End SubAz adott cellára természetesen az érvényesítést is kiadhatod emellett - ahhoz nem kell nyúlni többet.
Üdv.
Új hozzászólás Aktív témák
- Genshin Impact (PC, PS4, Android, iOS)
- Milyen légkondit a lakásba?
- Milyen monitort vegyek?
- Xiaomi 15T - reakció nélkül nincs egyensúly
- Spórolós topik
- PlayStation 5
- Call of Duty: Warzone
- A fociról könnyedén, egy baráti társaságban
- Telekom mobilszolgáltatások
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- További aktív témák...
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- Antivírus szoftverek, VPN
- Bitdefender Total Security 3év/3eszköz! - Tökéletes védelem.
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- Windows 10/11 Home/Pro , Office 2024 kulcsok
- Dell Precision 7550 i7-10850H 32GB 512GB Nvidia RTX3000 6GB 1 év garancia
- Dell XPS 13 9300 i7-1065G7 8GB 512GB FHD+ 500nit! 1 év garancia
- Új Asus Vivobook S16 Flip 2in1 WUXGA X360 Touch i9-13900H 14mag 16GB 1TB SSD Intel Iris XE Garancia
- Wacom Bamboo One CTF-430 rajztábla
- BESZÁMÍTÁS! LENOVO ThinkPad P15 Gen 1 munkaállomás - i7 10875H 32GB DDR4 512GB SSD Quadro T2000 W11
Állásajánlatok
Cég: Central PC számítógép és laptop szerviz - Pécs
Város: Pécs
Cég: Laptopműhely Bt.
Város: Budapest

Fferi50

