REAL-TIME

VBA Projects

Full Access with Source Code
  • Designed and Developed by PNRao

  • Full Access with VBA Source Code

  • Well Commented Codes Lines

  • Creative and Professional Design

Effortlessly
Manage Your Projects

120+ Project Management Templates

Seamlessly manage your projects with our powerful & multi-purpose templates for project management.

120+ PM Templates Includes:
  • 50+ Excel Templates

  • 50+ PowerPoint Templates

  • 25+ Word Templates

Share Post

Goto Application Method in VBA is used to select any range on a worksheet or select any visual basic procedure in any workbook. If that specified workbook is not active, then it activates that workbook. Please find the syntax and examples of Goto Application Method in VBA.

VBA Goto Application Method Excel Object

VBA Goto Application Method – Syntax

Here syntax for Goto method of application object in VBA.

Application. Goto (

[Reference], [Scroll])

Where
Reference: It is an Optional parameter. It specifies the destination. If you don’t specify this argument, the destination will be last used range.
Scroll: It is an Optional parameter. It has Boolean value either True or False. If the value is true then it will scroll through the window. If it is False then it won’t scroll through the window.
In the above syntax Application represents object and Goto is the method of Application.

VBA Goto Application Method: Example 1

Please find the below example for Goto method of application object in excel VBA. The below procedure select a cell ‘A250’ on the worksheet named Sheet1. And in the below statement mentioned ‘Scroll:=True’ it scrolls through the worksheet.

Sub Appl_Goto()
    Application.Goto Reference:=Worksheets("Sheet1").Range("A200"), Scroll:=True
End Sub

VBA Goto Application Method – Instructions

Please follow the below steps to execute the VBA code to save the excel file.
Step 1: Open any existing Excel Application.
Step 2: Press Alt+F11 – This will open the VBA Editor.
Step 3: Insert a code module from then insert menu.
Step 4: Copy the above code and paste in the code module which have inserted in the above step.
Step 6: Now press F5 to execute the code and check how the Goto method is working in Worksheet.

Effortlessly Manage Your Projects and Resources
120+ Professional Project Management Templates!

A Powerful & Multi-purpose Templates for project management. Now seamlessly manage your projects, tasks, meetings, presentations, teams, customers, stakeholders and time. This page describes all the amazing new features and options that come with our premium templates.

Save Up to 85% LIMITED TIME OFFER
Project Management Templates

All-in-One Pack
120+ Project Management Templates

Essential Pack
50+ PM Templates

Excel Pack
50+ Excel PM Templates

PowerPoint Pack
50+ Excel PM Templates

MS Word Pack
25+ Word PM Templates

Ultimate Project
Management Template
Ultimate Resource
Management Template
Project Portfolio
Management Templates
Last Updated: March 2, 2023

5 Comments

  1. Pawan Yadav December 24, 2015 at 9:36 AM

    Very Good Explanation.
    In addition you can also refer to any macro:

    Code: Application.Goto “Macro1”

  2. Sabby March 22, 2016 at 1:48 PM

    I have a value in range of column ‘H’ which is the reference to the cell where the goto should apply, could you please help me with the VBA code where the goto takes the value from the active cell.

    Any help is appreciated

  3. sai March 9, 2017 at 6:47 PM

    Hi Pawan Yadav,

    Could you please explain more about your code, please…

  4. Konrad August 22, 2018 at 6:59 AM

    Is it possible to use GoTo in this macro Message? I want to return to sheet “Tickets” to the first empty cell in column “E”, (5)
    Debug points to error Application.Goto
    Please help if you can and thank you for your time.

    Sub Message()
    Dim lastRow As Long
    Sheets(“Messages”).Select
    Range(“A1”).Select
    Selection.Copy
    Sheets(“Tickets”).Select
    lastRow = Cells(Rows.Count, 5).End(xlUp).Offset(1, 0).row
    Application.Goto Reference:=”lastRow “, scroll = true
    End Sub

  5. Konrad August 22, 2018 at 7:39 AM

    Solved with this change, but if you know a better way let me know please

    Sub Message()
    Dim lRow As Long
    Sheets(“Messages”).Select
    Range(“A1”).Select
    Selection.Copy
    Sheets(“Tickets”).Select
    lRow = Cells(Rows.Count, 5).End(xlUp).Offset(1, 0).row
    ActiveSheet.Range(“E” & lRow).Select
    End Sub

Leave A Comment