Makro starten durch WENN Formel

[M.Wichmann]

Danke für die Antwort.

Ob das durch Formel oder durch Eingabe passiert, weiß ich nicht.
Wie ich eingangs schon schrieb, ich bin dabei mein wissen in Excel auszubauen.
Ich bin immer mal wieder bei uns dabei, alte Vorlagen und Dokumente zu verbessern, bzw das Handling zu verbessern.

Beim aktuellen kam ich darauf Optionsfelder oder Checkboxen einzubauen, und dadurch etwas zu automatisieren.

Dabei kam ich  auf eine Idee, durch diese Eingaben ein Makro auszulösen ohne unbedingt andere Buttons zu nutzen. und habe hier gefragt ob das überhaupt geht. Aber jetzt habe ich dank dir ja beide Varianten. Jetzt kann ich mit diesem Ansatz noch ein bißchen rumprobieren und versuchen die Aufgabenstellung zu verbessern.

[M.Wichmann]

Habe das mal ausprobiert. Irgendwie will das nicht so recht funktionieren.

Ständig kommen Fehlermeldungen. Auch wenn ich irgendwo was ändere.



Ähnliche Anfrage hier

[Rabe]

Hi,

Ständig kommen Fehlermeldungen. Auch wenn ich irgendwo was ändere.

Ähnliche Anfrage hier

Du trägst Texte in D6-D8 ein und keine Zahlen!

hier Deine korrigierten Makros:

Code:

Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
   If Not Intersect(Target, Range("F5")) Is Nothing Then
       If Range("F5").Value = 1 Then
           Call Eingabe
       End If
   End If
End Sub

Modul1:

Code:

Option Explicit

Sub Eingabe()
'
' Eingabe Makro
'

'
    With Sheets("Tabelle1")
      .Range("D6").Value = 5
      .Range("D7").Value = 6
      .Range("D8").Value = 7
      .Range("D10").Select
    End With
End Sub
Sub löschen()
'
' löschen Makro
'

'
    Sheets("Tabelle1").Range("D6:D8").ClearContents
End Sub

[M.Wichmann]

Hallo Ralf, Makro startet ohne Fehler, so weit so gut. Aber leider nur bei Manuellen Eingaben in F5. Es sollte aber, wenn evtl auch nur indirekt auf zb Optionsfelder reagieren. Und das macht es nicht.

[Rabe]

Hi,

Es sollte aber, wenn evtl auch nur indirekt auf zb Optionsfelder reagieren. Und das macht es nicht.

dann weise die entsprechenden Makros über Rechtsklick den Optionsbuttons zu.

[M.Wichmann]

Das ist klar, wenn es um ein Optionsfeld gehen würde.

Ziel ist es aber das bei einer bestimmten Kombinination von Optionsfelden und evtl Kontrolkästchen, aber auch Formeln das Makro anspringen soll.

Dafür würde ich dann im Hintergrund eine Formel machen das ausrechnet.  Also in F5 erscheint das Ergebniss der einzelnen Eingaben als Zahl.
Dann bei Übereinstimmung soll das aufgenommene Makro anspringen.

[Rabe]

Hi,

hast Du es überhaupt ausprobiert?
Wenn ich dem 1. Optionsbutton das Makro "Eingabe" zuweise und dem zweiten Button das Makro "Löschen" dann werden bei Klick die Makros gestartet.
Wenn ich in Zelle F5 etwas eintrage, wird bei einer 1 ebenfalls das Makro "Eintragen" gestartet.
Die Datei reagiert dann also auf drei Ereignisse: Change, Button1, Button2

Wie es bei Änderungen durch Formeln geht, hat Dir ja schon Tom geschrieben: Worksheet_Calculate-Ereignis statt oder besser zusätzlich zu Worksheet_Change

Du brauchst also mindestens 4 Makros:
2, die auf die Buttons reagieren und je eines für Calculate und Change

  Optionbuttons und Zelländerung.xlsm (Größe: 23,43 KB / Downloads: 2)

[Crazy Tom]

Hallo

da schreiben sich in 2 Foren die Helfer die Finger wund
und et kütt nix bei rümm

MfG Tom

[Rabe]

Hi tom,

da schreiben sich in 2 Foren die Helfer die Finger wund
und et kütt nix bei rümm

welches ist denn das Andere? Bitte einen Link zum Thread posten.
Dann bin ich wohl raus.

[Crazy Tom]

Hallo Ralf

in Beitrag 12 hat er den unscheinbaren Link gepostet

MfG Tom