I tried but it throws some error and the code is working with other files.Could you clarify?

See code below:

Sub SwitchToUserMode()
Dim wks As Worksheet
For Each wks In ActiveWorkbook.Sheets
If wks Is ActiveSheet Or InStr(1, wks.Name, "User") > 0 Then
wks.Visible = xlSheetVisible
Else
wks.Visible = xlSheetHidden
End If
Next wks
End Sub

You will need to use the Modano API to do things like hide/unhide sheets within modular workbooks.

We haven't yet publicly the released the Modano API but we regularly use it when providing model build support to clients, as it enables all sorts of things to be automated way above and beyond what you can normally do with VBA.

I've extracted a very small part of the Modano API (the class named ModanoApplication) and put it in the attached workbook along with the following code to hide all sheets other than the cover sheet:

Sub Hide_Non_Cover_Sheets()
'Hides all sheets other than the cover sheet.
'Private declarations:
Dim fContinue As Boolean
Dim strErrorMessage As String
Dim modappConnection As New ModanoApplication
Dim wsCur As Excel.Worksheet
'Checks for valid connection to Modano:
fContinue = modappConnection.ValidConnection(Nothing, False)
'Gets the projects collection:
If fContinue Then
For Each wsCur In ThisWorkbook.Worksheets
If (wsCur.Name <> "Cover") Then
If (InStr(wsCur.Name, "ModanoMeta") = 0) Then
If (Not modappConnection.SetSheetVisibility(wsCur, xlSheetHidden)) Then
fContinue = False
strErrorMessage = "The sheet named '" & wsCur.Name & "' could not be hidden."
Exit For
End If
End If
End If
Next wsCur
End If
'Warns if error:
If fContinue Then
Call MsgBox("All non-cover sheets are hidden.", vbInformation, "Modano API")
Else
Call MsgBox(strErrorMessage, vbInformation, "Modano API")
End If
End Sub

Note that you will need to explicity ignore the worksheet named 'ModanoMeta', as this very hidden worksheet contains the modular data required for Modano to work, so it can't be unhidden using the API.

We will release the full API over the next month or so, that way you can start using VBA to program modular workbooks yourself.