Innehållsförteckning
Jag undrar ofta varför det inte finns någon bestämmelse för att justera det maximala värdet för en rullningslist i Excel baserat på ett cellvärde. Hade detta varit tillgängligt skulle en rullningslist automatiskt justera sitt maximala värde när cellvärdet ändras.
Något, som visas nedan, kunde då ha varit möjligt:
Fram till dess att det inte görs tillgängligt av Microsoft Office -teamet kan detta tips hjälpa dig att länka det maximala värdet för en rullningslist till en cell.
Justera rullningsfältets maximala värde i Excel
- Gå till fliken Utvecklare -> Infoga -> ActiveX -kontroller -> Rullningsfält (ActiveX -kontroll)
- Har du inte utvecklarfliken ?? Läs här om hur du lägger till utvecklarfliken i menyfliksområdet.
- Klicka på Anywhere i ditt kalkylblad för att infoga rullningslisten.
- Högerklicka på rullningslisten och välj Egenskaper.
- Ställ in den länkade cellen som C10 och stäng egenskapsrutan.
- Jag har använt C10 i det här exemplet. Du kan ha en annan cell där du har det maximala värdet.
- Dubbelklicka på rullningslisten. Det öppnar VBA Editor med en kod som ser ut så här:
Privat sub ScrollBar1_Change () Avsluta sub
- Lägg till en rad så att din kod ser ut så här:
Private Sub ScrollBar1_Change () Activesheet.Scrollbar1.Max = Range ("C7"). Value End Sub
- Stäng fönstret VBA Editor.
- Gå till fliken Utvecklare och vänsterklicka på knappen Designläge.
- Det är allt!! You Scroll Bar är redo att användas.
Observera att eftersom filen har ett makro måste du spara filen i antingen.xls eller.xlsm formatera.
När du är klar med att konfigurera detta och OM rullningslisten fungerar inte, följ dessa steg:
- Gå till fliken Utvecklare klicka på Design Mode.
- Dubbelklicka på rullningslisten.
- I VBA -redigeraren trycker du på F5 eller klickar på knappen Kör sub-/användareformulär.
- Stäng VBA -redigeraren.
Prova själv … Ladda ner filen