"wenn leer dann .. ""

[großPanda]

hallo ich gruesse euch

folgendes problem>

in Spalte A steht a1 7 a3 5 a7 4 a9 2

in Spalte B steht irgendwo die summe einer anderen berechnung hier beispielsweise 16


alle nicht belegten zeilen in Spalte A sollen mit der ziffer 1 belegt werden, bis die Summenzahl der Spalte B im Beispiel 16 erreicht ist

weiss jemand rat vielen dank im voraus

Manfred

[AhQ]

Hallo Panda,

ich hab mal in A1 bis A3 Werte und in B1 hab ich die maximale Summe geschrieben. ab a4 hab ich dann folgende Formel reingeschrieben:

=WENN(SUMME(A$1:A3)<$B$1;1;"")

Die ziehst Du soweit Du für nötig erachtest.

Viele Grüße
AhQ

[großPanda]

hallo AHQ

vorweg vielen dank für deine Mühe, leider habe ich mich in meiner Fragestellung allerdings wohl etwas verworren
oder mißverständlich ausgedrückt!

Die erste Bedingung soll nicht lauten schreibe 1 wenn summe kleiner als in Spalte B

sondern Schreibe in Zellen der Spalte A den Wert 1 sofern diese vorher leer war. Das Problem liegt also insbesondere darin, dass zellen abwechselnd
vor der Formel bereits belegt oder eben leer waren.

Hoffe meine Frage präziser gestellt zu haben und wann Du oder jemand anders Lust hat darauf nochmals einzugehen, bin ich erfreut und dankbar

[Karolus]

Hallo
Per Zellformel ist die Aufgabenstellung nicht sinnvoll lösbar, dazu bräuchtest du schon ein Makro.
Sollen bei der Summenbildung die bereits vorhandenen Einträge mitsummiert werden oder nur die Einzen ?

Gruß Karo

[großPanda]

Hallo Karolus

erstmal danke, ja die bereits verstreut vorhandenen Einträge sollen mitsummiert werden.

[Karolus]

Hallo

.... ja die bereits verstreut vorhandenen Einträge sollen mitsummiert werden.

Ähhem, gleich die Gesamtsumme aus Spalte A, oder nur die Summe bis zur aktuellen Zeile ?

Gruß Karo

[großPanda]

oh sorry für die bruchstückhafte darstellung meinerseits und thx für die mühe

i

[Karolus]

Hallo Manfred

Code: Alles auswählen

Sub auffuellen_Endwert
odoc = ThisComponent
osheet = odoc.sheets(0)  'erste Tabelle ! evtl. anpassen !
do
	ocellwert = osheet.getcellbyposition(0,izeile).value
	asumme = asumme + ocellwert	
	if ocellwert = 0 then
		osheet.getcellbyposition(0,izeile).value = 1
		asumme = asumme +1
	end if	
	izeile = izeile +1
	
loop until asumme >= osheet.getcellrangebyname("B1").value or asumme >= 30
	
End Sub

Tut dat dat ?

Gruß Karo

[großPanda]

Vielen dank für die MÜhe, werde mir das in den nächsten Tagen anschaun,

sobald ich wieder klaren kopf habe ) hoffe habe mich nicht verritten in der beschreibung und mich

sofern doch noch frage auftaucht wieder melden.

schönes WE
Manfred