- bb0t: Gyilkos szénhidrátok, avagy hogyan fogytam önsanyargatás nélkül 16 kg-ot
- sziku69: Fűzzük össze a szavakat :)
- Luck Dragon: Asszociációs játék. :)
- Krisztianby: Az ügyintézésnek mindig ilyennek kell lennie?
- Sub-ZeRo: Euro Truck Simulator 2 & American Truck Simulator 1 (esetleg 2 majd, ha lesz) :)
-
Fototrend
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
-
Delila_1
Topikgazda
válasz SAxchivava #5453 üzenetére
Jobb klikk után ezt vidd be:
Private Sub Worksheet_Change(ByVal Target As Range)
Worksheets("Munka1").Tab.ColorIndex = 4
End SubProgramozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
félisten
válasz SAxchivava #5453 üzenetére
Hali!
Vagy ezt
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("A1") = "" Then
Munka1.Tab.Color = RGB(0, 255, 0)
Else
Munka1.Tab.Color = RGB(255, 0, 0)
End If
End SubFire.
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
-
félisten
válasz SAxchivava #5476 üzenetére
Hali!
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("A1") = "" Then
Munka1.Tab.ColorIndex = xlColorIndexNone
Else
Munka1.Tab.Color = vbGreen
End If
End SubFire.
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
Új hozzászólás Aktív témák
- Ukrajnai háború
- Napelem
- Honor Magic5 Pro - kamerák bűvöletében
- Fogyjunk le!
- Milyen billentyűzetet vegyek?
- iPhone topik
- Kerékpárosok, bringások ide!
- Alig egy nap múlva végre bemutatkozik az Assassin's Creed Shadows
- Iqos cigaretta
- bb0t: Gyilkos szénhidrátok, avagy hogyan fogytam önsanyargatás nélkül 16 kg-ot
- További aktív témák...
Állásajánlatok
Cég: Ozeki Kft.
Város: Debrecen
Cég: Alpha Laptopszerviz Kft.
Város: Pécs