Zellbezeichnung in Zelle ausgeben für Solver berechnung :: Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office

Einloggen, um private Nachrichten zu lesen

Downloads

[Excel 2007] Zellbezeichnung in Zelle ausgeben für Solver berechnung

Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office Foren-Übersicht » Microsoft Excel Hilfe

Autor

Nachricht

homax
Newbie
Newbie

Anmeldedatum: 20.03.2008
Beiträge: 26

Verfasst am: 06.06.2008, 17:16

Hallo Forum,

um die Solver Funktion im vorhandenen Makro nutzen zu können, muss ich vorher Formeln in die Zellen eingeben.

Mein Code

Code:

Cells(1, j_column_pr + 4).Value = "Mittelwert"
Cells(2, j_column_pr + 4).Value = a(1)
Cells(1, j_column_pr + 5).Value = "Amplitude"
Cells(2, j_column_pr + 5).Value = a(2)
Cells(1, j_column_pr + 6).Value = "Phase"
Cells(2, j_column_pr + 6).Value = a(3)

Cells(i, j_column_pr + 2).Formula = "sum(a(1)+a(2)+a(3))"

Die Formel ist etwas komplizierter, soll nur als beispiel dienen.

Mein Ziel ist es nun, dass für a(x) die jeweilige Zellbezeichnung ausgegeben wird.
z.B H2 für a(1); I2 für a(2); J2 für a(3)
damit ich im nächsten Schritt den Solver anhand dieser Formeln nutzen kann.

Vielen Dank
homax

schatzi
Moderator

Anmeldedatum: 09.12.2006
Beiträge: 5725

Verfasst am: 07.06.2008, 14:30

Hallo!

Die Formel kannst du dir aus den Strings zusammenbauen:

Cells(i, j_column_pr + 2).Formula = "=" & Cells(2, j_column_pr + 4).Address & "+" & Cells(2, j_column_pr + 5).Address & "+" & Cells(2, j_column_pr + 6).Address

_________________

Viele Grüße vom Schatzi
------------------------
Ich bin nur noch sporadisch erreichbar!
Bitte hofft nicht auf eine schnelle Beantwortung einer Rückfrage meinerseits!
Jeder andere Helfer darf Rückfragen gerne übernehmen!

homax
Newbie
Newbie

Anmeldedatum: 20.03.2008
Beiträge: 26

Verfasst am: 08.06.2008, 14:02

Das war genau der Befehl den ich gesucht habe:-)

Vielen Dank

Allerdings habe ich jetzt immer das Problem das z.B. bei

Code:

Cells(2, j_column_pr + 7).Formula = "=SUMME(" & Cells(nstart, j_column_pr + 7).Address & ":" & Cells(imax + nstart, j_column_pr + 7).Address & ")"

in der Excel Zelle zwar die Formel "=SUMME($W$3:$W$33)" steht, jedoch nicht berechnet wird bzw. nicht als Formel erkannt wird. Erst nach einer Änderung z.B. 33 neu eintippen und Enter wird auch gerechnet. Und das unabhängig von der Zellformatierung.
Wieso? Sad

homax
Newbie
Newbie

Anmeldedatum: 20.03.2008
Beiträge: 26

Verfasst am: 08.06.2008, 14:06

Hat sich erledigt mit sum klappts.

Danke

Code:

Cells(2, j_column_pr + 7).Formula = "=SUM(" & Cells(nstart, j_column_pr + 7).Address & ":" & Cells(imax + nstart, j_column_pr + 7).Address & ")"

schatzi
Moderator

Anmeldedatum: 09.12.2006
Beiträge: 5725

Verfasst am: 08.06.2008, 14:11

Hallo!

Wenn du deutsche Funktionsnamen verwenden möchtest, dann nimm "FormulaLocal" statt "Formula".

Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office Foren-Übersicht » Microsoft Excel Hilfe

Thema		Autor	Forum	Antworten	Verfasst am
Ähnliche Beiträge
	Verschiedene Wahlmöglichkeiten in ein...	danini	Microsoft Excel Hilfe	0	13.11.2008, 13:50
	CashFlow Berechnung	Kreili2000	Microsoft Excel Hilfe	2	10.11.2008, 12:32
	VBA Programmierung für eine Zelle auf...	davenport	Microsoft Excel Hilfe	10	03.11.2008, 09:09
	Wert zweier Zellen vergleichen und dr...	Frederic	Microsoft Excel Hilfe	4	31.10.2008, 14:07
	Inhalt mehrer Zellen in eine Zelle	nitro87	Microsoft Excel Hilfe	3	30.10.2008, 20:59

Gehe zu:

Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum posten
Du kannst Dateien in diesem Forum herunterladen

Powered by phpBB © 2001, 2002 phpBB Group :: FI Theme :: Alle Zeiten sind GMT + 1 Stunde
Deutsche Übersetzung von phpBB.de