Office: ActiveCell, Range und FormulaLocal in Excel

Hallo.

Ich habe ein Problem in VBA. Ich möchte, dass Excel in einer bestimmten Zelle einige Zellen nach rechts zählt (diese Anzahl ist variabel) und dann eine Formel einfügt. Die Formel ist banal, es soll nur der Wert aus einer anderen Zelle angezeigt werden (also z. B. "=A1"). Die Herausforderung liegt darin, diese andere Zelle zu bestimmen, denn das ist variabel und wird aus der Zeilen- und der Spaltennummer der besagten Zelle gespeist. Zeilen und Spaltennummer lasse ich vorher erfolgreich suchen, das habe ich mit über eine Messagebox anzeigen lassen.

Mein versuchter Code:

Code:

Das funktioniert aber nicht. Ich habe mich schon so erfolgreich durchgetestet, dass ich gemerkt habe, dass ich wohl noch "Range" einfügen muss, denn in einem etwas einfacheren Makro habe ich dies hier getestet und es funktioniert:

Code:

Leider weiß ich nciht, wie ich in der oberen Formel das Range-Objekt richtig einfüge, denn es muss ja nicht immer die Zelle "A1" sein, sondern die variable Zelle, also ".Offset(0, iRow0)".

Ich hoffe, ich konnte mein Anliegen veständlich beschreiben. Vielen Dank schon einmal vorab für Hilfe!

Ollist

:)

 

Code:

 

Hallo Marco,

vielen Dank für die schnelle Antwort. Leider funktioniert das nicht so, wie gewünscht. Ich habe mein Problem wohl schlecht beschrieben. Sorry. Ich versuche es noch einmal.

Dieser Code führt von der Idee her zum richtigen Ergebnis:
Code:

Das Problem liegt vor dem Gleichheitszeichen. Wenn ich davor einen einfachen Code einsetze (siehe mein zweites Beispiel in meinem Eingangsbeitrag), funktioniert das was nach dem Gleichheitszeichen kommt und führt zum gewünschten Ergebnis. Das was davor steht, brauche ich aber auch variabel. Der Unterschied, den ich erkennen kann, liegt darin, dass ich in meinem einfachen Beispiel noch ein Range-Objekt verwendte habe. Meine Vermeutung: Ich muss in meinem Code noch das Range-Objekt unterbringen, damit es funktioniert. Aber das bekomme ich nicht in die Formel eingebaut. Ich hatte es z. B. so (erfolglos) versucht:
Code:

Und noch einmal anders beschrieben: Ich habe drei Integer: iRow0, iRow1, iColumn1. Es geht darum, dass Excel von meiner Ausgangszelle die Anzahl von "iRow0"-Zellen nach rechts zählt, diese Zelle aktiviert/selektiert und in diese dann die Formel einbaut, die nach dem Gleichheitszeichen steht, nämlich Verweis auf die Zelle "iColumn1, iRow1".
Beispiel:
Ich befinde mich in Zelle A20.
iRow ist 8 (= Spalte H)
iRow1 ist 10 (= Spalte J)
iColumn1 ist 12 (= Zeile 12)
Dann soll in Zelle H20 die Formel stehen "=J12".


Ich hoffe, ich konnte es nun etwas besser beschreiben.

Danke noch einmal für jede Hilfe.
OlliSt

 

Moin
Code:

Bei Offset must du 1 abziehen.
Bei Offset gilt: nicht incl. der aktiven Zelle.

Warum benennst du z.Bsp. iRow0 als Row(Zeile) obwohl du Spalte meinst?
gruss hary

 

Moin OlliSt,

poste doch mal Deine Prozedur.
ActiveSheet, ActiveCell usw brauchst Du i.d.R nicht bis selten.

Wie schon geschrieben steht:
Cells(Zeile, Spalte)

 

Hallo hary,

ich Esel habe am Ende meiner Formel nur das ".Address(False, False)" vergessen. Schon funktioniert alles. Hätte ich ohne deinen Hinweis nicht gefunden. Danke!
Und Danke auch für den Hinweis zur Reihenfolge Row und Column; war natürlich verkehrt herum. Den Fehler konnte ich also auch gleich beheben.

Hier wird einem immer kompetent geholfen. Super!

Viele Grüße
OlliSt