Projektanfrage

Projektanfrage über Web Formular   per Online-Formular 
Projektanfrage über E-Mail  Diese E-Mail-Adresse ist vor Spambots geschützt! Zur Anzeige muss JavaScript eingeschaltet sein!
Projektanfrage per Telefon  +49 (0)151 / 164 55 914
Projektanfrage weitere Informationen  weitere Informationen 

Sie benötigen Hilfe oder Unter-stützung? Nutzen Sie für Ihre Anfrage unser Online-Formular, senden Sie uns eine Diese E-Mail-Adresse ist vor Spambots geschützt! Zur Anzeige muss JavaScript eingeschaltet sein! oder rufen Sie uns einfach an.

   
      Referenzen 

 Bosch 
  T-Systems
  Hagebau
  Siemens
 Areva  VW
 Haufe-Lexware  British American Tobacco
  nagel group farbe
   
     Programmierung
Excel Auftragsprogrammierung Access Auftragsprogrammierung
Word Auftragsprogrammierung Outlook Auftragsprogrammierung
   

Projektanfrage

 Sie benötigen eine Auftragsprogrammierung?
 Oder suchen Unterstützung bei der Lösungs-
 findung?

  Nutzen Sie unser Anfrageformular

  Jetzt anrufen unter 0151 / 164 55 914

 Diese E-Mail-Adresse ist vor Spambots geschützt! Zur Anzeige muss JavaScript eingeschaltet sein! Projektanfrage per Diese E-Mail-Adresse ist vor Spambots geschützt! Zur Anzeige muss JavaScript eingeschaltet sein! senden

  Weitere Informationen

sitepanel question2

P
R
O
J
E
K
T
A
N
F
R
A
G
E
   

Diagramm-Skalierung per VBA ändern

Excel skaliert die Größenachse (Y-Achse) bei einem Diagramm standardmäßig automatisch. Natürlich kann der Maxi- und Min-Wert auch manuell für das Diagramm vorgegeben werden. Dieses Beispiel zeigt, wie die Skalierung der Größenachse per VBA geändert werden kann.

Fügen Sie zunächst ein beliebiges Diagramm auf einem Excel-Tabellenblatt ein. In diesem Beispiel gehen wir davon aus, dass es das erste Diagramm ist und somit automatisch den Namen Diagramm 1 erhält.

Erstellen Sie anschließend einen Scroll-Balken (Bildlaufleiste) auf dem Tabellenblatt, welcher mit der Zelle H19 verlinkt wurde. Das bedeutet, dass der auf dem Scroll-Balken eingestellt Wert in Zelle H19 ausgegeben wird. Den Dialog zur Zellverknüpfung öffnen Sie über einen Rechtsklick auf das Steuerelement und den Befehl Steuerelement formatieren. Das Dialogfenster mit Zuweisung der entsprechenden Zellverknüpfung sehen Sie in Abbildung 1.


Abbildung 1

Nachdem Sie das Steuerelement eingefügt haben und die Zellverknüpfung durchgeführt haben, wird der VBA-Code in einem Code-Modul erfassen.

Sub Skalierung()
'** Größenachse verändern

'** Diagramm 1 aktivieren
ActiveSheet.ChartObjects("Diagramm 1").Activate

'** Größenachse ändern
With ActiveChart.Axes(xlValue)
  .MaximumScale = ActiveSheet.Range("H19")
  .MinimumScale = 0
End With

End Sub

Damit der Code bei Änderung der Bildlaufleiste ausgeführt wird, müssen Sie das Steuerelement noch mit dem VBA-Code verbinden. Führen Sie dazu einen Rechtsklick auf das Steuerelement aus und klicken Sie auf den Befehl  Makro zuweisen. Wählen Sie anschlie0end das Makro Skalierung aus und bestätigen Sie das Dialogfenster mit einem Klick auf die Schaltfläche OK. Damit wurde das Makro dem Steuerelement zugewiesen.

Sobald Sie nun die Bildlaufleiste verändern, wird die Größenachse des Diagramms entsprechend angepasst, siehe Abbildung 2.


Abbildung 2

Die Beispieldatei können Sie über den nachfolgenden Link herunterladen.

   

Relevante Artikel

  • Versionen von Windows und Excel ermitteln

    Mit dem folgenden Makro können Sie ganz einfach die installierte Windows- und Excel-Version ermitteln. Sub Info_Windows_Excel() 'Ermittlung der installierten Windows- und der Excelversion    antw = MsgBox("Betriebssystem: " & Application.OperatingSystem & Chr(10) & _    "Excel-Version: " & Application.Version, vbInformation, "Info") End Sub Die...

  • Funktion zur gleichzeitigen Addition und Multiplikation

    112017 Diese Funktion addiert die beiden angegebenen Wert und multipliziert sie in diesem Fall mit 2! In der Tabelle ist einfach folgendes einzugeben:=summemult(a1;a3)Public Function summemult(Wert1, Wert2)    summemult = (CDbl(Wert1) + CDbl(Wert2)) * 2End FunctionDieser Code ist...

  • Sonderzeichen aus String entfernen

    In diesem Beitrag stellen wir eine Möglichkeit vor, um Sonderzeichen aus einer beliebigen Zeichenfolge zu entfernen.  Es handelt sich um eine Funktion, welche die definieren Sonderzeichen aus dem...

  • Tastenkombinationen deaktivieren und aktivieren

    108039 In Excel sind einige Tastenkombination mit Funktionen hinterlegt. Mit der Tastenkombination [Alt] + [F11] können Sie die VBA-Entwicklungsumgebung starten. Möchten Sie diese Standardfunktion deaktivieren...

  • Prüfen, ob eine Formel in einer bestimmten Zelle steht

    112018 1. Möglichkeit ohne VBA Um zu ermitteln, ob eine Formel in einer bestimmten Zelle steht, gibt es 2 Möglichkeiten.Bei der ersten Möglichkeit wird dies ohne VBA festgestellt, also nur mit...

   
Cookies erleichtern die Bereitstellung unserer Dienste. Mit der Bestätigung erklären Sie sich mit der Verwendung von Cookies auf Excel-Inside Solutions einverstanden.
Weitere Informationen Ok