Kontrollkästen bei Range

Forumthread: Kontrollkästen bei Range
2 Beiträge zu diesem Forumthread
Anzeige

Forumthread: Kontrollkästen bei Range

19.10.2015 12:54:35

Luca

Hallo zusammen
bei meinem Makro wählt der User eine Range durch eine Inputbox. Nun möchte ich,
dass Excel automatisch bei der Zelle rechts der ersten gewählten Zelle ein Kontrollkästchen erstellt. Ich weiss zwar wie man die Position des Kontrollkästchens bestimmen kann, jedoch ist dies ja nicht abhängig einer Variablen sondern immer vom gesamtem Excel Sheet.
Bsp: Der User wählt D5:D11 dann soll das Kontrollkästchen bei E5 erstellt werden.
Gruss

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Kontrollkästen bei Range

19.10.2015 13:06:33

Rudi
AW: Kontrollkästen bei Range

19.10.2015 13:15:48

Luca

AW: Kontrollkästen bei Range

19.10.2015 13:06:33

Rudi

Hallo,

Sub Makro1()
Dim r As Range, s
Set r = Application.InputBox(prompt:="Bereich?", Type:=8)
Set s = ActiveSheet.CheckBoxes.Add(0, 0, 0, 0)
With s
.Top = r.Cells(1).Offset(, 1).Top
.Left = r.Cells(1).Offset(, 1).Left
.Width = 100
.Height = 15
End With
End Sub