Koledar z drsnikom

Pomoč pri delu z MS Excelom
Odgovori
AlexAnder
Prispevkov: 2
Pridružen: To Sep 17, 2019 2:27 pm

Koledar z drsnikom

Odgovor Napisal/-a AlexAnder »

Pozdravljeni,
Ali ima kdo kakšno idejo kako bi v excelu naredil koledar (slika spodaj), ki bi prikazoval en teden, levo in desno pa bi bila puščica, da lahko premikaš datume (v smislu drsnika). Pod datumi pa bi se premikala tudi spodnja polja.

Hvala.

https://photos.app.goo.gl/F8yhS1vYv7KPtPdp9
admin
Site Admin
Prispevkov: 3687
Pridružen: Sr Jul 20, 2005 10:06 pm

Re: Koledar z drsnikom

Odgovor Napisal/-a admin »

Pozdravljeni,

Za rešitev te težave morate napisati makre, ter na tabelo postaviti dva gumba. Gumba pa samo skrivata oz. razkrivata posamezne kolone.

Primer takšnih makrov pa kar prilagam:

Koda: Izberi vse

Option Explicit

Sub SkrijKolone()
  Columns("K:XFD").EntireColumn.Hidden = True
End Sub

Sub Naprej()
  Dim prva As Long: prva = 4
  
  While (Columns(prva).Hidden)
    prva = prva + 1
  Wend
  
  Columns(prva).EntireColumn.Hidden = True
  Columns(prva + 7).EntireColumn.Hidden = False
End Sub

Sub Nazaj()
  Dim zadnja As Long: zadnja = 16384
  
  While (Columns(zadnja).Hidden)
    zadnja = zadnja - 1
  Wend
  
  If (zadnja <= 10) Then Exit Sub
  
  Columns(zadnja).EntireColumn.Hidden = True
  Columns(zadnja - 7).EntireColumn.Hidden = False
End Sub

lp,
Matjaž Prtenjak
Administrator
AlexAnder
Prispevkov: 2
Pridružen: To Sep 17, 2019 2:27 pm

Re: Koledar z drsnikom

Odgovor Napisal/-a AlexAnder »

Pozdravljeni,

Hvala za informacijo. Bom videl kako daleč pridem z mojim (ne)znanjem. :)
Odgovori