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
|
If shConfig.Range("debug_mode").Value Then
|
||||||
shConfig.Visible = xlSheetVisible
|
shConfig.Visible = xlSheetVisible
|
||||||
shData.Visible = xlSheetVisible
|
'shData.Visible = xlSheetVisible
|
||||||
shMonthView.Visible = xlSheetVisible
|
shMonthView.Visible = xlSheetVisible
|
||||||
shMonthUpdate.Visible = xlSheetVisible
|
shMonthUpdate.Visible = xlSheetVisible
|
||||||
shSupportingData.Visible = xlSheetVisible
|
shSupportingData.Visible = xlSheetVisible
|
||||||
shWalk.Visible = xlSheetVisible
|
shWalk.Visible = xlSheetVisible
|
||||||
Else
|
Else
|
||||||
shConfig.Visible = xlSheetVeryHidden
|
shConfig.Visible = xlSheetVeryHidden
|
||||||
shData.Visible = xlSheetHidden
|
'shData.Visible = xlSheetHidden
|
||||||
shMonthView.Visible = xlSheetHidden
|
shMonthView.Visible = xlSheetHidden
|
||||||
shMonthUpdate.Visible = xlSheetVeryHidden
|
shMonthUpdate.Visible = xlSheetVeryHidden
|
||||||
shSupportingData.Visible = xlSheetVeryHidden
|
shSupportingData.Visible = xlSheetVeryHidden
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user