Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Eigenschaften von checkbox in Sheet
checkbox
Hallo,
mit folgendem Code erstelle ich Checkboxen auf einem Sheet
For Z = 1 To L
Application.StatusBar = "Checkboxintegration in Zeile: " & Z
For S = 3 To 5
If IsNumeric(sh.Cells(Z, 1).Value) And sh.Cells(Z, 1).Value > 0
sh.OLEObjects.Add(ClassType:="Forms.CheckBox.1").Name = "Cbx" & Format(Z, "00000") & "_" & Format(S, "00000")
With sh.OLEObjects("Cbx" & Format(Z, "00000") & "_" & Format(S, "00000"))
.Object.Caption = ""
.Object.BackColor = vbWhite
.LinkedCell = sh.Cells(Z, S + 12).Address
.SpecialEffect = fmButtonEffectFlat ' Diese Eigenschaft funktioniert hier nicht
End With
End If
Next S
Next Z
Leider kann ich jetzt die Specialeffekt Eigenschaft nicht auf Flat setzen.
Weiß jemand wie es geht?
Danke und Gruß
Helmut

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Eigenschaften von checkbox in Sheet
10.08.2011 08:25:18
checkbox

Hallo Helmut,
.SpecialEffect ist eine Eigenschaft des Objektes, deshalb auch hier,
.Object.SpecialEffect = fmButtonEffectFlat 


« Gruß Sepp »

Anzeige

302 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige