Das Archiv des Excel-Forums

Variable verändert Wert

Bild

Betrifft: Variable verändert Wert
von: Franz W.

Geschrieben am: 13.10.2003 18:00:49

Hallo Forum,

ich kämpfe mit einer Variablen, die verändert im Laufe des Makros ihren Wert und ich weiß nicht warum.

In der Spalte C steht eine Nummer, in der Spalte D ein Name und dazu ein Kommentar. Hier der Code:


Private Sub Worksheet_Change(ByVal Target As Range)
r = Target.Row
c = Target.Column
If Not c = 3 Then Exit Sub
Worksheets("Ablesungen").Unprotect
myStart = Target.Address
If c = 3 And Cells(r, c).Value = "" Then
Cells(r, c + 1).Value = ""
If Not Cells(r, c + 1).Comment Is Nothing Then Cells(r, c + 1).Comment.Delete
GoTo weiter
End If
End Sub


Wenn ich nun in Spalte C die Nummer lösche, wird in Spalte D der Name gelöscht, ABER DER KOMMENTAR NICHT!

Wenn ich vor die Zeilen 7, 8 und 9 einen Haltepunkt setze, so ist zunächst c immer = 3, bis zum letzten Stopp, da ist dann r = 4. Das heißt also, nach der Zeile...

Cells(r, c + 1).Value = ""

... wird r auf 4 erhöht.

Kann mir das bitte jemand erklären?

Vielen Dank schon mal für Eure Hilfe

Grüße
Franz
Bild


Betrifft: hab ne Lösung
von: Franz W.
Geschrieben am: 13.10.2003 19:13:16

Hallo Forum,

hab zwar noch nicht rausgefunden, warum das passiert, hab's aber jetzt durch eine Umgehung gelöst:


Private Sub Worksheet_Change(ByVal Target As Range)
Application.Calculation = xlCalculationAutomatic
r = Target.Row
c = Target.Column
If Not c = 3 Then Exit Sub
Worksheets("Ablesungen").Unprotect
myStart = Target.Address
Range(myStart).Select
If Range(myStart).Column = 3 And Range(myStart).Value = "" Then
Range(myStart).Offset(0, 1).Value = ""
If Not Range(myStart).Offset(0, 1).Comment Is Nothing Then Range(myStart).Offset(0, 1).Comment.Delete
GoTo weiter
End If
End Sub


Damit haut's hin.

Grüße
Franz


 Bild

Excel-Beispiele zum Thema " Variable verändert Wert"

Variablenübergabe in andere Arbeitsmappen download Text aus Textbox in Variable download
Einlesen von Zellinhalten in Variablen download Variable in Formel einbauen download
Variable in Excel-Formel einbauen. download Text aus UserForm-Textbox in Variable einlesen download
Variable in Zwischenablage übernehmen download Variablen in einer temporären Textdatei zwischenspeichern download
Zellinhalte in Verbindung mit Variablen in Textdatei schreiben download Feldvariable auf Inhalt testen download
Umgebungsvariable aus der autoexec.bat auslesen download Textvariable in eine UserForm-TextBox eintragen download
Zinstabelle mit variablen Rückzahlungen download Auflistung der Kalenderwochen eines variablen Jahres download
Namen nach dem Zufallsprinzip in variable Gruppen aufteilen download Kapitalverzinsung mit fixen Raten und variablen Zinsen download
Darlehensverzinszung bei variablen Rückzahlungsraten download Variablen auf mehrere Arten in Funktionen integrieren download
Benennung und Wert von Umgebungsvariablen ermitteln download Mit variablem oberer und unterer Rahmenlinie drucken download
Arbeitsblatt an variable Email-Adresse per Outlook versenden download Variable Spalten in UserForm-ComboBox einlesen download