PDA

Vollständige Version anzeigen : Makro bei Neuberechnung im Blatt


Borgomi
27.03.2012, 14:12
Hallo,

ich habe folgendes Problem:

Ich würde gern ein Makro haben, der bei Neuberechnung in den Zellen einer Zeile in bestimmtem Arbeitsblatt anspringt und am Endeffekt einen bestimten Wert in eine andere Zelle des Blattes unter dieser Zeile aber in der gleichen Spalte ausgibt.

Mit Worksheet_Change(ByVal Target As Range) wäre es machbar nur wenn ich selbst einen neuen Wert in eine der Zeilen des Arbeitsblattes eingeben würde. Die Prozedur Worksheet_Calculate hat aber als Input kein Range. Daher kann ich die Prozedur, so glaube ich, nicht benutzen. Range von Target brauche ich um die Spaltennummer zu bestimmen.

Vielen Dank im Voraus für die Hilfe
VG

Hajo_Zi
27.03.2012, 14:50
benutze
Private Sub Worksheet_Calculate()

<img src="http://Hajo-Excel.de/images/grusz1.gif" align="middle" height="40" alt="Grußformel"><a href="http://Hajo-Excel.de/index.htm" onclick="window.open(this.href);return false"><img border="0" src="http://Hajo-Excel.de/images/logo_hajo3.gif" align="middle" height="40" alt="Homepage"></a>

Borgomi
27.03.2012, 15:22
DAnke für die Antwort,

leider, wie ich schon gesagt habe, brauche ich die Spaltennummer der geänderten Zelle. Dies ist nach meinem Verständnis mit "Private Sub Worksheet_Calculate()" nicht möglich.

Weiterhin nach dem einfügen des Wertes möchte ich, dass die ganze Arbeitsmappe alles zuerst durchrechnet, damit ich mit der selben Prozedur wieder den neuen Wert mit dem davor berechneten vegleichen kann.

Gehe ich richtig davon aus, dass Me.Parent.Parent.Calculate (wobei Me meine Arbeitsmappe ist) dies veranlassen soll.

Viele Grüße

Hajo_Zi
27.03.2012, 15:26
Du hast geschrieben
Ich würde gern ein Makro haben, der bei Neuberechnung
und dafür habe ich die richtige Aktion vorgeschlagen. Das dies Einfach ist habe ich nicht geschrieben und ich werde auch keinen Code erstellen, da mir klar ist das dies fürchtlich aufwendig ist.

<img src="http://Hajo-Excel.de/images/grusz1.gif" align="middle" height="40" alt="Grußformel"><a href="http://Hajo-Excel.de/index.htm" onclick="window.open(this.href);return false"><img border="0" src="http://Hajo-Excel.de/images/logo_hajo3.gif" align="middle" height="40" alt="Homepage"></a>