Microsoft 365 Userform - remplissage de cellule

Bonjour,

J'ai créer plusieurs userform en fonction des choix d'un premier Userform,
Maintenant j'aimerais qu'en fonction de la case cochée dans le userform (soit des CheckBox soit des OptionButton) mon fichier se remplisse...
Pour le moment j'ai créer ça : (je vous met aussi le fichier en copie)

Private Sub UserForm_Click()
Sheets("Import").Select
Range("C1:C4").Select
Selection.Copy
Sheets("DA_1").Select
Range("A4").PasteSpecial

Sheets("Import").Select
Range("G3:G4").Select
Selection.Copy
Sheets("DA_1").Select
Range("E6").PasteSpecial

Range("B7").Value = Val(Me.ComboBoc2.CheckBox.Value)

End Sub

Mais ça ne donne rien 🙁
Et je ne comprend pas trop quoi faire