Làm Cách Mã Hóa Dữ Liệu Trong Excel ? Cách Nhập (Mã Hóa) Dữ Liệu Trong Spss Từ Excel

Làm cách nào nhằm mã hóa / giải mã các ô đã chọn trong Excel?

Trong một trong những trường hợp, chúng ta cũng có thể muốn mã hóa một số trong những ô nhằm ngăn các ô được người tiêu dùng khác xem, làm bí quyết nào để chúng ta cũng có thể thực hiện cấp tốc chóng? bây chừ trong bài emcanbaove.edu.vnết này, tôi trình làng các thủ thuật để mau lẹ mã hóa và giải mã nội dung ô đã lựa chọn trong Excel.

Mã hóa hoặc giải thuật các ô đã chọn bằng VBA

Mã hóa hoặc lời giải các ô được lựa chọn với Kutools đến Excel

Đây là mã VBA hoàn toàn có thể nhanh nệm mã hóa hoặc lời giải các ô đã lựa chọn trong Excel.

1. Dấn Alt + F11 các phím để hiển thị Microsoft emcanbaove.edu.vnsual Basic cho những ứng dụng cửa sổ.

2. Bấm vào Chèn > Mô-đunvà dán mã VBA bên dưới vào mã new Mô-đun cửa ngõ sổ.

VBA: Mã hóa hoặc giải mã các ô đang chọn.

Private Function Str
To
Psd(By
Val Txt As String) As Long"Updateby
Kutoolsfor
Excel20151225 Dim x
Val As Long Dim x
Ch As Long Dim x
Sft1 As Long Dim x
Sft2 As Long Dim I As Integer Dim x
Len As Integer x
Len = Len(Txt) For I = 1 to lớn x
Len x
Ch = Asc(Mid$(Txt, I, 1)) x
Val = x
Val Xor (x
Ch * 2 ^ x
Sft1) x
Val = x
Val Xor (x
Ch * 2 ^ x
Sft2) x
Sft1 = (x
Sft1 + 7) hack 19 x
Sft2 = (x
Sft2 + 13) mod 23 Next I Str
To
Psd = x
Val
End Function
Private Function Encryption(By
Val Psd As String, By
Val In
Txt As String, Optional By
Val Enc As Boolean = True) As String Dim x
Offset As Long Dim x
Len As Integer Dim I As Integer Dim x
Ch As Integer Dim x
Out
Txt As String x
Offset = Str
To
Psd(Psd) Rnd -1 Randomize x
Offset x
Len = Len(In
Txt) For I = 1 to lớn x
Len x
Ch = Asc(Mid$(In
Txt, I, 1)) If x
Ch >= 32 và x
Ch 0 Then x
Enc = (x
Ret hack 2 = 1) For Each x
Cell In x
Rg If x
Cell.Value "" Then x
Cell.Value = Encryption(x
Psd, x
Cell.Value, x
Enc) end If Next kết thúc If
End Sub3. Kế tiếp nhấn F5 để thực hiện VBA và một vỏ hộp thoại nhảy ra nhằm chọn các ô nhằm mã hóa. Xem hình ảnh chụp màn hình:

4. Tiếp nối nhấn vào OK và nhập mật khẩu cho những ô được mã hóa trong một hộp thoại nhảy ra khác. Xem hình ảnh chụp màn hình:

5. Bấm vào OKvà kế tiếp trong vỏ hộp thoại vật dụng ba, nhập 1 để mã hóa các ô đã chọn, nếu bạn muốn giải mã những ô, hãy nhập 2. Xem hình ảnh chụp màn hình:

6. Bấm chuột OKvà những ô đã chọn được mã hóa. Xem ảnh chụp màn hình:

Với phương pháp trên nhằm mã hóa hoặc giải thuật ô khá phức tạp, nhưng nếu như khách hàng có Kutools mang lại Excel đã cài đặt đặt, chúng ta có thể sử dụng Mã hóa ô với Giải mã ô tiện ích để nhanh chóng xong xuôi công emcanbaove.edu.vnệc.

Xem thêm: Cách Điền Số Thứ Tự Trong Excel Nhanh Và Chính Xác Nhất, 3 Cách Đánh Số Thứ Tự Trong Excel Thông Dụng Nhất

Sau cài để miễn chi phí Kutools mang lại Excel, vui vẻ làm như sau:

1. Chọn các ô bạn có nhu cầu mã hóa với nhấp vào Kutools Plus > Mã hóa ô. Xem hình ảnh chụp màn hình:

2. Tiếp đến nhập và chứng thực mật khẩu trong Mã hóa ô và chọn một kiểu mã hóa vào Mask phần. Xem ảnh chụp màn hình:

3. Click chuột Ok or Đăng Nhậpvà bây giờ các ô đã chọn đã được mã hóa.

Nếu bạn cần giải thuật các ô, hãy chọn chúng cùng nhấp vào Kutools Plus> Giải mãvà nhập password để giải thuật chúng. Xem ảnh chụp màn hình: