Using a ThisWorkbook.Name or ActiveWorkbook.Name with View side-by-side VBA script

rdoulaghsingh

Board Regular
Joined
Feb 14, 2021
Messages
59
Office Version
  1. 365
Platform
  1. Windows
I am trying to call the workbook name with a " - 1" at the end for a VBA script to run side by side windows. Based on Microsoft documentation, "You cannot use the CompareSideBySideWith method with the Application object or the ActiveWorkbook property." Any suggestions on a similar method to make this work? Any help would be greatly appreciated. Thanks!

VBA Code:
Sub CompareSideBySide(  )
 
    ActiveWindow.NewWindow
    Windows.CompareSideBySideWith _
        ("""" & ActiveWorkbook.name & " - 1""")
    Windows.Arrange ArrangeStyle:=xlVertical
    ActiveWindow.SmallScroll Down:=-4

End Sub
 

Excel Facts

Do you hate GETPIVOTDATA?
Prevent GETPIVOTDATA. Select inside a PivotTable. In the Analyze tab of the ribbon, open the dropown next to Options and turn it off

Watch MrExcel Video

Forum statistics

Threads
1,133,679
Messages
5,660,260
Members
418,569
Latest member
Timotmer

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Top