ich um dieses Thema viele Beiträge gelesen habe, aber nichts für mein Szenario scheint zu funktionierenWorksheet_Change nicht nach oben abfeuert, wenn Live-Streaming-Daten
würde Ich mag zu Call Sub
auf Zellenwechsel (B2), die Futtermittel Live-Daten enthält von einer externen Quelle - last updated
:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Target.Worksheet.Range("B2")) Is Nothing Then
Call SubName
End If
End Sub
ging ich, wenn Äpplication.EnableEvents = True
zu überprüfen, was darauf hindeutet, oder erstellen Funktion zahlreiche Beiträge über die Änderung zu erkennen (die Arbeit der Fall ist, aber ich kann sub innerhalb Funktion nicht aufrufen) - ohne Erfolg.
Interestnigly enough, when I click on B2 and press enter - it executes the sub
Dank
Der Code sieht korrekt aus. Haben Sie den Code in den Arbeitsblattobjekten für das Blatt gespeichert, das ausgelöst werden soll? Wenn Sie es nur in einem Modul speichern, wird es nicht funktionieren. –
Warum brauchen Sie 'Wenn nicht schneiden (Target, Target.Worksheet.Range (" B2 ")) Ist nichts Then', verwenden Sie einfach' Wenn nicht schneiden (Ziel, Bereich ("B2")) ist nichts Then' –
Thx für Ihre Antwort - Ja, der Code ist in dem Arbeitsblatt, das ich verwende. Ziemlich interessant, wenn ich auf B2 drücke und die Eingabetaste drücke - es führt das Sub aus. –