Hirdetés
- Ilyen olcsó sem volt még egy Apple notebook
- Túl nagy alkatrészt vettél? Így kerülheted el a PC-építés legnagyobb hibáját
- MWC 2026: leégsz, ha nem figyelsz a TCL 15 ezer nites panelje előtt
- Második villámcsapás: teszteltük a ROG Raikiri II Xbox kontrollert
- 100 TB-os HDD-k felé vezető alapot prezentált a Seagate
- Soundbar, soundplate, hangprojektor
- Milyen monitort vegyek?
- Intel Core i7 9xx "Bloomfield" (LGA 1366)
- Ilyen olcsó sem volt még egy Apple notebook
- Milyen billentyűzetet vegyek?
- Melyik tápegységet vegyem?
- Kicombosította az M5-ös SoC-családot az Apple
- Sony MILC fényképezőgépcsalád
- OLED TV topic
- Meghozta a régóta várt asztali Ryzen APU-kat az AMD
-
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
-
Lokids
addikt
Sziasztok!
Hogy kell kezelni normálisan makróval azt a problémát, hogy van 1 változó ami dátum.
Ez alapján egy másik változót (szám) el kell helyezni a megfelelő cellába.Eddig 1 évet kértek, ezért én csináltam 12db if-elseif elágazást. Viszont most meggondolták magukat és 3 évet kérnek. És valahogy nem tűnik jó ötletnek 36 db if-et odadobni. Főleg ha majd 10 évet akarnak.
Jelenleg ezt csinálom:
For Each s_Cell In s_rnG
s_CNum = Workbooks(Main_WB_Name).Worksheets(Likvid_WB_Head_Sheet).Cells(4, s_Cell.Column)
If s_CNum = 801 And s_Datum > "2019.12.31" And s_Datum < "2020.02.01" Then
s_Cell.value = p_Osszeg
ElseIf s_CNum = 802 And s_Datum > "2020.01.31" And s_Datum < "2020.03.01" Then
s_Cell.value = p_Osszeg
CNum-al adtam mind a 12 oszlopnak egy számot (801-812), hogy hogy adott hónapban adott mezőbe kerüljön az összeg.
Ezt hogy lehetne egyszerűbben?
Új hozzászólás Aktív témák
- Luck Dragon: Asszociációs játék. :)
- Lexus, Toyota topik
- Renault, Dacia topik
- Soundbar, soundplate, hangprojektor
- Folyószámla, bankszámla, bankváltás, külföldi kártyahasználat
- Samsung Galaxy S24 Ultra - ha működik, ne változtass!
- Samsung Galaxy Felhasználók OFF topicja
- Formula-1
- Építő/felújító topik
- Milyen monitort vegyek?
- További aktív témák...
- Játékkulcsok olcsón: Steam, Uplay, GoG, Origin, Xbox, PS stb.
- MEGA AKCIÓ! - Jogtiszta Windows - Office & Autodesk & CorelDRAW - Azonnal - Számlával - Garanciával
- Fallout 4 Pip-Boy Edition eladó
- Játékkulcsok ! : PC Steam, EA App, Ubisoft, Windows és egyéb játékok
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.
- HIBÁTLAN iPhone 12 Pro 128GB Gold-1 ÉV GARANCIA - Kártyafüggetlen, MS4441, 100% Akksi
- 152 - Lenovo LOQ (15IRH8) - Intel Core i5-12450H, RTX 4060 (ELKELT)
- ÁRGARANCIA!Épített KomPhone i5 12400F 16/32/64GB RAM RX 9060 XT 8GB GAMER PC termékbeszámítással
- Telefon felvásárlás!! Samsung Galaxy A20e/Samsung Galaxy A40/Samsung Galaxy A04s/Samsung Galaxy A03s
- BESZÁMÍTÁS! Asrock B450M R5 5500 8GB DDR4 256GB SSD GTX 1050 Ti 4GB Zalman T3 Plus DeepCool 400W
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Fferi50
