Chương 8: Phím Tắt Và Thủ Thuật Thủ thuật 1. 2. Giấu bảng tính Excel chuyên nghiệp Trong công việc văn phòng, nếu bạn cần giấu một bảng tính trong tài liệu Excel mà không muốn người khác dùng lệnh Format Sheet Unhide để xem bảng tính, mà theo cách thông thường khi bạn dùng lệnh Format Sheet Hide để giấu các bảng tính (nếu không được bảo vệ bằng mật khẩu) thì chỉ cần người không chuyên thôi cũng đã có thể dùng lệnh Format Sheet UnHide để làm cho nó hiện ra bảng tính rồi . | Excel 2010 Chương 8 Phím Tắt Và Thủ Thuật Thủ thuật 1. Dịch số tiền về chữ Chuyển số thành chữ Bước 1. Mở tập tin cần chuyển Nhấn tổ hợp phím Alt F11 để mở trình soạn thảo VBA của Excell Bước 2. Nhấp chuột phải lên VBA Project Insert Module và dán đoạn mã bên dưới vào cửa sổ của Module mới chèn Function ConvertCurrencyToVietnamese ByVal MyNumber Dim Temp Dim Dollars Cents Dim DecimalPlace Count ReDim Place 9 As String Place 2 Nghin Place 3 Trieu 1 Excel 2010 Place 4 Ty Place 5 Ngan ty Convert MyNumber to a string trimming extra spaces. MyNumber Trim Str MyNumber Find decimal place. DecimalPlace InStr MyNumber . If we find decimal place. If DecimalPlace 0 Then Convert cents Temp Left Mid MyNumber DecimalPlace 1 00 2 Cents ConvertTens Temp Strip off cents from remainder to convert. MyNumber Trim Left MyNumber DecimalPlace - 1 End If Count 1 Do While MyNumber Convert last 3 digits of MyNumber to English dollars. Temp ConvertHundreds Right MyNumber 3 If Temp Then Dollars Temp Place Count Dollars If Len MyNumber 3 Then 2 2 Excel 2010 Remove last 3 converted digits from MyNumber. MyNumber Left MyNumber Len MyNumber - 3 Else MyNumber End If Count Count 1 Loop Clean up dollars. Select Case Dollars Case Dollars khong Nghin Case One Dollars Mot Nghin Case Else Dollars Dollars Nghin End Select Clean up cents. Select Case Cents Case Cents va khong Dong
