Hỏi Cách không cho lưu file excel

Liên hệ QC

toidjtjmtoi

Thành viên chính thức
Tham gia
21/2/09
Bài viết
59
Được thích
0
Mình hỏi cách để mà file excel dùng được nhưng không cho lưu
Tức là làm đủ thứ trên file rồi . Ấn save hoặc save as nó đều báo lỗi không lưu được
Thanks
 
Mình hỏi cách để mà file excel dùng được nhưng không cho lưu
Tức là làm đủ thứ trên file rồi . Ấn save hoặc save as nó đều báo lỗi không lưu được
Thanks
Bạn có khóa ổ cứng nữa không? Nếu không, vào ổ đĩa copy cả cái file đó cho nhanh...
 
nếu vba được chạy thì có thể dùng cái nà:

Mã:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Dim pass As String
pass = InputBox("Nhap pass de save")
If pass = "hien" Then
    Cancel = False
Else
    Cancel = True
End If
End Sub
 
nếu vba được chạy thì có thể dùng cái nà:

Mã:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Dim pass As String
pass = InputBox("Nhap pass de save")
If pass = "hien" Then
    Cancel = False
Else
    Cancel = True
End If
End Sub
hi c
code đấy sao e chạy không được vậy c
 
Web KT

Bài viết mới nhất

Back
Top Bottom