Thema Datum  Von Nutzer Rating
Antwort
07.10.2019 11:40:43 Gast2155
NotSolved
Blau Excel VBA Kreissegmente mit einem Doppelklick farblich füllen
07.10.2019 22:51:45 Gast90350
NotSolved

Ansicht des Beitrags:
Von:
Gast90350
Datum:
07.10.2019 22:51:45
Views:
42
Rating: Antwort:
  Ja
Thema:
Excel VBA Kreissegmente mit einem Doppelklick farblich füllen

Hi,

im Kreis-Diagramm so:

Private Sub Chart_BeforeDoubleClick(ByVal ElementID As Long, ByVal Arg1 As Long, ByVal Arg2 As Long, Cancel As Boolean)
  On Error Resume Next
  ActiveChart.SeriesCollection(Arg1).Points(Arg2).Interior.Color = RGB(255, 255, 0)
  Cancel = True
End Sub

im Netzdiagramm so:

Private Sub Chart_BeforeDoubleClick(ByVal ElementID As Long, ByVal Arg1 As Long, ByVal Arg2 As Long, Cancel As Boolean)
  On Error Resume Next
  ActiveChart.SeriesCollection(Arg1).Interior.Color = RGB(255, 255, 0)
  Cancel = True
End Sub

Vorraussetzung: Das Diagramm ist als eigenständiges Blatt platziert und der Code steht in dessen Modul.

Außerdem musst du im Kreisdiagramm erst ein einzelnes Segment anklicken (auswählen), bevor du darauf (oder woanders) doppelklicken kannst.

Und "runde Ecken" gibt es nicht. Zumindest nicht im Netzdiagramm. Oder doch ?!? 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst genau und ausführlich
  • 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
  • Bitte markieren Sie Ihre Anfrage als erledigt wenn Ihnen geholfen wurde
Thema: Name: Email:

 
 

Thema Datum  Von Nutzer Rating
Antwort
07.10.2019 11:40:43 Gast2155
NotSolved
Blau Excel VBA Kreissegmente mit einem Doppelklick farblich füllen
07.10.2019 22:51:45 Gast90350
NotSolved