Овај водич ће вас научити како сакрити и открити радне листове помоћу ВБА.
Сакриј лист у ВБА
Да бисте сакрили лист у ВБА, користите својство Висибле радног листа.
Или поставите својство Висибле на ФАЛСЕ:
1 | Радни листови ("Лист1"). Висибле = Фалсе |
или подесите својство Висибле на клСхеетХидден:
1 | Радни листови ("Лист1"). Висибле = клСхеетХидден |
Ово је исто као да је корисник десним тастером миша кликнуо картицу радног листа и изабрао „сакриј“.
Откриј табелу
Да бисте открили лист у ВБА, користите својство Видљив радни лист:
1 | Радни листови („Лист1“). Видљиво = Тачно |
или
1 | Радни листови ("Лист1"). Видљив = клСхеетВисибле |
Скривене табеле можете видети ако кликнете десним тастером миша у области картице Радни лист:
Врло скривени листови
Својство Схеет Висибле има трећу опцију: клСхеетВериХидден:
1 | Радни листови („Лист1“). Видљив = клСхеетВериХидден |
Веома скривени листови су сакривени десним кликом у области картице Радни лист:
Овај код ће спречити корисника табеле да види картицу Радни лист при дну екрана. Такође скрива радни лист од корисника када десним тастером миша кликну на картице при дну. Једини начин да видите да ли радни лист постоји (или да откријете радни лист) је отварањем уређивача Висуал Басиц.
Откријте врло скривене листове
Врло скривени радни листови постају видљиви баш као и обични скривени радни листови:
1 | Радни листови ("Лист1"). Видљиво = Тачно |
или
1 | Радни листови ("Лист1"). Видљив = клСхеетВисибле |
Сакриј / Откриј листове у ВБА Едитор -у
Такође можете да промените својство Видљиви радни лист у ВБА Едитору:
Сакриј све картице радног листа
Можда ћете такође желети да потпуно сакријете подручје картице Радни лист како бисте спречили корисника да се креће до различитих радних листова. Сазнајте више о скривању картица радног листа.
Сакриј / Откриј листове у заштићеној радној свесци
Радна свеска мора бити незаштићена пре него што можете сакрити или сакрити радне листове. Да бисте уклонили заштиту структуре радне свеске, користите следећи код:
1 | АцтивеВоркбоок.Унпротецт |
Ако је структура ваше радне свеске заштићена лозинком, морате то учинити уместо тога:
1 | ТхисВоркбоок.Унпротецт "пассворд" |
Откриј све табеле
Ова процедура ће открити све радне листове у радној свесци, користећи за сваку петљу:
12345678 | Суб Унхиде_Алл_Схеетс ()Дим вс Ас ВорксхеетАцтивеВоркбоок.УнпротецтЗа сваки вс у радним листовимавс.Висибле = клСхеетВисиблеСледећиЕнд Суб |
Обратите пажњу да прво уклањамо заштиту радне свеске, само у случају да је заштићена лозинком.