Dimensionieren von Eigenschaften
Eigenschaften
ich habe ein kleine Funktion geschriegen, die als Ergebnis die MajorUnitScale-Eigenschaft wie z.B. xlMonth zurückgeben soll, welche ich dann anschliessend für Änderung des Charts einsetzen möchte.
Function YAchse(Datenbereich As Range) As ?
With WorksheetFunction
anz = .Max(Datenbereich) - .Min(Datenbereich)
End With
Select Case anz / 11 ' 11 datenpunkte darstellen
Case Is Danke.
Matthias