Hirdetés
- sh4d0w: Kalózkodás. Kalózkodás?
- Luck Dragon: Asszociációs játék. :)
- sziku69: Fűzzük össze a szavakat :)
- Sub-ZeRo: Euro Truck Simulator 2 & American Truck Simulator 1 (esetleg 2 majd, ha lesz) :)
- Meggyi001: Kórházi ellátás: kuka vagy finom?
- sziku69: Szólánc.
- sh4d0w: StarWars: Felismerés
- gban: Ingyen kellene, de tegnapra
- Brogyi: CTEK akkumulátor töltő és másolatai
- GoodSpeed: Kell-e manapság egérpad vagy sem?
Új hozzászólás Aktív témák
-
Delila_1
veterán
Lapfülön jobb klikk, Kód megjelenítése.
Ezzel beléptél a Visual Basik-be, ott is a lapod kódjához. A jobb oldalon lévő nagy üres felületre viheted be az eseményvezérelt makrót. Az üres rész tetején balra a (General) helyett kiválasztod a Worksheet opciót.
Már meg is jelent a makród kezdő- és befejező sora.Private Sub Worksheet_SelectionChange(ByVal Target As Range)
End SubEz a makró akkor indul, ha egy cellát kiválasztasz, magyarul, ha rálépsz. A két sor közé írhatod meg a kódodat, pl.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Target.Interior.Color = vbYellow
End SubA kiválasztott cella háttere sárga lesz.
Adhatsz feltételt, hogy pl. csak az A oszlopban sárgítson.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 1 Then
Target.Interior.Color = vbYellow
End If
End SubEzernyi más dolgot is rendelhetsz a makróhoz.
Új hozzászólás Aktív témák
- 3D nyomtatás
- Kerékpárosok, bringások ide!
- Battlefield 6
- Anime filmek és sorozatok
- Béta iOS-t használók topikja
- Samsung Galaxy Felhasználók OFF topicja
- Teljesítmény az van dögivel
- Elon Musk billiomos lesz, ha kitör a gépek forradalma
- Milyen egeret válasszak?
- Melyik tápegységet vegyem?
- További aktív témák...
- ÚJ (Pici hibával) Asus ROG Chakram X Bolti ár:55k INGYEN FOXPOST
- ÚJ Asus ROG Chakram Bolti ár:55k INGYEN FOXPOST
- ASUS ROG Gladius III Wireless Bolti ár:40k INGYEN FOXPOST
- ÚJ/Használt HyperX Pulsefire Haste Egerek Fehér/Fekete Bolti ár:20k INGYEN FOXPOST
- Lenovo Thinkpad T14s FHD, Érintőkijelző, I5-10210U CPU, 16GB DDR4, 256GB SSD, 27% ÁFÁS SZÁMLA, 1ÉV G
- Apple MacBook Air 13 M1 8GB 256GB magyar bill 1 év garancia
- GYÖNYÖRŰ iPhone 13 256GB Pink -1 ÉV GARANCIA - Kártyafüggetlen, MS3427, 100% Akkumulátor
- Apple iPhone 12 Pro Max / 128GB / Kártyafüggetlen / 12Hó garancia
- Samsung Galaxy A36 5G / 6/128GB / Kártyafüggetlen / 12Hó Garancia / BONTATLAN NULL Perces
- BESZÁMÍTÁS! GIGABYTE X570 AORUS ELITE X570 alaplap garanciával hibátlan működéssel
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: NetGo.hu Kft.
Város: Gödöllő

