VBA renommer une chekbox
Fermé
Edouard
-
30 déc. 2013 à 14:06
melanie1324 Messages postés 1505 Date d'inscription vendredi 25 mai 2007 Statut Membre Dernière intervention 31 janvier 2018 - 30 déc. 2013 à 15:11
melanie1324 Messages postés 1505 Date d'inscription vendredi 25 mai 2007 Statut Membre Dernière intervention 31 janvier 2018 - 30 déc. 2013 à 15:11
A voir également:
- VBA renommer une chekbox
- Renommer plusieurs fichiers - Guide
- Renommer iphone - Guide
- Vba ouvrir un fichier excel avec chemin ✓ - Forum VB / VBA
- Find vba - Astuces et Solutions
- Vba écrire dans une cellule ✓ - Forum Excel
1 réponse
melanie1324
Messages postés
1505
Date d'inscription
vendredi 25 mai 2007
Statut
Membre
Dernière intervention
31 janvier 2018
154
30 déc. 2013 à 15:11
30 déc. 2013 à 15:11
Bonjour,
as-tu essayé :
as-tu essayé :
[/contents/446-fichier-sub Sub] GenerateComboBox()
Dim Chekbox As OLEObject
Dim i As Integer
Dim Target As Range
For i = 3 To 4
Set Target = ActiveSheet.Range("X" & i)
Set Chekbox = ActiveSheet.OLEObjects.Add(ClassType:="Forms.CheckBox.1", Left:=Target.Left, Top:=Target.Top, Width:=Target.Width, Height:=Target.Height)
With Chekbox
.LinkedCell = Target.Offset(0, 1).Address(0, 0)
.Object.Value = False
.name = "Tartempion" 'le nomde lachackbox est tartempion
.label = "checkboc N°" & i 'le nom qui apparaîtra
End With
Next
End Sub
