Lỗi khi bấm Ctrl + Save và cách xử lý?

[tuyetphale]

Khi em bấm Ctrl + S thì nó xuất hiện lỗi này là sao m.n?
Có ai biết cách khắc phục hoặc cho nó biến mất đừng xuất hiện nữa

 

[vu_tuan_manh_linh]

Đưa file lên đi bạn, khả năng nhiễm virut macro gì đó!!!

 

[tuyetphale]

Lỗi

đây anh!
Coi dùm em...........................................

 

[Quang_Hải]

đây anh!
Coi dùm em...........................................

Bạn vào File > Options>Trustcenter>Trustcenter settings>Privacy Options rồi bỏ check trong mục Remove Personal Information....

 

[tuyetphale]

Bạn vào File > Options>Trustcenter>Trustcenter settings>Privacy Options rồi bỏ check trong mục Remove Personal Information....

Vẫn không được bạn ơi! Lúc mình làm xong thì bấm Save là xuất hiện cái hình 1 rồi bấm tiếp thì hiện hình 2, hiện tại không lưu được file excel, mình mới học xài excel nên không rành, ai giúp với

 

[vanle33]

Vẫn không được bạn ơi! Lúc mình làm xong thì bấm Save là xuất hiện cái hình 1 rồi bấm tiếp thì hiện hình 2, hiện tại không lưu được file excel, mình mới học xài excel nên không rành, ai giúp với

Sau khi hiện ra hình 1 bạn nhấn Yes sau đó Save as thành file excel có đuôi .xls
Nếu không được thì save as thành file .xlsx
Bạn thử đi

 

[tuyetphale]

Sau khi hiện ra hình 1 bạn nhấn Yes sau đó Save as thành file excel có đuôi .xls
Nếu không được thì save as thành file .xlsx
Bạn thử đi

Mình bấm ctrl+s để save thì nó hiện cái hình 1, bấm yes nó lập tức hiện hình 2, bấm ok rồi save as, bấm save lần nữa nó lại hiện cái hình 2. Mà mình dù bấm cái gì thì lúc thoát ra tất cả userform của mình tạo đã mất hết và nút liên kết mở userform cũng không còn tác dụng

 

[vanle33]

Mình bấm ctrl+s để save thì nó hiện cái hình 1, bấm yes nó lập tức hiện hình 2, bấm ok rồi save as, bấm save lần nữa nó lại hiện cái hình 2. Mà mình dù bấm cái gì thì lúc thoát ra tất cả userform của mình tạo đã mất hết và nút liên kết mở userform cũng không còn tác dụng

Bạn gỡ triệt để Office cũ và cài mới Office 2010.

 

[Quang_Hải]

Mình bấm ctrl+s để save thì nó hiện cái hình 1, bấm yes nó lập tức hiện hình 2, bấm ok rồi save as, bấm save lần nữa nó lại hiện cái hình 2. Mà mình dù bấm cái gì thì lúc thoát ra tất cả userform của mình tạo đã mất hết và nút liên kết mở userform cũng không còn tác dụng

Khi lưu phải chọn .xlsm mới được chứ

 

[tuyetphale]

Để mình mô tả rõ hơn:
Lúc đầu mình tạo 1 file excel bình thường
Mình vào sheet2 tạo 1 userform với câu lệnh theo mẫu như sau:
Nút NHẬP:

Private Sub cmdAdd_Click()
Dim iRow As Long
Dim ws As Worksheet
Set ws = Worksheets("Sheet2")

iRow = ws.Cells(Rows.Count, 1) _
.End(xlUp).Offset(1, 0).Row
If Trim(Me.txtCont.Value) = "" Then
Me.txtCont.SetFocus
MsgBox "Vui long dien so hop dong", vbInformation
Exit Sub
End If
ws.Cells(iRow, 1).Value = Me.txtCont.Value
ws.Cells(iRow, 2).Value = Me.txtName.Value
ws.Cells(iRow, 3).Value = Me.txtAdd.Value
ws.Cells(iRow, 4).Value = Me.txtTel.Value
ws.Cells(iRow, 5).Value = Me.txtID.Value
ws.Cells(iRow, 6).Value = Me.txtDate.Value
ws.Cells(iRow, 7).Value = Me.txtLocal.Value
ws.Cells(iRow, 8).Value = Me.txtAccount.Value
ws.Cells(iRow, 9).Value = Me.txtnote.Value
ws.Cells(iRow, 10).Value = Me.txtRemaks.Value

Me.txtCont.Value = ""
Me.txtName.Value = ""
Me.txtAdd.Value = ""
Me.txtTel.Value = ""
Me.txtDate.Value = ""
Me.txtLocal.Value = ""
Me.txtAccount.Value = ""
Me.txtID.Value = ""
Me.txtnote.Value = ""
Me.txtRemaks.Value = ""
Me.txtCont.SetFocus

End Sub

NÚT THOÁT:

Private Sub cmdClose_Click()
Unload Me
End Sub

Tiếp theo mình vào Sheet1 tạo 1 nút CommandButton, click đúp chuột để điền code sau:

UserForm1.Show

Các bước trên em đều thực hiện được và xuất dữ liệu được ra Sheet2
Nhưng không hiểu sao Save không được, lỗi như em đã nêu ở trên
Không biết các bước làm có chính xác không hay đặt gì sai không?
Cám ơn m.n và nhờ giúp đỡ ạ

 

[tuyetphale]

Khi lưu phải chọn .xlsm mới được chứ

Thank you ^^
Mình làm được rồi, cám ơn bạn nhé, hehe