controle de formulaire (case a cocher)

[legamin]

Bonsoir a tous.

j'ai pas trouvé ma reponse sur le forum.
Pas très doué en macro, je souhaiterais faire à partir de contrôle formulaire (case a cocher) Répercuter a partir d'un meme classeur, les cellules de la feuille 1 A1 B1 C1 D1 et F1 sur la feuille 4 de ce même classeur, si et seulement si la case à coché est sélectionné.
En attente aide par avance merci.

 

[job75]

Re : controle de formulaire (case a cocher)

Bonsoir legamin,

Voir le fichier joint, la macro :

Sub Tranfert()
Dim plage As Range, cel As Range
Set plage = Sheets("Feuil1").Range("A1:D1,F1")
For Each cel In plage
Sheets("Feuil4").Range(cel.Address) = IIf(Sheets("Feuil1").[H3], cel, "")
Next
End Sub

Et ce fil ??

https://www.excel-downloads.com/threads/validation-donnee-sous-thisworkbook.128819/

A+

 

[legamin]

Re : controle de formulaire (case a cocher)

Bonsoir legamin,

Voir le fichier joint, la macro :

Sub Tranfert()
Dim plage As Range, cel As Range
Set plage = Sheets("Feuil1").Range("A1:D1,F1")
For Each cel In plage
Sheets("Feuil4").Range(cel.Address) = IIf(Sheets("Feuil1").[H3], cel, "")
Next
End Sub

Et ce fil ??

https://www.excel-downloads.com/threads/validation-donnee-sous-thisworkbook.128819/

A+

encore une fois probleme resolu.
un grand merci a job 75.