Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
Linie in einer Grafik ansprechen |
02.07.2008 10:27:07 |
SH |
|
|
|
02.07.2008 21:18:36 |
Holger |
|
|
|
03.07.2008 08:29:53 |
SH |
|
|
|
03.07.2008 15:54:05 |
Holger |
|
|
Von:
SH |
Datum:
02.07.2008 10:27:07 |
Views:
1989 |
Rating:
|
Antwort:
|
Thema:
Linie in einer Grafik ansprechen |
Hallo zusammen,
ich habe nochmal eine Frage bezüglich einer Linie in einer mit VBA erstellten Grafik:
Ich möchte diese Linie formatieren, aber nur, wenn sie auch wirklich vorhanden ist.
Der Hintergrund dazu ist, dass ich dem Nutzer des Programms die Möglichkeit gebe aus sieben Optionen zu wählen, wenn er jedoch nur drei wählt, soll das Programm auch nur drei Linien anzeigen. Das funktioniert auch.
Nur das formatieren dieser Linien funktioniert nicht, VBA bricht das Berechnen des Codes an dieser Stelle ab.
Hier mein Code:
If ActiveChart.SeriesCollection(1) = True Then
ActiveChart.SeriesCollection(1).Select
ActiveChart.SeriesCollection(1).ApplyDataLabels AutoText:=True, ShowValue:=True
With Selection
.Border.ColorIndex = 57
.Border.Weight = xlMedium
.Border.LineStyle = xlContinuous
.MarkerBackgroundColorIndex = xlAutomatic
.MarkerForegroundColorIndex = xlAutomatic
.MarkerStyle = xlSquare
.MarkerSize = 5
End With
ActiveChart.SeriesCollection(1).DataLabels.Select
With Selection
.Position = xlLabelPositionBelow
End With
Else
MsgBox "Linie nicht vorhanden", vbInformation Or vbOKOnly, "Infobox"
End If
Vielen Dank für eure Hilfe!!
Viele Grüße,
Sebastian |
- 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
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- 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
|
Linie in einer Grafik ansprechen |
02.07.2008 10:27:07 |
SH |
|
|
|
02.07.2008 21:18:36 |
Holger |
|
|
|
03.07.2008 08:29:53 |
SH |
|
|
|
03.07.2008 15:54:05 |
Holger |
|
|