![](/file/23469/CHIP_25Jahre_Jubilaeum.iso/images/spacing.gif) |
Wert aus einem Makro in eine Zelle schreiben
Ich möchte den Wert einer Zelle in einem Makro verarbeiten und dann wieder aus dem Makro in eine beliebige Zelle schreiben. Ist dies möglich?
Sie können genauso einfach Werte aus einem Makro in eine beliebige Zelle schreiben, wie Sie innerhalb des Makros beliebige Zellen auslesen und weiterverarbeiten. Die Zellen lassen sich dabei auf verschiedene Art und Weise ansprechen.
Am flexibelsten ist es, die Zellen über ihre Koordinaten in der Excel-Tabelle anzusteuern. Jede Zelle läßt sich durch Zeilen- und Spaltennummer eindeutig beschreiben. Um den Wert aus der zweiten Zelle der ersten Zeile zu lesen, müssen Sie daher folgenden VBA-Befehl nutzen.
Dabei definiert das Objekt »Worksheets« die Tabelle der entsprechenden Arbeitsmappe, wobei Sie diese durch ihren Namen ansprechen. »Worksheets« enthält seinerseits die Objekte »Cells«, die über die Eigenschaft »Value« verfügen. Über diese Eigenschaft können Sie auf den Inhalt der Zelle zugreifen.
Die Koordinaten können Sie auch über Variablen des Typs »integer« angeben. Auf diese Weise ermittelt das VBA-Makro erst während der Laufzeit die Koordinaten der benötigten Zelle, zum Beispiel innerhalb einer Schleife, um eine Reihe von Zellen auszulesen. Die Variablen müssen so definiert sein: »Dim A, B As Integer«.
Um mit dem Makro in eine Zelle zu schreiben, müssen Sie die oben angegebene Zuweisung einfach etwas ändern. So weisen Sie der über die Variablen angesprochenen Zelle den Inhalt der Variablen »Wert« zu:
Wert = Worksheets ("Tabelle1").Cells (1, 2).Value
Worksheets ("Tabelle1").Cells ([A], [B]).Value = Wert
|
![](/file/23469/CHIP_25Jahre_Jubilaeum.iso/images/spacing.gif) |