{"id":8825,"date":"2024-12-29T05:41:40","date_gmt":"2024-12-29T05:41:40","guid":{"rendered":"https:\/\/blog.ezworkapp.com\/index.php\/2024\/12\/29\/tao-mot-guid-bang-vba-trong-excel\/"},"modified":"2024-12-29T05:41:40","modified_gmt":"2024-12-29T05:41:40","slug":"tao-mot-guid-bang-vba-trong-excel","status":"publish","type":"post","link":"https:\/\/blog.ezworkapp.com\/index.php\/2024\/12\/29\/tao-mot-guid-bang-vba-trong-excel\/","title":{"rendered":"T\u1ea1o m\u1ed9t GUID b\u1eb1ng VBA trong Excel"},"content":{"rendered":"
\n

Trong qu\u00e1 tr\u00ecnh s\u1eed d\u1ee5ng Excel, s\u1ebd c\u00f3 l\u00fac b\u1ea1n mu\u1ed1n t\u1ea1o ra m\u1ed9t c\u00e1i t\u00ean, m\u1ed9t \u0111\u1ecba ch\u1ec9 duy nh\u1ea5t, \u0111\u1ecba ch\u1ec9 n\u00e0y ch\u1ec9 c\u00f3 m\u1ed9t v\u00e0 kh\u00f4ng bao gi\u1edd l\u1eb7p l\u1ea1i, \u0111\u1ecba ch\u1ec9 n\u00e0y kh\u00f4ng ch\u1ee9a th\u00f4ng tin g\u00ec kh\u00e1c v\u00e0 ch\u1ec9 nh\u1eb1m m\u1ee5c \u0111\u00edch ph\u00e2n bi\u1ec7t gi\u1eefa c\u00e1c d\u00f2ng trong Excel ch\u1eb3ng h\u1ea1n. L\u00e0m th\u1ebf n\u00e0o \u0111\u1ec3 ch\u00fang ta c\u00f3 th\u1ec3 t\u1ea1o ra 1 \u0111\u1ecba ch\u1ec9 nh\u01b0 v\u1eady \u1edf trong Excel?<\/p>\n

M\u1ed7i th\u1eddi \u0111i\u1ec3m \u0111\u1ec1u l\u00e0 duy nh\u1ea5t, v\u1edbi suy ngh\u0129 nh\u01b0 v\u1eady, \u1edf trong Excel ch\u00fang ta c\u00f3 th\u1ec3 \u0111\u01a1n gi\u1ea3n d\u00f9ng h\u00e0m sau \u0111\u00e2y \u0111\u1ec3 t\u1ea1o th\u00e0nh 1 ID duy nh\u1ea5t:<\/p>\n

=\"ID\" & TEXT(NOW(),\"yyyymmddhhmmss\")<\/code><\/strong><\/p>\n

\u1ede \u0111\u00e2y, c\u00e1c b\u1ea1n c\u00f3 th\u1ec3 tu\u1ef3 \u00fd thay ph\u1ea7n ID<\/code>. Nh\u01b0ng n\u1ebfu d\u1eef li\u1ec7u c\u1ee7a ch\u00fang ta \u0111\u01b0\u1ee3c th\u00eam v\u00e0o nhanh h\u01a1n 1 gi\u00e2y \u0111\u1ed3ng h\u1ed3, th\u00ec c\u00e1ch n\u00e0y s\u1ebd kh\u00f4ng d\u00f9ng \u0111\u01b0\u1ee3c!<\/p>\n

C\u00e1i ch\u00fang ta c\u1ea7n \u1edf \u0111\u00e2y l\u00e0 GUID<\/strong><\/a> \u2013 Globally Unique Identifier<\/strong><\/p>\n

M\u1ed9t GUID<\/strong> c\u00f3 d\u1ea1ng nh\u01b0 sau:<\/p>\n

3F2504E0-4F89-41D3-9A0C-0305E82C3301<\/code><\/p>\n

ho\u1eb7c<\/p>\n

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

3F2504E04F8941D39A0C0305E82C3301<\/code><\/p>\n

ho\u1eb7c<\/p>\n

{<\/span>3F2504E0-4F89-41D3-9A0C-0305E82C3301<\/span>}<\/span><\/code><\/p>\n

N\u1ebfu ai hay ngh\u1ecbch Windows Registry ch\u1eafc h\u1eb3n \u0111\u00e3 c\u00f3 l\u1ea7n nh\u00ecn th\u1ea5y nh\u1eefng d\u00e3y s\u1ed1 t\u01b0\u01a1ng t\u1ef1 nh\u01b0 th\u1ebf n\u00e0y r\u1ed3i. Theo s\u00e1ch n\u00f3i th\u00ec m\u1ed9t GUID kh\u00f4ng h\u1eb3n s\u1ebd l\u00e0 duy nh\u1ea5t, nh\u01b0ng t\u1ec9 l\u1ec7 c\u00f3 2 GUID tr\u00f9ng nhau v\u00e0o kho\u1ea3ng 1\/2^122<\/code> \u2013 n\u1ebfu b\u1ea1n hi\u1ec3u con s\u1ed1 n\u00e0y nh\u1ecf \u0111\u1ebfn m\u1ee9c n\u00e0o v\u00e0 t\u1ed5ng s\u1ed1 GUID nhi\u1ec1u \u0111\u1ebfn m\u1ee9c n\u00e0o khi so s\u00e1nh v\u1edbi vi\u1ec7c tr\u00ean 1 Excel Sheet phi\u00ean b\u1ea3n 2010 c\u00f3 kho\u1ea3ng 2^34<\/code> \u00f4.<\/p>\n

Tin vui l\u00e0 ch\u00fang ta ho\u00e0n to\u00e0n c\u00f3 th\u1ec3 t\u1ea1o ra GUID trong Excel b\u1eb1ng 2 c\u00e1ch v\u1edbi 1 ch\u00fat gi\u00fap \u0111\u1ee1 c\u1ee7a VBA nh\u01b0 sau<\/p>\n<\/p>\n

View the code on Gist<\/a>.<\/div>\n

Trong \u0111o\u1ea1n code tr\u00ean, c\u00f3 2 c\u00e1ch \u0111\u1ec3 t\u1ea1o ra GUID<\/strong> l\u00e0 s\u1eed d\u1ee5ng h\u00e0m genGUID()<\/code><\/strong> v\u00e0 h\u00e0m CreateGUID()<\/code><\/strong>. \u0110\u1ec3 cho c\u00e1c b\u1ea1n d\u1ec5 ch\u1ecdn l\u1ef1a h\u00e0m n\u00e0o khi s\u1eed d\u1ee5ng v\u00e0o 1 project c\u1ee7a c\u00e1c b\u1ea1n th\u00ec m\u00ecnh \u0111\u00e3 th\u00eam v\u00e0o 1 benchmark nh\u1ecf \u0111\u1ec3 \u0111\u00e1nh gi\u00e1 t\u1ed1c \u0111\u1ed9 c\u1ee7a 2 h\u00e0m n\u00e0y. N\u1ebfu mu\u1ed1n bi\u1ebft k\u1ebft qu\u1ea3 benchmark v\u00e0 xem h\u00e0m n\u00e0o ph\u00f9 h\u1ee3p h\u01a1n cho nhu c\u1ea7u c\u1ee7a b\u1ea1n, xin hay download file Excel n\u00e0y<\/strong><\/a> v\u1ec1.<\/p>\n

L\u01b0u \u00fd<\/strong>: m\u00f4i tr\u01b0\u1eddng ch\u1ea1y benchmark l\u00e0 Excel 2010<\/strong>.<\/p>\n

\n

Xem nhanh<\/p>\n