How to return to the worksheet a macro was called from?

vba excel worksheet
Tom picture Tom · Feb 2, 2017 · Viewed 15.8k times · Source

I have a macro that is duplicated on buttons on 3 worksheets which moves between worksheets and at the moment once the macro command is completed I have it set to return to the 3rd sheet every time. Is there a command I can put in the code that would return the view to the sheet that the macro was activated on in the first place rather than a set sheet.

Answer

Mafii picture Mafii · Feb 2, 2017

Save the active sheet in a variable, then, after your macro finished, select the sheet within the variable again:

' at the start of your macro:
Dim sourceSheet as Worksheet
set sourceSheet = ActiveSheet


' at the end of your macro:
Call sourceSheet.Activate

Related questions

How to add a named sheet at the end of all Excel sheets?

I am trying to add an Excel sheet named "Temp" at the end of all existing sheets, but this code is not working: Private Sub CreateSheet() Dim ws As Worksheet ws.Name = "Tempo" Set ws = Sheets.Add(After:=Sheets(Sheets.…

Read More
Excel VBA For Each Worksheet Loop

I am working on code to basically go through each sheet in my Workbook, and then update column widths. Below is the code I wrote; I don't receive any errors, but it also doesn't actually do anything. Any help is …

Read More
Is there a macro to conditionally copy rows to another worksheet?

Is there a macro or a way to conditionally copy rows from one worksheet to another in Excel 2003? I'm pulling a list of data from SharePoint via a web query into a blank worksheet in Excel, and then I want …

Read More