Centar za edukaciju-BiH


Odgovori na temu











Prosiri Boja Prosiri Velicina Spoiler WMP-Videos Neprimjereno
Podebljano Kurziv Podvuceno Slika Internet adresa (URL) Citat Van teme Neuredena lista Narucena lista Pretplata Nadredeni
Grinning Happy Cool Surprised Disappointed Laughing In love Angry No comment Embarrassing Shy Smiling Tongue Undecided Innocent Wink Sad Prosiri i skupi vise smajlica
Povecaj velicinu · Smanji velicinu Provjeri duzinu

Pretvori smajlice u postu
Pretvori & quot; vokable & quot; u postu


Upravljanje prilozima
Mozete priloziti 3 datoteke!



Posljednjih 15 postova u ovoj temi


Dado (01.02.2019 08:09):
Predmet: Re: Uvjetno oblikovanje ćelije - Excel
Hvala za trud, ovo je odlično.

dex (31.01.2019 12:22):
Predmet: Re: Uvjetno oblikovanje ćelije - Excel
Na osnovu Zoniceve izvanredne ideje nadogradio sam ovo. Promene se sada ne beleze u dat.sys, vec u paralelnom sheetu (u ovom slucaju u sheet2, promene) i moze da radi za oblast, vise celija

Dado (31.01.2019 07:56):
Predmet: Re: Uvjetno oblikovanje ćelije - Excel
Hvala još jednom, svako dobro.

zxz (30.01.2019 19:34):
Predmet: Re: Uvjetno oblikovanje ćelije - Excel
Pa kad prodje vise od 24 sata.

Dado (30.01.2019 19:12):
Predmet: Re: Uvjetno oblikovanje ćelije - Excel
Prilikom promjene datuma ili?

Dado (30.01.2019 18:56):
Predmet: Re: Uvjetno oblikovanje ćelije - Excel
Ok, hvala. Bunilo me je ovo "Odnosi se samo na jedno polje koje odaberes".

Za koji bi vremenski period polje koje je "poplavilo" trebalo da opet bude bez boje.

zxz (30.01.2019 17:11):
Predmet: Re: Uvjetno oblikovanje ćelije - Excel
Nista ne treba mijenjati samo treba iskopirati u modul sita u kojem zelis da se to obavlja.
File trebas prije zapisati tako da se zna putanja na kojoj ce se formirati jos jedan file.

Dado (30.01.2019 15:30):
Predmet: Re: Uvjetno oblikovanje ćelije - Excel
Pošto sam ja totalni laik za ovo, gdje odabirem-mijenjam polje u ovom kodu. Hvala još jednom.

zxz (30.01.2019 11:23):
Predmet: Re: Uvjetno oblikovanje ćelije - Excel
Odnosi se samo na jedno polje koje odaberes.
PreuzmiIzvorni kôd (Visual Basic):
  1. Option Explicit
  2. Dim Stara_Vrijednost
  3.  
  4. Private Sub Worksheet_Activate()
  5. Dim Putanja As String
  6. Dim tmp As String
  7. Dim dat(2) As Long
  8. Dim Datum As Date
  9. Dim STemp() As String
  10.  
  11. Putanja = ActiveWorkbook.Path
  12.  
  13. Open Putanja & "\dat.sys" For Input As #1
  14. Line Input #1, tmp
  15. Close #1
  16. STemp = Split(tmp, "|")
  17. Datum = STemp(1)
  18. dat(1) = Datum
  19. dat(2) = Now
  20. dat(0) = dat(2) - dat(1)
  21. If dat(0) > 0 Then
  22. Me.Range(STemp(0)).Interior.ColorIndex = 0
  23. End If
  24. End Sub
  25.  
  26. Private Sub Worksheet_Change(ByVal Target As Range)
  27. Dim Nova_Vrijednost
  28. Dim Putanja As String
  29. Dim Polje As String
  30.  
  31. Nova_Vrijednost = Target.Value
  32.  
  33. If Stara_Vrijednost <> Nova_Vrijednost Then
  34. Target.Interior.ColorIndex = 37
  35. Putanja = ActiveWorkbook.Path
  36. Open Putanja & "\dat.sys" For Output As #1
  37. Polje = Target.Address
  38.  
  39. Print #1, Polje & "|" & Now
  40. 'Me.Range(Polje).Value = 44
  41. Close #1
  42. End If
  43.  
  44. End Sub
  45.  
  46.  
  47. Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  48. On Error Resume Next
  49. If Target.Value <> Empty Then
  50. Stara_Vrijednost = Target.Value
  51. End If
  52. End Sub

Dado (29.01.2019 09:17):
Predmet: Re: Uvjetno oblikovanje ćelije - Excel
Ma vjerovatno nisam ni ja bio jasan u prvom javljanju.

zxz (29.01.2019 09:04):
Predmet: Re: Uvjetno oblikovanje ćelije - Excel
E to nece.
Nisam ja bas to tako niti razumio ali se moze i to napraviti,

Dado (29.01.2019 08:04):
Predmet: Re: Uvjetno oblikovanje ćelije - Excel
Hvala zzx. Ubacio sam ovaj kod u excel radni list, radi. Sad me zanima kada protekne izvjesni vremenski period na primjer 24 sata, hoće li ćelija koja je promjenila boju a nije nakon toga bilo promjena vrijednosti, ostati bez boje ili ?

zxz (29.01.2019 01:23):
Predmet: Re: Uvjetno oblikovanje ćelije - Excel
evo kod

PreuzmiIzvorni kôd (Visual Basic):
  1. Dim Stara_Vrijednost
  2.  
  3. Private Sub Worksheet_Change(ByVal Target As Range)
  4. Nova_Vrijednost = Target.Value
  5.  
  6. If Stara_Vrijednost <> Nova_Vrijednost Then
  7. Target.Interior.ColorIndex = 37
  8. End If
  9. End Sub
  10.  
  11.  
  12. Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  13. If Target.Value <> Empty Then
  14. Stara_Vrijednost = Target.Value
  15. End If
  16. End Sub

Dado (28.01.2019 14:11):
Predmet: Uvjetno oblikovanje ćelije - Excel
Pozdrav za sve članove. Interesira me kako da uvjetno oblikujem ćeliju u excelu tako da mi ćelija bude obojena ukoliko dođe do promjene vrijednosti u ćeliji u prethodna 24 sata ili nekom drugom vremenskom periodu.

Sva vremena su GMT +01:00. Trenutno vrijeme: 5: 22 pm.