- Házimozi belépő szinten
- Inteles Sparkle videokártyák jönnek, ezúttal munkához
- Épített vízhűtés (nem kompakt) topic
- Philips LCD és LED TV-k
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- Milyen billentyűzetet vegyek?
- AMD Catalyst™ driverek topikja
- Androidos tablet topic
- Vezeték nélküli fejhallgatók
- ASUS ROG Ally
-
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
-
Gh0sT
addikt
Szóval: van az alábbi kód:
If Range(''A1'').Value <>'''' Then
Range(''A1'').Select
With Selection.Interior
.ColorIndex = 6
.Pattern = xlSolid
End With
Else
End If
End Sub
Ez ugye azt csinálja, hogy ha beírok valamit az A1 cellába, akkor sárga lesz a cella színe.
Hogyan terjesztem ezt ki A1-A200 cellatartományra? Valami FOR NEXT ciklusra gondoltam, csak nem tudom a helyes használatot.
N=1
For N=1 to 200
If Range(''A[N]'').Value <>'''' Then
Range(''A[N]'').Select
With Selection.Interior
.ColorIndex = 6
.Pattern = xlSolid
End With
Else
End If
Next N
End Sub
Nah, ez biztos nem jó, csak érzékeltettem, hogy mire gondoltam.
Új hozzászólás Aktív témák
- Apple iPhone 16 - ígéretek földje
- Azonnali fáradt gőzös kérdések órája
- BestBuy topik
- Honor 400 - és mégis mozog a kép
- Samsung Galaxy S21 FE 5G - utóirat
- Google Pixel 9a - a lapos munka
- Házimozi belépő szinten
- Bittorrent topik
- AliExpress tapasztalatok
- Inteles Sparkle videokártyák jönnek, ezúttal munkához
- További aktív témák...
- Kaspersky, BitDefender, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- Microsoft licencek KIVÉTELES ÁRON AZONNAL - UTALÁSSAL IS AUTOMATIKUS KÉZBESÍTÉS - Windows és Office
- Új, bontatlan World of Warcraft gyűjtői kiadások
- Bitdefender Total Security 3év/3eszköz! - Tökéletes védelem, Most kedvező áron!
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- BESZÁMÍTÁS! ASUS ROG CROSSHAIR X670E GENE alaplap garanciával hibátlan működéssel
- AKCIÓ! AMD Ryzen 9 3900X 12 mag 24 szál processzor garanciával hibátlan működéssel
- DELL, HP gyári töltők, sok db. 7,4x5mm - 4,5x3mm + USB-C/Type-C 65W
- Csere-Beszámítás! Prémium számítógép PC Játékra! I7 12700KF / RTX 3080 / 32GB DDR4 / 1TB SSD
- Kaspersky, BitDefender, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: Liszt Ferenc Zeneművészeti Egyetem
Város: Budapest