Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Diagramm über Cells(1,1) füllen?

Forumthread: Diagramm über Cells(1,1) füllen?

Diagramm über Cells(1,1) füllen?
21.11.2003 07:58:30
Lukas
Zur Zeit fülle ich das Diagramm , wie folgt:
Mit RANGE("A52:A99") als Beispiel!

ActiveChart.SetSourceData Source:=Sheets("Tonnage").Range("" & CStr(spalte) & "52:" & CStr(spalte) & "" & CInt(t + startwert - 1) & ""), _
PlotBy:=xlColumns


Ich müsste aber das Ganze über CELLS(y,x)ansteuern,um nicht über ein Array die Spalten ansprechen zu müssen.

ActiveChart.SetSourceData Source:=Sheets("Tonnage").Range(Sheets("Tonnage").Cells(52, 3), Sheets("Tonnage").Cells(62, 3))

Leider nimmt er dabei immer nur einen Wert und setzt den auf der ersten Position der X-Achse. Wie kann ich also mit Cells einen "von bis Bereich" ansprechen?????

Eine andere Lösung meines Problem wäre:
Mit Buchstaben zu addieren! geht dies? (SPALTE A) + 1 = SPALTE B


HELP!!!


Danke

Lukas
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Spalten addieren
21.11.2003 08:47:05
Harald Kapp
Hallo Lukas,
zum ersten teil habe ich keine Antwort.
Zum Addieren von Spalten hilft Dir evtl folgendes Codefragment:

If Target.Column > 26 Then
S_Alpha = Chr(Asc("A") + (Target.Column \ 26) - 1) & Chr(Asc("A") + (Target.Column Mod 26) - 1) ' = div-Operator
Else
S_Alpha = Chr(Asc("A") + Target.Column - 1)
End If

Gruß Harald
Anzeige
AW: Spalten addieren
21.11.2003 09:35:54
Lukas
Klasse, das hilft mir schon viel weiter!!! Auf diese Idee
wäre ich so schell gekommen. Einfach mit ASCII! Weltklasse


THX

Lukas
;

Forumthreads zu verwandten Themen

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige