Supportnet / Forum / Tabellenkalkulation
ActiveCell.Value und Zellberechnungen
Frage
Hallo,
habe folgendes Problem:
Ich lege in meinem Makro einen Zellwert fest
ActiveCell.Value = 1
Die "1" steht dann auch in der entsprechenden Zelle, doch sie wird dann nicht zur Berechnung durch die Summenfunktion herangezogen, obwohl die Zelle als Zahl formatiert ist. Der Wert wird also quasi ignoriert.
Wie kann ich das vermeiden?
Grüße
Janu
Antwort 1 von Event
Hallo
Posten mal Dein Makro.
Wenn ich das im Direktfenster ausführe geht das, bei mir.
Gruß
Posten mal Dein Makro.
Wenn ich das im Direktfenster ausführe geht das, bei mir.
Gruß
Antwort 2 von nighty
hi all :)
extras/optionen/berechnung/reiter auf automatisch
oder aktualisierung im makro mit einarbeiten
gruss nighty
extras/optionen/berechnung/reiter auf automatisch
oder aktualisierung im makro mit einarbeiten
gruss nighty
Antwort 3 von Janu
Bei mir is die Berechnung automatisch, auch ein F9 drücken führt zu keiner lösung.
Makro exemplarisch wie folgt (könnts ja nachtesten):
Gebt in die Zelle A1 den Wert 5 ein und
in die Zelle A3
=summe(a1:a2)
Makro:
Sub Test()
Range("A2").Select
ActiveCell.Value = 5
end sub
Ihr werdet sehen, dass zwar in A2 eine 5 steht, die summe aber 5 und nicht 10 ist...
weiter ideen?
gruß
Janu
Makro exemplarisch wie folgt (könnts ja nachtesten):
Gebt in die Zelle A1 den Wert 5 ein und
in die Zelle A3
=summe(a1:a2)
Makro:
Sub Test()
Range("A2").Select
ActiveCell.Value = 5
end sub
Ihr werdet sehen, dass zwar in A2 eine 5 steht, die summe aber 5 und nicht 10 ist...
weiter ideen?
gruß
Janu
Antwort 4 von coros
Hi Janu,
also wenn ich das was Du da geschrieben hast mal bei mir teste, funktioniert das. Warum das bei Dir nicht so ist, kann ich Dir leider im Moment auch nicht sagen, damir als einzige Lösung das von @nighty einfällt. Aber versauch doch mal am Ende Deines Makros ein Application.Calculate zu setzen. Das veranlaßt, dass die Seite neu berechnet wird.
Dein Code müsste dann also folgendermaßen aussehen:
Sollte dass dann immer noch nicht gehen, müsste man mal Deine Datei haben um zu testen, ob das Problem auch auf anderen Rechnern auftritt und um die EInstellungen mal zu kontrolieren.
MfG,
Oliver
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du ein
Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.
also wenn ich das was Du da geschrieben hast mal bei mir teste, funktioniert das. Warum das bei Dir nicht so ist, kann ich Dir leider im Moment auch nicht sagen, damir als einzige Lösung das von @nighty einfällt. Aber versauch doch mal am Ende Deines Makros ein Application.Calculate zu setzen. Das veranlaßt, dass die Seite neu berechnet wird.
Dein Code müsste dann also folgendermaßen aussehen:
Sub Test()
Range("A2").Select
ActiveCell.Value = 5
Application.Calculate
End SubSollte dass dann immer noch nicht gehen, müsste man mal Deine Datei haben um zu testen, ob das Problem auch auf anderen Rechnern auftritt und um die EInstellungen mal zu kontrolieren.
MfG,
Oliver
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du ein
Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.
Antwort 5 von Janu
liegt tatsächlich an meinem rechner (oder excel). auf einem anderen klappts auch...hm
ich versuch mal ne neuinstallation von excel (denn vor einigen wochen klappte es ohne probleme)
danke für hilfe!
ich versuch mal ne neuinstallation von excel (denn vor einigen wochen klappte es ohne probleme)
danke für hilfe!