activesheet.cells(array?)

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Hi
dass du bei den Arrays den Fehler bekommst, liegt nicht am Array, sondern daran, dass du bei den Arrays noch ein Leerzeichen nach dem Komma eingefügt hast und beim ersten Versuch nicht.
1. Einzelwert: Var="1,6"
2. Array var(0)="1, 6"
jetzt ist es so, das Cells als ersten Parameter unbedingt eine Ganzzahl benötigt (Zeilen, oder Positionsnummer), du lieferst aber einen Text (wegen der Anführungszeichen).
VBA haut dir das aber nicht sofort als Fehler um die Ohren sondern versucht erstmal, den Text in eine Zahl zu wandeln und wenn möglich mit dieser weiter zu arbeiten.
nur wenn der Text nicht in eine Zahl wandelbar ist, bekommst du einen Fehler.
und so ist auch dein Ergebnis: "1,6" wird als Kommazahl erkannt und in die Zahl 1,6 gewandelt.
aufgerundet zur Ganzzahl ergibt das im Code


Cells(2)

und das ist korrekter Code.
anders sieht es mit dem "1, 6" aus. durch das Leerzeichen ist dieser Text nicht mehr als Zahl erkennbar und kann daher nicht gewandelt werden. VBA muss daher mit einem Fehler abbrechen.
falls du irgendwie vorhattest, das aus dem Text "1, 6"das Wertpaar 1 und 6 wird, dann vergiss das.
es ist nicht möglich, Text in Anführungszeichen bzw Textvariablen mit VBA-Quellcode zu verbinde, so dass dieser ausgeführt werden kann. Text und Quellcode sind komplett von einander unabhängig und nicht miteinander zu verbinden.
wenn du hier mit einer Variable arbeiten willst, nimm Range statt Cells:

dim var(2) as string
var(0) = "F1"
var(1) = "E1"
var(2) = "D1"
if activesheet.Range(var(2)) = "" then
msgbox "hallo"

gruß Daniel

ok, vieles wurde schon geschrieben.
die Normale Version von Cells braucht zwei Eingabe Parameter, Zeilennummer und Spaltennummer.
du kannst diese zwar gemeinsam in eine einer Variable Speichern, aber für die Eingabe in Cells musst du die Werte wieder auftrennen und als zwei Werte angeben.
wäre beispielsweise so möglich:

var(2) = Array(1, 6)
..Cells(Var(2)(0), Var(2)(1))...

wenn du bei Cells aber nur einen Einzigen Wert angeben willst, geht das auch, dann musst du die Positionsnummer angeben.
hierbei werden die Zellen zeilenweise von links nach rechts durchnummeriert, dh die Zeilennummer berechnet sich nach diesem Schema:
Spaltennummer + (Zeilennummer - 1) * Anzahl_Spalten
dh in deinem Fall:

var(0) = 6
var(1) = 5
var(2) = 4
...Cells(var(2))...

gruß Daniel

Beliebteste Forumthreads (12 Monate)

23 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

23
Beiträge zum Forumthread

Beiträge zu diesem Forumthread