Gut, wie du meinst. Ich habe keine Lust auf eine Diskussion. Schönen Tag noch.
Hallöchen,
Zitat:dazu darf es aber kein Drehfeld (Formularsteuerelement) sein oder?
Muss es da nicht so ein ActiveX Element sein.
Zitat:Ich hatte es, ..., es bereits ausprobiert.
Wenn Du dabei nicht bemerkt hast, das beides geht, ist irgendwo was fehlgeschlagen.
Ich nehme mal Druck aus dem Kessel!
Ein Formularsteuerelement löst kein SelectionChange aus (auch bei einer Zellverknüpfung nicht, noch nicht mal ein _Change!)!
Insofern hat der TE (dem ich dennoch ein paar Abzüge in der B-Note gebe) schlicht Recht!
Gruß Ralf
Hallo Ralf,
der Code sollte in ein gesondertes Makro und sowohl vom SelectionChange als auch vom Drehfelt oder Spinbutton_Change aus aufgerufen werden.
Dann spiele mal mit dem Spin …
Wohlgemerkt: Ich rede vom FSE, nix ActiveX
Ich habe es mir noch einmal genau durchgelesen.
Ja! Würde gehen, nur wozu???
Hallo Ralf,
um dabei die Aktion wie gefragt sowohl vom SelectionChange als auch z.B. von der Drehfeld-Änderung auszulösen?
No, Sir André!
Wozu bräuchte man dann einen Spin, wenn er byChange dieselbe Funktion wie ein Klick auf ABO234194 triggern sollte?
Sorry, aber das ist mir jetzt ein wenig zu profan, als dass man darüber weiter nachdenken sollte (ich brauchte ja auch den zweiten Anlauf) …
Hallo Ralf,
nicht ganz. Das Drehfeld verändert den Wert von B19 und führt dadurch zu einem anderen Resultat als nur der Wechsel der selektierten Zelle:
Range("P16").Value = "Test " & Range("B19") & " von " & Wert
Hallo Excelsior940,
mache einen Rechtsklick auf das Drehfeld und wähle
Makro zuweisen.
Klicke auf
Neu.
Füge folgenden Code ein:
Dim lngP(1 To 2) As Long
With Range("P16")
lngP(1) = InStr(1, .Value, " ") + 1
lngP(2) = InStr(lngP(1), .Value, " ")
.Value = Application.Replace(.Value, lngP(1), lngP(2) - lngP(1), Range("B19").Value)
End With
Gruß Uwe