Changing location of Excel Data Source in Visio Professional

Guessed · #2 12-12-2022, 03:09 PM

I would guess that perhaps your second machine is running a different version of Visio or perhaps has different options set.

Does the page re-organise consistently in the same way if you run this macro?

Code:

Sub ArrangeMyOrg()
  Application.AutoLayout = True
  With ActivePage
    .PageSheet.CellsSRC(visSectionObject, visRowPageLayout, visPLOResizePage).FormulaForceU = "TRUE"
    .PageSheet.CellsSRC(visSectionObject, visRowPageLayout, visPLOAvenueSizeX).FormulaForceU = "7.5 mm"
    .PageSheet.CellsSRC(visSectionObject, visRowPageLayout, visPLOLineRouteExt).FormulaForceU = "1"
    .Layout
  End With
End Sub

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Visio 2019 Professional	GeekDad	Visio	1	04-11-2022 05:43 PM
New Data Source for each page in Visio	KatLane	Visio	2	12-06-2021 02:49 PM
RefreshAll data source Excel from Word	As1900	Word VBA	0	08-31-2021 09:19 AM
Merge same excel data source in two columns	Marcia	Mail Merge	1	07-25-2019 02:27 PM
Automatically changing Excel source after a folder change	philippe.delobbe	Word Tables	0	04-29-2015 01:03 PM