Linker IT Software
Google
Web www.oraxcel.com
menubar-top-links menubar-top-rechts
Home Help Search Login
Welcome, Guest. Please Login.
SQL*XL: Database to Excel bridge litLIB: Excel power functions pack ExcelLock: Locking and securing your valuable Excel spreadsheets encOffice: Protect your Excel file easy and safe encOffice: Protect your Excel file easy and safe
Pages: 1
Synchronizing 3D views in Excel charts (Read 1781 times)
Gerrit-Jan Linker
YaBB Administrator
*****




Posts: 75
Synchronizing 3D views in Excel charts
13.03.10 at 13:16:08
 
Synchronizing 3D views in Excel charts
 
If you have many surface charts in Excel you may want to synchronise the 3D views. For example to synchronize the rotation angle I developed the following short script:
 
Code:
Public Sub RotateCharts()
    Dim crt As ChartObject
    
    For Each crt In ActiveSheet.ChartObjects
	  crt.Chart.Rotation = Range("rotation_angle").Value
    Next crt
End Sub
 


Copy this code into a new module in VBA.
 
From the forms toolbar I drew a spinner control on my sheet.  
In format control I specified a cell to become the linked cell.
Set the minimum, maximum and step value for the spinner button.
I named the cell rotation_angle by defining a name for that cell.
 
Clicking the spinner button will rotate all charts by the same rotation angle. You can expand the code to include other 3D settings.
Back to top
 
« Last Edit: 13.03.10 at 13:18:47 by Gerrit-Jan Linker »  

Gerrit-Jan Linker
Linker IT Software
Email WWW Gerrit-Jan Linker   IP Logged
Pages: 1