Supportnet Computer
Planet of Tech

Supportnet / Forum / Tabellenkalkulation

Change





Frage

hallo ich habe eine excelmappe und mehrere blätter. auf einen blatt habe ich folgenden code liegen, um auf änderungen reagieren zu können. [code]Private Sub Worksheet_Change(ByVal Target As Range) ... End Sub [/code] so, jetzt kann ich mit hilfe von "Target" zB. alle eigenschaften der "geänderten" zellen ändern. kann ich jetzt rausbekommen ob die geänderten zellen in ein bestimmten bereich der tabelle liegen? denn nur dann sollen sie geändert werden. und wie kann ich "Target" an eine Funktion übergeben? wenn ich im code schreibe: [code]function nobe(a) end function [/code] und dann "Target" an die funktion übergebe, bekomme ich eine fehlermeldung. und gibt es eine möglichkeit eine function aufzurufen wenn sich nur ein ganz bestimter bereich eines tabellenblattes ändert? gruss m1cha

Antwort 1 von Coolpix

hi micha,

versuch's mal so

Infos zu Target sammeln und an Funktion übergeben:


Private Sub Worksheet_Change(ByVal Target As Range)
Dim Z, S
Z = Target.Row 'Zelie
S = Target.Column 'Spalte
nobe Z, S 'übergabe an Funktion "nobe"
End Sub


Die Funktion muß in einem Modul stehen:


Public Function nobe(Zeile, Spalte) 
 MsgBox ("Zeile " & Zeile & " Spalte " & Spalte)
End Function




Feedback fänd ich Klasse !!!

Greetings ;-)

Antwort 2 von m1cha

danke @Coolpix

an das "row" und das "column" habe ich gesucht, da bi ich nicht drauf gekommen.

und das mit an die funktion weitergeben da habe ich auch was falsch gemacht.
undzwar habe ich immer mit klammern geschrieben:

nobe (Z, S)


und nicht so:
nobe Z, S



naja jetzt geht es. ist halt die c++ und php "verseuchung". ;o)

gruss micha