Indholdsfortegnelse
Jeg spekulerer ofte på, hvorfor der ikke er nogen bestemmelse om at justere den maksimale værdi af en rullebjælke i Excel baseret på en celleværdi. Havde dette været tilgængeligt, ville en rullebjælke automatisk justere sin maksimale værdi, når celleværdien ændres.
Noget, som vist herunder, kunne da have været muligt:
Indtil det ikke er gjort tilgængeligt af Microsoft Office -teamet, kan dette tip hjælpe dig med at knytte den maksimale værdi for en rullepanel til en celle.
Juster rullelinjens maksimale værdi i Excel
- Gå til fanen Udvikler -> Indsæt -> ActiveX -kontrolelementer -> Rulelinje (ActiveX -kontrol)
- Har du ikke fanen udvikler ?? Læs her, hvordan du tilføjer fanen Udvikler til båndet.
- Klik på Anywhere i dit regneark for at indsætte rullelinjen.
- Højreklik på rullefeltet, og vælg Egenskaber.
- Indstil den sammenkædede celle som C10, og luk egenskabsboksen.
- Jeg har brugt C10 i dette eksempel. Du kan have en anden celle, hvor du har den maksimale værdi.
- Dobbeltklik på rullelinjen. Det åbner VBA Editor med en kode, der ser sådan ud:
Privat under ScrollBar1_Change () Afslut sub
- Tilføj en linje, så din kode ser sådan ud:
Private Sub ScrollBar1_Change () Activesheet.Scrollbar1.Max = Range ("C7"). Værdi Slut Sub
- Luk vinduet VBA Editor.
- Gå til fanen Udvikler, og venstreklik på knappen Designtilstand.
- Det er det!! You Scroll Bar er klar til brug.
Bemærk, at da filen har en makro, skal du gemme filen i enten.xls eller.xlsm format.
Når du er færdig med at konfigurere dette, og HVIS rullepanelet fungerer ikke, følg disse trin:
- Gå til fanen Udvikler, klik på Designtilstand.
- Dobbeltklik på rullefeltet.
- I VBA Editor, tryk på F5, eller klik på knappen Kør sub/bruger formular.
- Luk VBA Editor.
Prøv det selv … Download filen