PDA

Vollständige Version anzeigen : makro bei zellwertänderung


Alma
19.02.2008, 19:47
hi!

ist es möglich, einen bestimmten code auszuführen, wenn der wert in der range("A1:A5") geändert wird?

schon mal danke im voraus!
lg

IngGi
19.02.2008, 20:50
Hallo Alma,

in VBA gibt es sogenannte Eregnismakros. Diese starten, wenn ein bestimmtes Ereignis stattfindet. Es gibt ein Ereignis "Änderung im Tabellenblatt", für das man ein solches Makro schreiben kann. In diesem Makro kann man dann prüfen, welche Zelle(n) geändert wurden und wenn es die falschen sind, gleich wieder aus dem Makro rausspringen.

Beispiel:

<div><link href="http://www.ms-office-forum.net/forum/externals/codeconv.css" rel="stylesheet"><pre><span class="TOKEN">Private Sub</span> Worksheet_Change(<span class="TOKEN">ByVal</span> Target <span class="TOKEN">As</span> Range)
<span class="TOKEN">If</span> <span class="TOKEN">Not</span> Intersect(Target, Range(&quot;A1:A5&quot;)) <span class="TOKEN">Then</span> <span class="TOKEN">Exit Sub</span>
<span class="REM">'hier weiterer Code</span>
<span class="TOKEN">End</span> <span class="TOKEN">Sub</span>
&nbsp;</pre></div>
Code eingefügt mit dem MOF Code Converter (http://www.ms-office-forum.net/forum/codeconverter.php)Gruß Ingolf

Alma
21.02.2008, 11:45
hi inggi!
danke frü dein hilfe! hab nicht geglaubt, dass das so einfach geht!
danke!!
lg