Bui xuan huynh
Bui xuan huynh
Thảo luận 17 thảo luận
Vỗ tay 0 vỗ tay
Lượt xem 323 lượt xem

đoạn code yêu cầu nhập password khi active một sheet đang ẩn được viết như

Chào Thầy!

Thầy cho em hỏi đoạn code yêu cầu nhập password khi active một sheet đang ẩn được viết như thế nào ạ!

Thảo luận 17 câu trả lời
Lượt xem 323 lượt xem
Vỗ tay vỗ tay
Bui xuan huynh 08:03 - Mar 26, 2021

Chào bạn, ý của bạn đang nói đến pass sheets đúng không? hay như thế nào?

Vỗ tay vỗ tay
Bui xuan huynh 09:03 - Mar 26, 2021

vâng,

ví dụ file có 2 sheet, sheet 2 ẩn hết nội dung (đặt pass)

yêu cầu là: code để gán assign macro khi nhấp vào nút gán assign macro đó thì hiện hộp thông báo yêu cầu nhập pass ok thì mở sheet 2, không thì hiện thông báo sai pass.

Mong thầy giúp đỡ ạ!

Em cảm ơn thầy!

Vỗ tay vỗ tay
Bui xuan huynh 11:03 - Mar 26, 2021

Chào bạn bạn thử code sau nhé:

Option Explicit

Sub checksheethide()
    On Error Resume Next
    Dim sht As Worksheet
    If Sheet1.Visible = xlSheetHidden Then
        Dim str As String
        str = InputBox("Input Box", "Nhap mat khau")
        Sheet1.Protect , str
        If Sheet1.ProtectContents = True Then
            MsgBox "sai mat khau"
            Exit Sub
        Else
            Sheet1.Visible = xlSheetVisible
        End If
    Else
        MsgBox "khong mo"
    End If
End Sub
Vỗ tay vỗ tay
Bui xuan huynh 17:03 - Mar 28, 2021

https://drive.google.com/file/d/1fwZc...

Em làm file test năng lực nhân viên. Sheet A là bài test, Sheet B là hiển thị kết quả cùng đáp án.

Mong thầy giúp em với yêu cầu:

Khi nhân viên thi xong, quản lý nhấp chuột vào button xem kết quả và phải nhập mật khẩu đúng thì mới xem được kết quả bài thi [Để tránh nhân viên gian lận ạ]

tạm thời lấy mật khẩu là: 123 thầy nhé

Em cảm ơn thầy!

Vỗ tay vỗ tay
Bui xuan huynh 11:03 - Mar 29, 2021

Chào bạn, bạn cho gitiho xin ultraview vào giờ hành chính nhé.

Vỗ tay vỗ tay
Bui xuan huynh 08:04 - Apr 19, 2021

Em Chào Thầy!

Em viết file để sử dụng nhưng đang bị mắc phần thông báo.

Tức là trước khi thực thi phần in e muốn hiện thông báo tùy chọn OK -thì in, Cancel - thì hủy.

Thầy xem Code và chỉnh sửa lại dùm em nhé ạ!

Em cảm ơn thầy!

Vỗ tay vỗ tay
Bui xuan huynh 08:04 - Apr 19, 2021
Bui xuan huynh 11:04 - Apr 19, 2021

Chào bạn bạn sử dụng msgbox như sau nhé:

    Dim hoi As VbMsgBoxResult
    hoi = MsgBox ""Ban co muon in khong?", vbYesNo, "Thông báo")
    If hoi = vbYes Then
  //code thuc hiện in
end if
Vỗ tay vỗ tay
Bui xuan huynh 12:04 - Apr 19, 2021

Em cám ơn thầy!

Em làm được rồi ạ!

Vỗ tay vỗ tay
Bui xuan huynh 13:04 - Apr 19, 2021

Cảm ơn bạn đã đồng hành cùng gitiho, chúc bạn học tốt.

Vỗ tay vỗ tay
Bui xuan huynh 13:06 - Jun 02, 2021

Em chào Thầy!

Hiện em đang cho các bạn nhân viên thực hiện bài test năng lực. số lượng bài test rất nhiều. Em muốn tạo một file để tổng hợp lại kết quả mỗi lần test nhưng không biết trong phạm vi VBA có thực hiện được không?

Em nhờ thầy xem qua file ở đường link phía dưới với yêu cầu cụ thể trong file List Tong Hop.

https://drive.google.com/drive/folder...

Em rất mong nhận được sự chỉ dạy từ thầy!

Em cảm ơn thầy!

Vỗ tay vỗ tay
Bui xuan huynh 13:06 - Jun 02, 2021

Chào bạn, bạn cho gitiho xin quyền truy cập nhé.

Vỗ tay vỗ tay
Bui xuan huynh 13:06 - Jun 02, 2021

Dạ, em sơ xuất quá, em đã thay đổi quyền truy cập rồi ạ!

Vỗ tay vỗ tay
Bui xuan huynh 13:06 - Jun 02, 2021

Chào bạn phần này bạn cần làm 2 bước, 1 là đưa dữ liệu vào sheets tổng hợp cái này bạn xem chương 10.

Rồi tiêp tục dùng dùng vòng lặp để tổng hợp dữ liệu theo list tổng hợp đó

Vỗ tay vỗ tay
Bui xuan huynh 15:06 - Jun 02, 2021

vâng, em cám ơn thầy!

Vỗ tay vỗ tay
Bui xuan huynh 16:06 - Jun 02, 2021

Chúc bạn học tốt cùng gitiho

Vỗ tay vỗ tay
Bui xuan huynh 09:06 - Jun 03, 2021

Em chào thầy!

Em có làm theo hướng dẫn của thầy tuy nhiên do kiến thức chưa đủ nên không ra được kết quả, do yêu cầu công việc cần gấp nên nếu được em nhờ thầy hướng dẫn chi tiết em phần này với nhé!

https://drive.google.com/drive/folder...

Em cảm ơn thầy rất nhiều!

Vỗ tay vỗ tay
Câu hỏi liên quan
© 2020 - Bản quyền của Công Ty Cổ Phần Công Nghệ Giáo Dục Gitiho Việt Nam
Giấy chứng nhận Đăng ký doanh nghiệp số: 0109077145, cấp bởi Sở Kế hoạch và Đầu tư TP. Hà Nội
Giấy phép mạng xã hội số: 588, cấp bởi Bộ Thông tin và Truyền thông