posizione grafici & macro

[p***@hotmail.it]

Ciao a tutti
ho il seguente problema: ho una macro che crea 9 grafici in un foglio
excel (creata utilizzando il registratore di macro) .Tali grafici
vengono creati però uno sopra l'altro. Vorrei sapere se è possibile
invece fare in modo che i grafici vengano messi in posizioni fisse del
foglio (possibilmente allineati verticalmente).
Grazie a chiunque mi risponda

[eliano]

Post by p***@hotmail.it
Ciao a tutti
ho il seguente problema: ho una macro che crea 9 grafici in un foglio
excel (creata utilizzando il registratore di macro) .Tali grafici
vengono creati però uno sopra l'altro. Vorrei sapere se è possibile
invece fare in modo che i grafici vengano messi in posizioni fisse del
foglio (possibilmente allineati verticalmente).
Grazie a chiunque mi risponda

Ciao Pallo.
9 grafici non sono pochi, comunque potresti posizionarli sul foglio usando
ActiveWindow.Left e ActiveWindow.Top dopo averli convenientemente
dimensionati. Vedi un esempio nellaparte finale di:
http://ennius.altervista.org/vba/vba92.php
Una ottima fonte di idee la puoi trovare sul sito di Fernando (ciao):
www.prodomosua.eu con esempi veramente esaustivi.
Eliano

[p***@hotmail.it]

Post by eliano

Post by p***@hotmail.it
Ciao a tutti
ho il seguente problema: ho una macro che crea 9 grafici in un foglio
excel (creata utilizzando il registratore di macro) .Tali grafici
vengono creati però uno sopra l'altro. Vorrei sapere se è possibile
invece fare in modo che i grafici vengano messi in posizioni fisse del
foglio (possibilmente allineati verticalmente).
Grazie a chiunque mi risponda

Ciao Pallo.
9 grafici non sono pochi, comunque potresti posizionarli sul foglio usando
ActiveWindow.Left e ActiveWindow.Top dopo averli convenientemente
http://ennius.altervista.org/vba/vba92.php
www.prodomosua.eu con esempi veramente esaustivi.
Eliano

grazie moltissimo a tutti 2!
già che ci sono vorrei chiedere un altra cosa:
ho un pulsante a cui è associata una macro, che crea un grafico
leggendo i dati da una selezione di celle fatta di volta in volta.La
macro funziona cioè fa il grafico ed è giusto , però da' l'errore:
Run time error 438
object doesn't support this property or method
alla seguente istruzione
With Selection
ActiveChart.SetSourceData Source:=.Selection, PlotBy:= _
xlColumns
ActiveChart.Location Where:=xlLocationAsObject, Name:="Sheet1"
End With
grazie ancora!

[fernando cinquegrani]

Post by p***@hotmail.it
Ciao a tutti
ho il seguente problema: ho una macro che crea 9 grafici in un foglio
excel (creata utilizzando il registratore di macro) .Tali grafici
vengono creati però uno sopra l'altro. Vorrei sapere se è possibile
invece fare in modo che i grafici vengano messi in posizioni fisse del
foglio (possibilmente allineati verticalmente).

...modificando le proprietà top e left del chartobject
es.:
Option Explicit
Public Sub ordina()
Dim co As ChartObject, cot As Double
For Each co In ActiveSheet.ChartObjects
co.Top = cot
co.Left = 0
cot = cot + co.Height
Next
End Sub
.f