Thema Datum  Von Nutzer Rating
Antwort
08.02.2017 09:52:49 Teresa
NotSolved
Blau Diagramm formatieren VBA
 08.02.2017 10:59:59 Gast89404
NotSolved
08.02.2017 11:06:16 Gast70427
NotSolved

Ansicht des Beitrags:
Von:
Gast89404		 Datum:
08.02.2017 10:59:59		 Views:
721		 Rating:
     
Antwort:
  Ja
Thema:
Diagramm formatieren VBA

Moin!
Also habe mal getestet. Meines Erachtens passt der Code. Der Fehler sollte / könnte deshalb auftreten, weil kein Diagramm ausgewählt wurde. DAmit gibt es kein Activechart und das Object für den Zugriff fehlt. Um den Fehler zu umgehen (weiß nicht, wo und wann du das Makro ausführst und was vorher ausgewählt wurde) könnte man vorher eine Prüfung einbauen, ob ein Diagramm ausgewählt wurde. Hier mal ein Beispiel. Das einfach am Anfang vom Code zwei einfügen. DAmit bricht der Code ab, wenn kein Diagramm ausgewählt wurde.

 

Sub Diagrammgroesse_anpassen_zwei()


    Set objC = Selection
    While TypeName(objC) <> "ChartObject"
    Set objC = objC.Parent
        If TypeName(objC) = "Application" Then
            MsgBox "Es ist kein Diagramm-Objekt markiert !"
            Exit Sub
        End If
     Wend

 With ActiveSheet.Shapes(Mid$(ActiveChart.Name, Len(ActiveSheet.Name) + 2))

'hier dein normaler Code wieder, das oben halt nur austauschen

Alternativ könnte man in dem Fall auch ein Diagramm auswählen. Da ich aber nicht weiß, wieviele Diagramm das sind und welches das gewählt wird, habe ich da (noch) kein Codebeispiel für. VG

 

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
08.02.2017 09:52:49 Teresa
NotSolved
Blau Diagramm formatieren VBA
 08.02.2017 10:59:59 Gast89404
NotSolved
08.02.2017 11:06:16 Gast70427
NotSolved