Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1104to1108
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Wert eingeben / Button löschen

Wert eingeben / Button löschen
René
Ich möchte in der Zelle D6 einen x beliebigen Wert (nur Zahlen) eingeben können und anschliessend müsste der Button resp. Schaltfläche 1 gelöscht werden. Diese Schaltfläche 1 muss nicht mehr in der Tabelle vorhanden sein.
Für die Hilfe danke ich jetzt schon im Voraus.
Folgenden Code habe ich erstellt:
Sub löschen()
' löschen Button wenn ein x beliebigen Wert in Zelle D6 eingeben wird
Range("D6").Select
ActiveCell.FormulaR1C1 = "6500003"
ActiveSheet.Shapes("Button 1").Select
Selection.Cut
Range("D6").Select
End Sub
Freundliche Grüsse
René Hürzeler

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Wert eingeben / Button löschen
21.09.2009 15:09:29
Horst
Hallo,
Nur Zahlen über Gültigkeit regeln.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$D$6" Then
If Len(Target) > 0 Then
On Error Resume Next
Buttons(1).Delete
End If
End If
End Sub

Grüße Horst
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige