vba userform

[daithanh0910]

xin các cao nhân cho em hỏi: em có thực hiện code file excel.khi mở file là mở userform,khi tắt userform là tắt luôn file.vậy nếu trong trường hợp code có vấn đề thì em làm thế nào để mở được trình soạn thảo vba.

 

[daithanh0910]

Private Sub Label4_Click()
    Application.VBE.ActiveCodePane.Show
End Sub

Lỗi gì?

em bị lỗi như này a ạ.

Bài đã được tự động gộp: 19/11/19

Private Sub Label4_Click()
    Application.VBE.ActiveCodePane.Show
End Sub

Lỗi gì?

Bài đã được tự động gộp: 19/11/19

em gửi a file đính kèm nhé

em bị lỗi như này a ạ.

Bài đã được tự động gộp: 19/11/19

em gửi a file đính kèm

 

[be_09]

a disable file này giúp em với.trong trường hợp anh ko biết mật khẩu như này ạ.em đang vướng mắc ở đây là khi mình quên mật khẩu thì mình xem nọi dung trong file kiểu gì.mong anh giúp đỡ

Bài đã được tự động gộp: 19/11/19

đúng rồi bạn

Thực hiện như bài 13 bạn không đọc à, sau đó vào ThisWorkbook View Code và Block code là xong, nó không hiện UserForm1 nữa thì lấy đâu mà đòi Pass.

 

[batman1]

em bị lỗi như này a ạ.
View attachment 228577

Thay

Application.VBE.ActiveCodePane.Show

bằng

Application.VBE.MainWindow.Visible = True

 

[daithanh0910]

Thực hiện như bài 13 bạn không đọc à, sau đó vào ThisWorkbook View Code và Block code là xong, nó không hiện UserForm1 nữa thì lấy đâu mà đòi Pass.

cho bạn làm thử này xem được ko .)

Bài đã được tự động gộp: 19/11/19

Thay

Application.VBE.ActiveCodePane.Show

bằng

Application.VBE.MainWindow.Visible = True

hay quá a ơi.cảm ơn a.
à mà em muốn cái file của em người dùng chỉ được tương tác với userform.chỉ mình mới có quyền xem bảng tính thì xử lý như nào được a nhỉ.

 

[dangkhoiLK]

    Set Application.VBE.ActiveVBProject = Application.ActiveWorkbook.VBProject
    Application.VBE.ActiveVBProject.VBE.ActiveCodePane.Show

thay đoạn code

 

[be_09]

cho bạn làm thử này xem được ko .)

Bài đã được tự động gộp: 19/11/19

hay quá a ơi.cảm ơn a.
à mà em muốn cái file của em người dùng chỉ được tương tác với userform.chỉ mình mới có quyền xem bảng tính thì xử lý như nào được a nhỉ.

Rồi đó mở thử xem thế nào, nó không hiện UserForm1 thì lấy cái gì để đòi Pass.

 

[daithanh0910]

Rồi đó mở thử xem thế nào, nó không hiện UserForm1 thì lấy cái gì để đòi Pass.

tks iu bạn nhiều.

 

[batman1]

hay quá a ơi.cảm ơn a.
à mà em muốn cái file của em người dùng chỉ được tương tác với userform.chỉ mình mới có quyền xem bảng tính thì xử lý như nào được a nhỉ.

Thì vứt Label4 vào sọt rác thôi. Nếu không "là mình" thì ắt là không đăng nhập được rồi. Còn nếu "là mình" thì bắt buộc phải biết user và password. Vậy thì đăng nhập bình thường. Nếu muốn xem code thì đóng UserForm2. Thế thôi.

Hoặc thêm code sau vào UsetForm2

Private Sub UserForm_Initialize()
    Application.VBE.MainWindow.Visible = True
End Sub