Wie kann ich den Platz für die Beschriftung der y-Achse in einem Excel Diagramm vergrößern?

Hallo zusammen,

ich habe in Excel waagerechte Balkendiagramme erstellt. Links neben jeden Balken steht auf der y-Achse eine recht langer Beschriftungstext. Leider reicht oft der vorgesehene Platz nicht um alles in einer Zeile darzustellen und der Text wird entweder verkürzt dargestellt oder ich muss das Diagramm vergrößern, damit der Text in 2 Zeilen dargestellt wird. Das ist für mich unpraktisch, da ich für einen Zeitschriftenartikel viele Diagramme auf engem Platz unterbringen muss, das Diagramm soll also so kompakt wie möglich sein. Ich möchte auch ungern den Diagrammtyp ändern oder die Schriftart verkleinern.

Ist es möglich bei gleicher Diagrammgröße die Fläche für die y-Achsenbeschriftung zu vergrößern und dafür die Zeichenfläche mit den Balken etwas zu stauchen? Sodass quasi in einer waagerechten Zeile der Text mehr Platz einnimmt und dafür der Balken weniger? Das wäre perfekt, aber ich finde so eine Option leider nicht bzw. kann die Größe beider Flächen nur zusammenhängend ändern.

Ich habe unter eine Beispielgrafik erstellt, um es zu verbildlichen. Ich möchte quasi die rot eingezeichnete Linie nach rechts verschieben.

Falls Excel das nicht kann, fällt euch eine Lösung ein, wie man es sonst realisieren kann?

Wer mir helfen kann wäre definitiv mein Held, ich hab schon extrem viel Zeit in dieses Problem investiert ;)

Bild zum Beitrag
Computer, Microsoft Excel, Grafik, Diagramm, Informatik, Balkendiagramm, y-Achse
Sind das die richtigen Befehle um Textfelder in Excel zu programmieren?

1.      entwicklertools einfügen

2.      visual basic öffnen

3.      einfügen -> Userform

4.      Rahmen einfügen-> Name auf „Caption“ ändern (Darin Kontrollkästen einfügen und beschriften)

5.      Nächster Rahmen einfügen-> Name auf „Caption“ ändern

6.      Drehfeld einfügen -> Daneben Textfeld einfügen

7.      Nächster Rahmen einfügen und beschriften -> Optionsfelder einfügen und beschriften

8.      Nächster Rahmen einfügen und beschriften -> Textfeld und nebendran Beschriftungsfeld einfügen

9.      2x Befehlsschaltflächen einfügen (Übernehmen / Abbrechen)

10.  Simulieren

11.  Userform1 Überschrift ändern -> Caption -> Name eingeben

12.  Abbrechen Kästchen programmieren -> Auf Abbrechen klicken -> Unload UserForm1 eingeben

13.  Simulieren

14.  Excel öffnen -> Textfeld einfügen

15.  Einfügen -> Modul -> UserForm1.Show eingeben

16.  Zurück in Excel und Makro zuweisen -> Auswählen

17.  Zurück in VisualBasic -> Schriftgröße in Textfeldern ändern -> Font auswählen „Fett“ und „Größe“ ändern

18.  Drehfeld Programmieren -> Draufklicken -> TextBox1.Value = SpinButton1.Value eingeben.

19.  In Excel ausprobieren

20.  Übernehmen/Bestätigen Kästchen programmieren ->

If CheckBox1.Value Then

ThisWorkbook.ActiveSheet.Range("Zeile auswählen").Value = "Ja"

Else

ThisWorkbook.ActiveSheet.Range("Zeile auswählen").Value = "Nein"

End If

21.   Zweiter Wert übernehmen eine Zeile drunter -> ThisWorkbook.ActiveSheet.Range("C8").Value = TextBox1.Value

 

Computer, Microsoft Excel
VBA-Script in Excel automatisert importieren?

Hallo,

mein momentanes Vorhaben:

Ich habe eine Masterliste und daraus möchte ich gern mittels VBA durch Zeilen markieren neue Teillisten exportieren bzw später auch wieder importieren können.

Problem hierbei ist, die Masterliste wird von einem anderem Service generiert. Der Service erzeugt .xlsx Dateien als ohne Makro. Bis das System, Dateien mit Makros erzeugen kann würde ich gerne eine Übergangslösung basteln. Vor allem weil ich das Projekt leite und bis zu meinem Praktikumsende nur noch ein paar Wochen sind.

Meine Frage: Ist es möglich mit Python o.ä. die Makro-Skripte in eine .xlsx Datei zu packen und diese Tabellen dann als .xlsm zu speichern? Vorallem geht es um eine Modul Skript und ein DiesesArbeitsblatt-Skript, welches beim Start ausgeführt wird. Kenne mich selber nicht so super gut in VBA aus.

Ideal wäre es, wenn es komplett automatisiert läuft, also der Kollege öffnet eine dieser Listen dann wird, diese Liste automatisiert mit dem Makro versehen. Ich schätze das ist performancelastig,da permament geprüft werden muss ob eben eine Liste geöffnet wurde, deswegen würde auch eine manuelle Lösung reichen. Quasi ich wähle die Liste starte ein kleines Programm und bekomme die Liste mit dem Makros zurück.

Ist dies möglich? Mein großes Problem ist, das ich nicht weiß wie ich diese VBS-Skripte in die Liste importiere, so das dies erkannt wird.

Wäre super wenn da jemand was weiß.

mfg werdas34

Computer, Microsoft, Microsoft Excel, Technik, programmieren, VBA, MS-Excel, Technologie, VBS
Wie kann man in Excel per VBA abhängig von einem Wert Spalten aus-/einblenden?

Hey. Ich weiß zu diesem Thema gibt es schon ein paar Einträge im Netz. jedoch habe ich es nie für mich umformuliert bekommen. Vielleicht kann mir hier jemand helfen?

In Zelle G6 steht ein Wert von 1-6. Abhängig davon sollen dann immer andere Spalten ausgeblendet werden. Mein Code zur Zeit:

Sub Ausblenden()
'
' Ausblenden Makro
'
' Tastenkombination: Strg+a
'
    If "G6" = "1" Then
                Columns("v:bn").EntireColumn.Hidden = False
                Columns("v:bn").EntireColumn.Hidden = True
            Else
                If "G6" = "2" Then
                    Columns("v:bn").EntireColumn.Hidden = False
                    Columns("ae:bn").EntireColumn.Hidden = True
                Else
                    If "G6" = "3" Then
                        Columns("v:bn").EntireColumn.Hidden = False
                        Columns("an:bn").EntireColumn.Hidden = True
                    Else
                        If "G6" = "4" Then
                            Columns("v:bn").EntireColumn.Hidden = False
                            Columns("aw:bn").EntireColumn.Hidden = True
                        Else
                            If "G6" = "5" Then
                                Columns("v:bn").EntireColumn.Hidden = False
                                Columns("bf:bn").EntireColumn.Hidden = True
                            Else
                                If "G6" = "6" Then
                                    Columns("v:bn").EntireColumn.Hidden = False
                                End If
                            End If
                        End If
                    End If
                End If
    End If
End Sub

Ich bin ein VBA anfänger, also bitte seit nachsichtig x). Danke schon einmal im voraus!

Computer, Office, Microsoft Excel, programmieren, VBA

Meistgelesene Beiträge zum Thema Microsoft Excel