Keep Data sheet visible. This coincides with version 13.0 in Teams.
This commit is contained in:
parent
4504cbaa2a
commit
da28aa485f
BIN
VBA/build.frx
BIN
VBA/build.frx
Binary file not shown.
BIN
VBA/changes.frx
BIN
VBA/changes.frx
Binary file not shown.
BIN
VBA/fpvt.frx
BIN
VBA/fpvt.frx
Binary file not shown.
BIN
VBA/openf.frx
BIN
VBA/openf.frx
Binary file not shown.
BIN
VBA/part.frx
BIN
VBA/part.frx
Binary file not shown.
@ -14,14 +14,14 @@ Private Sub Worksheet_Change(ByVal Target As Range)
|
||||
|
||||
If shConfig.Range("debug_mode").Value Then
|
||||
shConfig.Visible = xlSheetVisible
|
||||
shData.Visible = xlSheetVisible
|
||||
'shData.Visible = xlSheetVisible
|
||||
shMonthView.Visible = xlSheetVisible
|
||||
shMonthUpdate.Visible = xlSheetVisible
|
||||
shSupportingData.Visible = xlSheetVisible
|
||||
shWalk.Visible = xlSheetVisible
|
||||
Else
|
||||
shConfig.Visible = xlSheetVeryHidden
|
||||
shData.Visible = xlSheetHidden
|
||||
'shData.Visible = xlSheetHidden
|
||||
shMonthView.Visible = xlSheetHidden
|
||||
shMonthUpdate.Visible = xlSheetVeryHidden
|
||||
shSupportingData.Visible = xlSheetVeryHidden
|
||||
|
||||
Loading…
Reference in New Issue
Block a user