-
IT café
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
- PlayStation 3
- Nagyon érdekli az Intelt a PC-s kézikonzolok piaca
- Elektromos autók - motorok
- Elemlámpa, zseblámpa
- Január 30-tól Magyarországon is kapható a Vivo X200 Pro
- PayPal
- Samsung Galaxy Felhasználók OFF topicja
- Szívós, szép és kitartó az új OnePlus óra
- EA Sports WRC '23
- Formula-1
- További aktív témák...