www.elektronik.si Seznam forumov www.elektronik.si
Forum o elektrotehniki in računalništvu
 
 PomočPomoč  IščiIšči  Seznam članovSeznam članov  SkupineSkupine  StatisticsStatistika  AlbumAlbum  DatotekeFilemanager DokumentacijaDocDB LinksPovezave   Registriraj seRegistriraj se 
  PravilaPravila  LinksBolha  PriponkePriponke  KoledarKoledar  ZapiskiZapiski Tvoj profilTvoj profil Prijava za pregled zasebnih sporočilPrijava za pregled zasebnih sporočil PrijavaPrijava 

Excel - barva celice

 
Objavi novo temo   Odgovori na to temo   Printer-friendly version    www.elektronik.si Seznam forumov -> Programska oprema
Poglej prejšnjo temo :: Poglej naslednjo temo  
Avtor Sporočilo
marko11
Član
Član



Pridružen-a: Ned 14 Dec 2003 17:47
Prispevkov: 893
Aktiv.: 3.77
Kraj: Dobrepolje
PrispevekObjavljeno: Sob Jan 17, 2015 8:49 pm    Naslov sporočila:  Excel - barva celice Odgovori s citatom
Pozdravljeni

Ali se da napraviti, ko kliknem na celico A1, ki je ozadje zeleno, da se zeleno obarvajo tudi določene celice naprimer A10, B11, C12....?

Drugič, ko bi kliknil celico A2 pa bi se vse zelene celice obarvale v belo (v osnovno barvo).

Hvala za nasvet in LP, marko
_________________
Če ne veš kam greš, se ne moreš zgubiti.
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo Pošlji E-sporočilo
airwolf
Član
Član



Pridružen-a: Sre 28 Maj 2008 17:17
Prispevkov: 2219
Aktiv.: 10.69
Kraj: Polhov Gradec
PrispevekObjavljeno: Sob Jan 17, 2015 9:34 pm    Naslov sporočila:   Odgovori s citatom
Koda:
Option Explicit

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Selection.Count = 1 Then
        If Not Intersect(Target, Range("A1")) Is Nothing Then
            Range("A10").Interior.ColorIndex = Selection.Interior.ColorIndex
            Range("B11").Interior.ColorIndex = Selection.Interior.ColorIndex
            Range("C12").Interior.ColorIndex = Selection.Interior.ColorIndex
        End If
        If Not Intersect(Target, Range("A2")) Is Nothing Then
            Range("A10").Interior.ColorIndex = 0
            Range("B11").Interior.ColorIndex = 0
            Range("C12").Interior.ColorIndex = 0
        End If
    End If
End Sub


vir:barve v excelu in detektiranje klika v celico

Priložen je primer. Vključiti moraš zavihek razvijalec (v 2007 verziji Excelove možnosti - Priljubljeno - V traku prikaži jeziček razvijalec. V razvijalcu nato klikneš Ogled kode)

makro_barve_klik.zip
 Opis:

Download
 Ime datoteke:  makro_barve_klik.zip
 Velikost datoteke:  13.3 KB
 Downloadano:  8 krat

_________________
LP Gašper
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo Pošlji E-sporočilo
marko11
Član
Član



Pridružen-a: Ned 14 Dec 2003 17:47
Prispevkov: 893
Aktiv.: 3.77
Kraj: Dobrepolje
PrispevekObjavljeno: Tor Jan 20, 2015 6:42 pm    Naslov sporočila:   Odgovori s citatom
Hvala Gašper.

Sem mislil, da je kaj bolj enostavno.

LP
_________________
Če ne veš kam greš, se ne moreš zgubiti.
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo Pošlji E-sporočilo
6dan8
Član
Član



Pridružen-a: Tor 18 Jan 2011 10:53
Prispevkov: 1053
Aktiv.: 6.00
Kraj: Goriška
PrispevekObjavljeno: Sre Jan 21, 2015 11:28 am    Naslov sporočila:   Odgovori s citatom
marko11, bi si mogoče lahko kaj pomagal s pogojnim oblikovanjem? Želenim celicam določiš pogojno oblikovanje glede na referenčno celico. Recimo takole: če je vrednost v celici A1 enaka "1", potem naj bo podlaga ciljnih celic zelene barve. Je pa res, da moraš potem spreminjati vrednost v celici A1, kar samo s klikanjem ne gre najbolje...
Nazaj na vrh
Skrit Poglej uporabnikov profil Pošlji zasebno sporočilo
Pokaži sporočila:   
Objavi novo temo   Odgovori na to temo   Printer-friendly version    www.elektronik.si Seznam forumov -> Programska oprema Časovni pas GMT + 2 uri, srednjeevropski - poletni čas
Stran 1 od 1

 
Pojdi na:  
Ne, ne moreš dodajati novih tem v tem forumu
Ne, ne moreš odgovarjati na teme v tem forumu
Ne, ne moreš urejati svojih prispevkov v tem forumu
Ne, ne moreš brisati svojih prispevkov v tem forumu
Ne ne moreš glasovati v anketi v tem forumu
Ne, ne moreš pripeti datotek v tem forumu
Ne, ne moreš povleči datotek v tem forumu

Uptime: 494 dni


Powered by phpBB © 2001, 2005 phpBB Group