Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1744to1748
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1744to1748
1744to1748
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Kontrollkästchen Zellenverknüpfung

Kontrollkästchen Zellenverknüpfung
15.03.2020 22:00:02
Max
Hallo zusammen,
habe derzeit ein Problem beim Zuweisen einer Zellenverknüfung eines Kontrollkästchens in VBA.
Mein Code sieht derzeit folgendermaßen aus (nur Recorderfunktion, copy, paste eines bereits bestehenden Kästchens):
ActiveSheet.Shapes.Range("CheckBox 1").Select
Selection.Copy
Range("H15").Select
ActiveSheet.Paste
Nun ist mir bewusst, dass ich mit " .LinkedCell = Cells(15, 8).Address " Zugriff auf die feste Verknüpfung habe. Jedoch benennt Excel die kopierten Kontrollkästchen so weiter, dass sie aufsteigende Nummern hinter den Namen "Kontrollkästchen" setzen, sodass ich keinen Zugriff auf das bereits fertig kopierte Kontrollkästchen bekomme.
Gibt es hier eine Möglichkeit, wie ich da ran komme?
Hätte mir sowas mit ActiveShape oder ähnlichem gedacht, find dazu leider nichts...oder gibt es eine Möglichkeit das neue fertig kopierte Kästchen sofort zu benennen?
Wäre euch sehr dankbar.

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Kontrollkästchen Zellenverknüpfung
16.03.2020 05:36:58
Hajo_Zi
leider hast Du nicht geschrieben was Du möchtest?
Zugriff
ActiveSheet.Shapes.Range("CheckBox 1")

AW: Kontrollkästchen Zellenverknüpfung
16.03.2020 09:46:39
Nepumuk
Hallo Max,
so:
Public Sub Test()
With ActiveSheet
.Shapes("CheckBox 1").Copy
.Paste Destination:=Range("H15")
.Shapes(.Shapes.Count).ControlFormat.LinkedCell = Range("H15").Address
End With
End Sub

Gruß
Nepumuk
AW: Kontrollkästchen Zellenverknüpfung
16.03.2020 22:09:42
Max
Hallo Nepomuk,
ich bedanke mich herzlich für deine Antwort!
Klappt ganz gut mit deinem Code und läuft so stabil, wie ich's mir gewünscht hatte.
Anzeige

Links zu Excel-Dialogen

CheckBox

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige