1. Liebe Forumsgemeinde,

    aufgrund der Bestimmungen, die sich aus der DSGVO ergeben, müssten umfangreiche Anpassungen am Forum vorgenommen werden, die sich für uns nicht wirtschaftlich abbilden lassen. Daher haben wir uns entschlossen, das Forum in seiner aktuellen Form zu archivieren und online bereit zu stellen, jedoch keine Neuanmeldungen oder neuen Kommentare mehr zuzulassen. So ist sichergestellt, dass das gesammelte Wissen nicht verloren geht, und wir die Seite dennoch DSGVO-konform zur Verfügung stellen können.
    Dies wird in den nächsten Tagen umgesetzt.

    Ich danke allen, die sich in den letzten Jahren für Hilfesuchende und auch für das Forum selbst engagiert haben. Ich bin weiterhin für euch erreichbar unter tti(bei)pcwelt.de.
    Dismiss Notice

Excel-Makro Worksheet_Change(ByVal Target As Range)

Discussion in 'Office-Programme' started by tomica, Sep 11, 2006.

Thread Status:
Not open for further replies.
  1. tomica

    tomica Kbyte

    Private Sub Worksheet_Change(ByVal Target As Range)
    [a15].Value = [a15].Value + 10
    End Sub

    Kann mir jemand erklären, wieso sich auf einem leeren Tabellenblatt der Wert von A15 sich jeweils um 2210 erhöht -anstatt um 10?!!! :aua:

    tomica
     
    tomica, Sep 11, 2006
    #1
  2. Geertakw

    Geertakw Kbyte

    Hi


    Die Worksheet_change sub ändert das Blatt und ruft sich selbst auf, bis irgenein Stack voll ist ( bei mir 217 mal )

    Eine Abhilfe ( gibt sicher noch andere )

    Public flag As Boolean
    Private Sub Worksheet_Change(ByVal Target As Range)
    If flag = False Then
    flag = True
    [a15].Value = [a15].Value + 10
    Else
    flag = False
    End If
    End Sub

    Beim zweiten Aufruf, wird nichts geändert, so daß die Aufrufe
    abgebrochen werden.

    HTH
    G.
     
    Geertakw, Sep 11, 2006
    #2
  3. tomica

    tomica Kbyte

    herzlichen dank
     
    tomica, Sep 11, 2006
    #3
Thread Status:
Not open for further replies.

Share This Page