title image


Smiley Re: VBA - Beschreibung "Zelleintrag gelöscht"
Hallo!



Probier mal folgendes aus:



Private Sub Worksheet_Change(ByVal Target As Excel.Range)

On Error GoTo Ende

If Target = "" Then

Application.EnableEvents = False

Target.Offset(, 1) = ""

End If

Ende:

Application.EnableEvents = True

End Sub



Hierbei bitte beachten:

Nicht die activecell hinzuziehen, sondern target!

activecell ist die Zelle, in der Du NACH der Änderung bist, target ist der Bereich, der zuvor geändert worden ist.

Und setze application.enablevents auf false und am Schluss erst wieder auf true, sonst wird durch die Änderung die Prozedur nochmals ausgelöst.



Gruß

Manes
Ob ich Spotlight gut finde? Also wenn ich ehrlich sein soll, müsste ich lügen!

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: