Sadržaj
Često se pitam zašto ne postoji mogućnost prilagodbe maksimalne vrijednosti trake za pomicanje u Excelu na temelju vrijednosti ćelije. Da je to dostupno, traka za pomicanje automatski bi prilagodila svoju najveću vrijednost kada se promijeni vrijednost ćelije.
Nešto je, kao što je prikazano u nastavku, tada moglo biti moguće:
Sve dok tim za Microsoft Office ne stavi na raspolaganje, ovaj savjet vam može pomoći da povežete najveću vrijednost trake za pomicanje s ćelijom.
Prilagodite maksimalnu vrijednost trake za pomicanje u Excelu
- Idite na karticu Developer -> Insert -> ActiveX Controls -> Scroll Bar (ActiveX Control)
- Nemate karticu za programere ?? Ovdje pročitajte kako dodati karticu za programere na vrpcu.
- Pritisnite Bilo gdje na svom radnom listu da biste umetnuli traku za pomicanje.
- Desnom tipkom miša kliknite traku za pomicanje i odaberite Svojstva.
- Povezanu ćeliju postavite kao C10 i zatvorite okvir svojstava.
- U ovom primjeru koristio sam C10. Možete imati drugu ćeliju u kojoj imate najveću vrijednost.
- Dvaput kliknite na traku za pomicanje. Otvorit će VBA Editor sa kodom koji izgleda ovako:
Private Sub ScrollBar1_Change () End Sub
- Dodajte redak tako da vaš kôd izgleda ovako:
Private Sub ScrollBar1_Change () Activesheet.Scrollbar1.Max = Raspon ("C7"). Vrijednost Kraj Sub
- Zatvorite prozor VBA Editor.
- Idite na karticu Developer i desnom tipkom miša kliknite gumb Design Mode.
- To je to!! Vaša traka za pomicanje je spremna za upotrebu.
Imajte na umu da budući da datoteka ima makronaredbu, datoteku morate spremiti u bilo koju od njih.xls ili .xlsm format.
Kada završite s postavljanjem, i AKO traka za pomicanje ne radi, slijedite ove korake:
- Idite na karticu Developer kliknite na Design Mode.
- Dvaput kliknite na traku za pomicanje.
- U VBA Editoru pritisnite F5 ili kliknite gumb Pokreni pod/korisnički obrazac.
- Zatvorite VBA Editor.
Pokušajte sami … Preuzmite datoteku