userform

Bonsoir

Une première approche en pièce jointe.

A suivre

salut
[file name=RBT2.zip size=15993]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/RBT2.zip[/file]

Merci Hervé

ça marche!!!!!
bonne soirée

Bonsoir Hervé, David, le Forum

Un jour STéphane (Jon) est passé ici et à écrit un code VBA avec 'IIf' au lieu de notre bon vieux 'If'... Je me suis dit et je crois l'avoir écrit sur le Forum 'KesKeCéQueSSa???'

Depuis il m'a expliqué et j'ai compris l'usage avantageux que l'on pouvait en faire, en fait c'est presque pareil que le SI des Formules : IIf(expression, truepart, falsepart)...

Alors avec des Boolean telles que des CheckBox c'est Finger in the Noise à utiliser...

Donc au lieu d'écrire :

If CheckBox1 = True Then .Range('C' & derligne) = 'OUI' Else .Range('C' & derligne) = 'NON'
If CheckBox2 = True Then .Range('D' & derligne) = 'OUI' Else .Range('D' & derligne) = 'NON'
If CheckBox3 = True Then .Range('E' & derligne) = 'OUI' Else .Range('E' & derligne) = 'NON'

Cliquez pour agrandir...

On peut faire ceci :

.Range('C' & derligne) = IIf(CheckBox1 = True, 'OUI', 'NON')
.Range('D' & derligne) = IIf(CheckBox2 = True, 'OUI', 'NON')
.Range('E' & derligne) = IIf(CheckBox3 = True, 'OUI', 'NON')

Cliquez pour agrandir...

C'est juste pour montre l'usage du IIF car, en voyant ton code Hervé, cette démo est un bon exemple d'application de cette fonction, qui sinon est parfaite même avec les If 'standards' et tu es aussi très bon dans la didactique. (sur d'autre postes que j'ai vu aujourd'hui aussi)

Bonne Soirée
@+Thierry

Re

Merci thierry, pour l'exemple des IIF c'est vrai que c'est plus 'élégant', et pour la petite phrase concernant mon investissement pédagogique.

On fait ce qu'on peut, avec ce qu'on a

Au plaisir de te croiser souvent

Salut