Change active sheet

[AlbertoOutline]

Hi everyone, I need to change active sheet by vba code in a drawing document.

How can I set DrawingDocument.ActiveSheet Property?

Thank in advance

[AlbertoOutline · Accepted solution]

Solved! 

ThisApplication.ActiveDocument.Sheets(sheet number).Activate

[_KarlH]

Worth noting that Sheets also accepts the Sheet Name too, might make it easier to trace and troubleshoot.

Example below;

Sub Main()

	oDrawDoc = ThisApplication.ActiveDocument

	For Each oSheet In oDrawDoc.Sheets
		ThisApplication.ActiveDocument.Sheets(oSheet.Name).Activate
		Logger.Info("Sheet " + oSheet.Name + " is now active.")
		'Sub_routine_goes_here()
	Next
End Sub