Nhờ giải thích code (1 người xem)

[ngocanhwin]

Đây là 1 đoạn code trong bảng tính của em:

'
'Mo cac database
'If Target.Address = "$N$8" Then
'If Target.Value = "" Then
'TT1.Visible = xlSheetVeryHidden
'TT2.Visible = xlSheetVeryHidden
'TT3.Visible = xlSheetVeryHidden
'TT4.Visible = xlSheetVeryHidden
'TT5.Visible = xlSheetVeryHidden
'TT6.Visible = xlSheetVeryHidden
'TT7.Visible = xlSheetVeryHidden
'End If

'If Target.Value = Range("N1").Value Then TT6.Visible = xlSheetVisible
'If Target.Value = Range("N2").Value Then TT1.Visible = xlSheetVisible
'If Target.Value = Range("N3").Value Then TT4.Visible = xlSheetVisible
'If Target.Value = Range("N4").Value Then TT2.Visible = xlSheetVisible
'If Target.Value = Range("N5").Value Then TT5.Visible = xlSheetVisible
'If Target.Value = Range("N6").Value Then TT3.Visible = xlSheetVisible
'If Target.Value = Range("N7").Value Then TT7.Visible = xlSheetVisible
'End If

Nhờ bác nào nào cao thủ xin chỉ giáo.

 

[vodoi2x]

Đây là 1 đoạn code trong bảng tính của em:

'
'Mo cac database
'If Target.Address = "$N$8" Then
............

Code có dấu nháy trên ' ở đầu dòng có nghĩa là lệnh này được bỏ qua - biên dịch máy sẽ coi như dòng ghi chú (comment) mà thôi, nên không có ý nghĩa gì cả về code

 

[ngocanhwin]

Code có dấu nháy trên ' ở đầu dòng có nghĩa là lệnh này được bỏ qua - biên dịch máy sẽ coi như dòng ghi chú (comment) mà thôi, nên không có ý nghĩa gì cả về code

TT1 đến TT7 là các Sheet bị ẩn, em đang bí ở cái vụ này. Em nghĩ cái này có liên quan đến việc cho nó ẩn và hiện sheet.

 

[tvxdgt]

TT1 đến TT7 là các Sheet bị ẩn, em đang bí ở cái vụ này. Em nghĩ cái này có liên quan đến việc cho nó ẩn và hiện sheet.

Đúng là như vậy nhưng mà Code phải bỏ dấu nháy trên ' ở đầu dòng đã thì code mới thực hiện được lệnh.