{"id":6687,"date":"2024-12-21T15:56:23","date_gmt":"2024-12-21T15:56:23","guid":{"rendered":"https:\/\/blog.ezworkapp.com\/index.php\/2024\/12\/21\/cach-thiet-lap-password-de-bao-ve-nhung-trang-an-trong-excel\/"},"modified":"2024-12-21T15:56:23","modified_gmt":"2024-12-21T15:56:23","slug":"cach-thiet-lap-password-de-bao-ve-nhung-trang-an-trong-excel","status":"publish","type":"post","link":"https:\/\/blog.ezworkapp.com\/index.php\/2024\/12\/21\/cach-thiet-lap-password-de-bao-ve-nhung-trang-an-trong-excel\/","title":{"rendered":"C\u00e1ch thi\u1ebft l\u1eadp password \u0111\u1ec3 b\u1ea3o v\u1ec7 nh\u1eefng trang \u1ea9n trong Excel"},"content":{"rendered":"
\n

Trong b\u00e0i vi\u1ebft n\u00e0y, H\u1ecdc Excel Online s\u1ebd h\u01b0\u1edbng d\u1eabn c\u00e1ch b\u1ea3o v\u1ec7 nh\u1eefng trang t\u00ednh \u1ea9n trong Excel b\u1eb1ng Password.<\/p>\n

Thi\u1ebft l\u1eadp password b\u1ea3o v\u1ec7 trang t\u00ednh \u1ea9n v\u1edbi ch\u1ee9c n\u0103ng VeryHidden<\/strong><\/p>\n

Th\u00f4ng th\u01b0\u1eddng, b\u1ea1n c\u00f3 th\u1ec3 d\u00f9ng h\u00e0m VeryHidden<\/strong> \u0111\u1ec3 \u1ea9n trang tr\u01b0\u1edbc, sau \u0111\u00f3 m\u1edbi thi\u1ebft l\u1eadp password cho ch\u00fang. H\u00e3y l\u00e0m nh\u01b0 sau:<\/p>\n

1. M\u1edf b\u1ea3ng t\u00ednh, nh\u1ea5n ALT+F11 \u0111\u1ec3 m\u1edf c\u1eeda s\u1ed5 Microsoft Visual Basic for Applications<\/strong>.<\/p>\n

2. Trong c\u1eeda s\u1ed5 Microsoft Visual Basic for Applications, <\/strong>nh\u1ea5n View<\/strong> > Project Explorer<\/strong> v\u00e0\u00a0Properties Window<\/strong> \u0111\u1ec3 m\u1edf h\u1ed9p tho\u1ea1i.<\/p>\n

\"doc-protect-hidden-sheets-01\"<\/p>\n

3. Trong c\u1eeda s\u1ed5 tho\u1ea1i Project-VBAProject<\/strong>, ch\u1ecdn trang t\u00ednh b\u1ea1n mu\u1ed1n \u1ea9n, \u1edf ph\u1ea7n Properties<\/strong> c\u1ee7a trang t\u00ednh, nh\u1ea5n m\u0169i t\u00ean \u0111\u1ec3 m\u1edf danh s\u00e1ch t\u00f9y ch\u1ecdn trong ph\u1ea7n Visible<\/strong>, ch\u1ecdn xlSheetVeryHidden<\/strong>.<\/p>\n

\"doc-protect-hidden-sheets-02\"<\/p>\n

\n
\n
\n
\n<\/a>\n<\/div>\n<\/div>\n
\n
\n
\n
\n<\/a>\n<\/div>\n<\/div>\n

4. Sau khi \u1ea9n trang t\u00ednh, b\u1ea1n c\u00f3 th\u1ec3 t\u1ea1o password cho ch\u00fang. Trong c\u1ee7a s\u1ed5 Microsoft Visual Basic for Applications<\/strong>, nh\u1ea5n Insert<\/strong> > Module<\/strong> \u0111\u1ec3 m\u1edf m\u1ed9t module m\u1edbi, nh\u1ea5n Tools<\/strong> > VBAProject Properties<\/strong>.<\/p>\n

\"doc-protect-hidden-sheets-03\"<\/p>\n

5. Trong h\u1ed9p tho\u1ea1i VBAProject-Project Properties<\/strong>, ch\u1ecdn tab Protection<\/strong>, \u0111\u00e1nh d\u1ea5u Lock project for viewing<\/strong>, cu\u1ed1i c\u00f9ng, nh\u1eadp v\u00e0 x\u00e1c nh\u1eadn password trong ph\u1ea7n Password to view project properties.<\/strong><\/p>\n

\"doc-protect-hidden-sheets-04\"<\/p>\n

6. Nh\u1ea5n OK v\u00e0 tho\u00e1t c\u1eeda s\u1ed5, \u0111\u00f3ng c\u1eeda s\u1ed5 Microsoft Visual Basic for Applications<\/strong>.<\/p>\n

7. L\u01b0u b\u1ea3ng t\u00ednh d\u01b0\u1edbi d\u1ea1ng Excel Macro-Enabled Workbook<\/strong> v\u00e0 \u0111\u00f3ng n\u00f3.<\/p>\n

<\/p>\n

8. V\u00e0o l\u1ea7n m\u1edf b\u1ea3ng t\u00ednh ti\u1ebfp theo, n\u1ebfu mu\u1ed1n hi\u1ec3n th\u1ecb nh\u1eefng trang t\u00ednh \u0111\u00e3 \u1ea9n, b\u1ea1n ph\u1ea3i nh\u1eadp password.<\/p>\n

<\/p>\n

Thi\u1ebft l\u1eadp password \u0111\u1ec3 \u1ea9n trang t\u00ednh b\u1eb1ng m\u00e3 VBA<\/strong><\/p>\n

\u0110\u1ec3 thi\u1ebft l\u1eadp password cho trang \u1ea9n, b\u1ea1n c\u0169ng c\u00f3 th\u1ec3 d\u00f9ng m\u00e3 VBA:<\/p>\n

1. \u1ea8n trang t\u00ednh b\u1ea1n mu\u1ed1n.<\/p>\n

2. Nh\u1ea5n ALT+F11 \u0111\u1ec3 m\u1edf c\u1eeda s\u1ed5 Microsoft Visual Basic for Applications<\/strong>.<\/p>\n

3. Ch\u1ecdn\u00a0ThisWorkbook<\/strong> t\u1eeb\u00a0Project Explorer<\/strong>, nh\u1ea5n chu\u1ed9t 2 l\u1ea7n \u0111\u1ec3 m\u1edf Module<\/strong>, d\u00e1n v\u00e0o \u0111o\u1ea1n m\u00e3 sau<\/p>\n

\n
Private<\/code> Sub<\/code> Workbook_SheetActivate(<\/code>ByVal<\/code> Sh <\/code>As<\/code> Object<\/code>)<\/code><\/div>\n
Dim<\/code> xSheetName <\/code>As<\/code> String<\/code><\/div>\n
xSheetName = <\/code>\"Sheet1\"<\/code><\/div>\n
If<\/code> Application.ActiveSheet.Name = xSheetName <\/code>Then<\/code><\/div>\n
\u00a0\u00a0\u00a0\u00a0<\/code>Application.EnableEvents = <\/code>False<\/code><\/div>\n
\u00a0\u00a0\u00a0\u00a0<\/code>Application.ActiveSheet.Visible = <\/code>False<\/code><\/div>\n
\u00a0\u00a0\u00a0\u00a0<\/code>xTitleId = <\/code>\"KutoolsforExcel\"<\/code><\/div>\n
\u00a0\u00a0\u00a0\u00a0<\/code>response = Application.InputBox(<\/code>\"Password\"<\/code>, xTitleId, <\/code>\"\"<\/code>, Type:=2)<\/code><\/div>\n
\u00a0\u00a0\u00a0\u00a0<\/code>If<\/code> response = <\/code>\"123456\"<\/code> Then<\/code><\/div>\n
\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0<\/code>Application.Sheets(xSheetName).Visible = <\/code>True<\/code><\/div>\n
\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0<\/code>Application.Sheets(xSheetName).<\/code>Select<\/code><\/div>\n
\u00a0\u00a0\u00a0\u00a0<\/code>End<\/code> If<\/code><\/div>\n
End<\/code> If<\/code><\/div>\n
Application.Sheets(xSheetName).Visible = <\/code>True<\/code><\/div>\n
Application.EnableEvents = <\/code>True<\/code><\/div>\n
End<\/code> Sub<\/code><\/div>\n
<\/div>\n
<\/div>\n
Ch\u00fa \u00fd: <\/strong>Trong \u0111o\u1ea1n m\u00e3 tr\u00ean, Sheet1<\/strong> trong xSheetName = \u201cSheet1\u201d<\/strong> l\u00e0 t\u00ean trang t\u00ednh b\u1ecb \u1ea9n m\u00e0 b\u1ea1n mu\u1ed1n thi\u1ebft l\u1eadp b\u1ea3o v\u1ec7, v\u00e0 123456<\/strong> trong If response = \u201c123456\u201d Then<\/strong> l\u00e0 password. B\u1ea1n c\u00f3 th\u1ec3 thay \u0111\u1ed5i ch\u00fang theo nhu c\u1ea7u.<\/div>\n
4. B\u00e2y gi\u1edd n\u1ebfu mu\u1ed1n hi\u1ec3n th\u1ecb trang t\u00ednh \u1ea9n, m\u1ed9t h\u1ed9p tho\u1ea1i hi\u1ec7n ra y\u00eau c\u1ea7u nh\u1eadp password. H\u1ed9p tho\u1ea1i n\u00e0y hi\u1ec7n ra m\u1ed7i khi b\u1ea1n nh\u1ea5p xem trang t\u00ednh \u1ea9n.<\/div>\n<\/div>\n<\/div>\n
\n

Click \u0111\u0103ng k\u00fd h\u1ecdc t\u1ea1i:<\/p>\n

T\u1ea5t c\u1ea3 kho\u00e1 h\u1ecdc\u00a0\ud83d\udcd6<\/span><\/a><\/p>\n

H\u01b0\u1edbng d\u1eabn k\u00edch ho\u1ea1t<\/a><\/p>\n

HKD H\u1ecdc Excel Online
S\u1ed1 \u0110K: 17A80048102<\/p>\n<\/div>\n

\n

\u00a9 document.currentScript.insertAdjacentHTML(‘afterend’, ” + new Intl.DateTimeFormat(document.documentElement.lang, {year: ‘numeric’}).format() + ”); H\u1ecdc Excel Online. All rights reserved.<\/p>\n<\/div>\n","protected":false},"excerpt":{"rendered":"

\n
\n
\n<\/a>\n<\/div>\n","protected":false},"author":1,"featured_media":6688,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[3],"tags":[],"class_list":["post-6687","post","type-post","status-publish","format-standard","has-post-thumbnail","hentry","category-excel-nang-cao"],"_links":{"self":[{"href":"https:\/\/blog.ezworkapp.com\/index.php\/wp-json\/wp\/v2\/posts\/6687","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/blog.ezworkapp.com\/index.php\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/blog.ezworkapp.com\/index.php\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/blog.ezworkapp.com\/index.php\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/blog.ezworkapp.com\/index.php\/wp-json\/wp\/v2\/comments?post=6687"}],"version-history":[{"count":0,"href":"https:\/\/blog.ezworkapp.com\/index.php\/wp-json\/wp\/v2\/posts\/6687\/revisions"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/blog.ezworkapp.com\/index.php\/wp-json\/wp\/v2\/media\/6688"}],"wp:attachment":[{"href":"https:\/\/blog.ezworkapp.com\/index.php\/wp-json\/wp\/v2\/media?parent=6687"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/blog.ezworkapp.com\/index.php\/wp-json\/wp\/v2\/categories?post=6687"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/blog.ezworkapp.com\/index.php\/wp-json\/wp\/v2\/tags?post=6687"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}