- Luck Dragon: Asszociációs játék. :)
- sziku69: Fűzzük össze a szavakat :)
- urandom0: Új kedvenc asztali környezetem, az LXQt
- sziku69: Szólánc.
- eBay-es kütyük kis pénzért
- aquark: Jó platformer játékokat keresek!
- gban: Ingyen kellene, de tegnapra
- sh4d0w: Árnyékos sarok
- Elektromos rásegítésű kerékpárok
- skoda12: Webshopos átverések
-
LOGOUT
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
-
Capella
senior tag
válasz
fricc_ #41837 üzenetére
Nem a formátumra gondoltam, hanem hogy tényleg szám-e, vagy csak úgy néz ki a tartalom.
Egy felesleges szóköz, vagy tizedesvessző helyett pont, és már nem érték. Igaz az meg feltűnhet alapesetben, hogy merre igazítja a cellában. Vagy ha az ezres elválasztót begépelték, és nem a cellaformátum képzi.
Persze látatlanban csak egy tipp volt.
A szövegformátum is meg tudja bolondítani, de ezek szerint az rendben. -
Pakliman
tag
válasz
fricc_ #36592 üzenetére
D oszlop elrejtve, a
Debug.Print n
4-et ad visszaDim ws As Worksheet
Dim n As Integer
Dim cl As Range
For Each ws In ThisWorkbook.Worksheets
n = 0
For Each cl In .Rows(5).Columns
If cl.Hidden Then
n = cl.Column
Exit For
End If
Next cl
Debug.Print ws.Name & "->n=" & n
Next wsErre gondoltál?
-
Fferi50
Topikgazda
válasz
fricc_ #36565 üzenetére
Szia!
"i= 1
n = 0
For i = 1 To 10
If Range("i5").EntireColumn.Hidden Then
n = i"A kiemelt sorral az a baj, hogy a Range("i5") az i oszlop 5. celláját nézi meg !!!.
Ha ciklussal mész akkor a Cells tulajdonságot kell használni:If Cells(5,i).EntireColumn.Hidden Then
Vagy:
Dim cl As Range
For Each cl in Rows(5).Cells :if cl.EntireColumn.Hidden Then
n=cl.Column :Exit For
Next
A kódod következő része pedig a D oszlopot rejtettnek találva az n értékét 2 -re állítja, legyen az bármennyi is az előző rész alapján.Üdv.
Ps. Légy szives, használd a Programkód gombot, ha makrót másolsz be.
-
Fferi50
Topikgazda
válasz
fricc_ #36340 üzenetére
Szia!
A B3 képletében legyen abszolút az A oszlop, azaz $A3. Ezután a B oszlopban húzd le a képletet. Majd kijelölöd B4-től lefelé a cellákat. Másolás. C3 cellát kijelölöd. Irányított beillesztés, a panelen bejelölöd a képletet és a transzponálást.
A B oszlop képletes celláit utána kitörölheted.Üdv.
Új hozzászólás Aktív témák
Hirdetés
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- Játékkulcsok olcsón: Steam, Uplay, GoG, Origin, Xbox, PS stb.
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.
- Adobe Előfizetések - Adobe Creative Cloud All Apps - 12 Hónap
- Kaspersky, BitDefender, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- Új, Garanciális (1-3ÉV) Gamer PC-Számítógép, néve szóló számlával! I5 14400F / RTX 5060 / 32GB DDR5
- Telefon felvásárlás!! Apple iPhone SE (2016), Apple iPhone SE2 (2020), Apple iPhone SE3 (2022)
- ÁRCSÖKKENTÉS MSI Z77 MPOWER Alaplap eladó
- BESZÁMÍTÁS! MSI B450 R5 5600X 32GB DDR4 512GB SSD RTX 4060Ti 16GB ZALMAN N4 Enermax 650W
- iPhone 13 mini 128GB Midnight -1 ÉV GARANCIA - Kártyafüggetlen, MS3086, 94% Akkumulátor
Állásajánlatok
Cég: CAMERA-PRO Hungary Kft.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest