Chức năng định dạng VBA

Hướng dẫn này sẽ trình bày cách sử dụng chức năng Định dạng.

Chức năng định dạng

Định dạng số với các định dạng được xác định trước

Chức năng định dạng có thể chuyển đổi một số thành chuỗi được định dạng với các định dạng số có tên được xác định trước. Các định dạng được xác định trước đó là Tiền tệ, Cố định, Chuẩn, Phần trăm, Khoa học, Có / Không, Đúng / Sai và Bật / Tắt.

12345678910111213141516171819202122232425262728293031 Định dạng phụExample_1 ()Định dạng MsgBox (1234567.8) 'Kết quả là: 1234567.8'Định dạng chỉ giữ nguyên sốĐịnh dạng MsgBox (1234567.8, "Tiền tệ") 'Kết quả là: $ 1.234.567,80'Tiền tệ sử dụng cài đặt tiền tệ của hệ thốngĐịnh dạng MsgBox (1234567.8, "Đã sửa") 'Kết quả là: 1234567.80'Đã sửa: Ít nhất một chữ số trước dấu thập phân và'sử dụng cài đặt hệ thống cho phần thập phânĐịnh dạng MsgBox (1234567.8, "Chuẩn") 'Kết quả là: 1.234.567,80'Tiêu chuẩn: Hàng nghìn dải phân cách và hệ thống tiêu chuẩnĐịnh dạng MsgBox (1234567.8, "Phần trăm") 'Kết quả là: 123456780.00%'Phần trăm, nhân với 100 với% và hệ thống tiêu chuẩn.Định dạng MsgBox (1234567.8, "Scientific") 'Kết quả là: 1.23E + 06'Ký hiệu khoa họcĐịnh dạng MsgBox (1234567.8, "Có / Không") 'Kết quả là: Có'Không nếu số bằng 0Định dạng MsgBox (1234567.8, "Đúng / Sai") 'Kết quả là: Đúng'Sai nếu số bằng 0Định dạng MsgBox (1234567.8, "Bật / Tắt") 'Kết quả là: Bật'Tắt nếu số bằng 0Kết thúc Sub

Định dạng số với định dạng do người dùng xác định

Chức năng định dạng có thể chuyển đổi một số thành một chuỗi, định dạng các định dạng số do người dùng xác định. 0 là phần giữ chỗ chữ số hiển thị một chữ số hoặc số không. # là phần giữ chỗ chữ số hiển thị một chữ số hoặc không có chữ số nào. Dấu chấm (.) Là phần giữ chỗ thập phân,% là phần trăm giữ chỗ và dấu phẩy (,) là dấu phân cách hàng nghìn. Văn bản có thể được thêm vào trong định dạng bằng cách sử dụng dấu ngoặc kép (“”) và một ký tự đơn có thể được thêm vào nếu nó được sử dụng sau dấu gạch chéo ngược (\).

1234567891011 Định dạng phụExample_2 ()Định dạng MsgBox (7.8, "000.00") 'Kết quả là: 007.80Định dạng MsgBox (12347.8356, "000.00") 'Kết quả là: 12347.84Định dạng MsgBox (7.8, "###. ##") 'Kết quả là: 7.8Định dạng MsgBox (12347.8356, "###. ##") 'Kết quả là: 12347.84Định dạng MsgBox (7,8, "\ $. 00") 'Kết quả là: $ 7,80Định dạng MsgBox (1237.835, "ABA0.00") 'Kết quả là: ABA1237.84Định dạng MsgBox (12347.8356, "000.00%") 'Kết quả là: 1234783.56%Định dạng MsgBox (12347.8356, "% 000.00") 'Kết quả là:% 12347.84Kết thúc Sub

Định dạng số tùy thuộc vào giá trị

Hàm định dạng có thể có các phần khác nhau bằng cách sử dụng các quy tắc định dạng khác nhau cho số dương, số âm, số 0 và Null. Các phần này được phân tách bằng dấu chấm phẩy.

1234567 Định dạng phụExample_3 ()Định dạng MsgBox (7.8, "000.00; (000.00); \ z \ e \ r \ o; nothing") 'Kết quả là: 007.80Định dạng MsgBox (-7.8, "000.00; (000.00); \ z \ e \ r \ o; nothing") 'Kết quả là: (007.80)Định dạng MsgBox (0, "000.00; (000.00); \ z \ e \ r \ o; nothing") 'Kết quả là: 0Định dạng MsgBox (Null, "000.00; (000.00); \ z \ e \ r \ o; nothing") 'Kết quả là: không có gìKết thúc Sub

Định dạng ngày với các định dạng được xác định trước

Chức năng định dạng có thể định dạng ngày tháng với các định dạng xác định trước khác nhau. Các định dạng đó là ngày dài, ngày trung bình và ngày ngắn và cũng có thời gian dài, trung bình và ngắn.

1234567891011121314 Định dạng phụExample_4 ()Dim DateEx As DateDateEx = # 4/18/2020 7:35:56 PM #Định dạng MsgBox (DateEx, "Ngày chung") 'Kết quả là: 4/18/2020 7:35:56 PMĐịnh dạng MsgBox (DateEx, "Long Date") 'Kết quả là: Thứ bảy, ngày 18 tháng 4 năm 2022Định dạng MsgBox (DateEx, "Ngày trung bình") 'Kết quả là: 18-04-20Định dạng MsgBox (DateEx, "Ngày ngắn") 'Kết quả là: 4/18/2020Định dạng MsgBox (DateEx, "Long Time") 'Kết quả là: 7:35:56 PMĐịnh dạng MsgBox (DateEx, "Thời gian trung bình") 'Kết quả là: 07:35 PMĐịnh dạng MsgBox (DateEx, "Thời gian ngắn") 'Kết quả là: 19:35Kết thúc Sub

Định dạng ngày với định dạng do người dùng xác định

Chức năng định dạng có thể định dạng ngày tháng với các định dạng do người dùng xác định. Các ký tự như d, m, y, w, q có thể được sử dụng để tạo các định dạng ngày tùy chỉnh.

123456789101112131415161718192021222324 Định dạng phụExample_5 ()Dim DateEx As DateDateEx = # 4/18/2020 7:35:56 PM #Định dạng MsgBox (DateEx, "m / d / yy") 'Kết quả là: 4/18/2020Định dạng MsgBox (DateEx, "mm-dd-yy") 'Kết quả là: 04-18-2020Định dạng MsgBox (DateEx, "mmm-dd-yy") 'Kết quả là: Apr-18-2020Định dạng MsgBox (DateEx, "mmmm-dd-yy") 'Kết quả là: April-18-2020Định dạng MsgBox (DateEx, "mm-ddd-yy") 'Kết quả là: 04-Sat-2020Định dạng MsgBox (DateEx, "mm-dddd-yy") 'Kết quả là: 04-Saturday-2020Định dạng MsgBox (DateEx, "y")'Kết quả là: 109'số ngày trong năm 1-366Định dạng MsgBox (DateEx, "ww")'Kết quả là: 16'số tuần trong năm 1-52Định dạng MsgBox (DateEx, "q")'Kết quả là: 2'quý trong năm 1-4Kết thúc Sub

Các ký tự như h, n, s và am, pm kết hợp có thể được sử dụng để tạo định dạng thời gian tùy chỉnh.

123456789101112 Định dạng phụExample_6 ()Dim DateEx As DateDateEx = # 4/18/2020 7:06:05 PM #Định dạng MsgBox (DateEx, "h: n: s") 'Kết quả là: 19: 6: 5Định dạng MsgBox (DateEx, "hh: nn: ss") 'Kết quả là: 19:06:05Định dạng MsgBox (DateEx, "hh: nn: ss am / pm") 'Kết quả là: 07:06:05 chiềuĐịnh dạng MsgBox (DateEx, "hh: nn: ss AM / PM") Kết quả là: 07:06:05 PMĐịnh dạng MsgBox (DateEx, "hh: nn: ss a / p") 'Kết quả là: 07:06:05 pĐịnh dạng MsgBox (DateEx, "hh: nn: ss A / P") 'Kết quả là: 07:06:05 PKết thúc Sub

Định dạng để dễ đọc hơn

Chức năng định dạng có thể định dạng chuỗi hoặc số để dễ đọc hơn. @ là một trình giữ chỗ ký tự được sử dụng để hiển thị một ký tự hoặc khoảng trắng. & là một trình giữ chỗ ký tự được sử dụng để hiển thị một ký tự hoặc không có gì. ! có thể được sử dụng để sử dụng trình giữ chỗ ký tự từ trái sang phải và có thể được sử dụng để thực thi chữ thường hoặc chữ hoa. Có thể hữu ích trong việc định dạng số điện thoại hoặc các số lớn khác mà không làm thay đổi giá trị ban đầu.

12345678910111213141516171819202122 Định dạng phụExample_7 ()Dim StrEx As chuỗiStrEx = "ABCdef"Định dạng MsgBox (StrEx, "- @@@ - @@ - @@") 'Kết quả là: - AB-Cd-efĐịnh dạng MsgBox (StrEx, "- &&& - && - &&") 'Kết quả là: -AB-Cd-ef'Bắt đầu từ phải sang trái.Định dạng MsgBox (StrEx, "- @@@ - @@ - @@ - @@") 'Kết quả là: - -AB-Cd-efĐịnh dạng MsgBox (StrEx, "- &&& - && - && - &&") 'Kết quả là: --AB-Cd-ef'Bắt đầu từ phải sang trái. Khi hết ký tự @ thêm dấu cách và & không thêm gìĐịnh dạng MsgBox (StrEx, "! - @@@ - @@ - @@ - @@") 'Kết quả là: -ABC-de-f -Định dạng MsgBox (StrEx, "! - &&& - && - && - &&") 'Kết quả là: -ABC-de-f'Bắt đầu từ trái sang phải vì!Định dạng MsgBox (StrEx, ">") 'Kết quả là: ABCDEFĐịnh dạng MsgBox (StrEx, "<") 'Kết quả là: abcdefĐịnh dạng MsgBox (1234567890, "@@@ - @@@ - @@@@") 'Kết quả là: 123-456-7890Định dạng MsgBox (1234567890, "@@@@ - @@@ - @@@") 'Kết quả là: 1234-567-890Kết thúc Sub

Định dạng mẫu trong ô trang tính

Chức năng định dạng có thể được sử dụng trong mã VBA và cả trong các ô của trang tính. Chọn ô hoặc phạm vi ô và làm theo mục nhập menu Định dạng Ô> Tùy chỉnh. Có nhiều định dạng do người dùng xác định và người dùng cũng có thể tạo các định dạng tùy chỉnh của riêng mình.

Định dạng mẫu bằng công thức văn bản

Hàm định dạng có thể thay đổi trực tiếp định dạng của giá trị bên trong mã VBA. Chúng ta cũng có thể sử dụng công thức Text trong excel để có được kết quả tương tự bằng cách sử dụng WorksheetFunction.Text.

1234567891011 Định dạng phụExample_8 ()Định dạng MsgBox (7.8, "000.00")'Kết quả là: 007,80MsgBox WorksheetFunction.Text (7.8, "000.00")'Kết quả là: 007,80Định dạng MsgBox (7.8, "###. ##")'Kết quả là: 7.8MsgBox WorksheetFunction.Text (7.8, "###. ##")'Kết quả là: 7.8Kết thúc Sub

Bạn sẽ giúp sự phát triển của trang web, chia sẻ trang web với bạn bè

wave wave wave wave wave