Thema Datum  Von Nutzer Rating
Antwort
Rot Diagrammbereich festlegen
18.05.2020 11:44:23 Till
Solved
18.05.2020 13:13:22 Gast49221
Solved
18.05.2020 13:22:34 Mase
NotSolved

Ansicht des Beitrags:
Von:
Till
Datum:
18.05.2020 11:44:23
Views:
30
Rating: Antwort:
 Nein
Thema:
Diagrammbereich festlegen

Hallo ich möchte, dass der Nutzer die Kalenderwochen welche im Diagramm dargestellt werden sollen angeben kann. Dazu habe ich zwei Zellen erstellt, wo der Nutzer zB von 12. KW bis zur 45. KW eingeben kann. Dann soll im Diagramm der Bereich von der 12. KW bis zur 45. KW dargestellt werden.

Dabei starten die Werte in einem anderen Tabellenblatt mit Zelle "P4" (1. Wert startet bei KW 12) und gehen bis zu 52. KW mit Zelle "BD5".

Sprich der Bereich von KW 12 bis KW 18 wären zB "P4:V5". 

Nun wollte ich das mit der Formatierung Cells(Zeile, Spalte) angeben, weil ich damit die Zeile definieren könnte als "eingebene Zahl + 4". Warum + 4? Weil KW 12, die 16. Spalte in dem Fall wäre.

Mein Code sieht wie folgt aus:

 

Sub Diagramm1()
 
Dim Von As Integer
Dim Bis As Integer
 
Von = Range("D43").Value + 4
Bis = Range("G43").Value + 4
 
If Von < 16 Or Von > 56 Or Bis < 16 Or Bis > 56 Then
MsgBox "Die Kalenderwoche liegt außerhalb des Auswertungungsbereiches (Jahr 2020)!", vbInformation, "Hinweis"
ElseIf Von > Bis Then
MsgBox "'VON' darf nicht größer als 'BIS' sein!", vbInformation, "Hinweis"
Else
    Worksheets("Yusuf").ChartObjects("Diagramm 3").Chart.SetSourceData Source:=Sheets("Diagrammdaten").Range(Cells(4, Von), Cells(5, Bis))
End If
 
End Sub
 
 
Funktioniert alles schön und gut, bis auf die Formatierung von dem Chart Code! Habe auch versucht nur mit Zahlen, statt Variablen funktioniert aber auch nicht. Der Code funktioniert mit einem Rangebereich wie "P4:V5", aber nicht mit der Cells Formatierung. Was muss ich ändern?
 
LG Till

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
Rot Diagrammbereich festlegen
18.05.2020 11:44:23 Till
Solved
18.05.2020 13:13:22 Gast49221
Solved
18.05.2020 13:22:34 Mase
NotSolved