Enregistrement dans une autre feuille
xman9222
Messages postés
3
Date d'inscription
Statut
Membre
Dernière intervention
-
yg_be Messages postés 23437 Date d'inscription Statut Contributeur Dernière intervention -
yg_be Messages postés 23437 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
-je veux bien svp que mon userform enregistre les donnes dans la feuille2 ou autre sons etre sur la page designer mrc
voici mon code
EDIT : Ajout des balises code.
Explications disponibles ici : https://codes-sources.commentcamarche.net/faq/10686-le-nouveau-codes-sources-comment-ca-marche#balises-code
-je veux bien svp que mon userform enregistre les donnes dans la feuille2 ou autre sons etre sur la page designer mrc
voici mon code
Private Sub CommandButton1_Click()
Dim L As Integer
If MsgBox("Confirmez-vous l'insertion de ce nouveau contact ?", vbYesNo, "Demande de confirmation d 'ajout") = vbYes Then
[A3] = [A4] + 1
Rows("3:3").Select
Selection.Insert Shift:=x1Down, CopyOrigin:=x1FormatfromLeftOrAbove
Unload UserForm1
Load UserForm1
UserForm1.Show
End If
End Sub
EDIT : Ajout des balises code.
Explications disponibles ici : https://codes-sources.commentcamarche.net/faq/10686-le-nouveau-codes-sources-comment-ca-marche#balises-code
2 réponses
-
yg_be Messages postés 23437 Date d'inscription Statut Contributeur Dernière intervention Ambassadeur 1 588
bonsoir, peut-être ainsi?Sheets("feuille2").Rows("3:3").Insert Shift:=x1Down, CopyOrigin:=x1FormatfromLeftOrAbove -
Bonjour,
Il te suffit de préfixer tes plages de cellules par la feuille cible souhaitée..
Par exemple :sheets("Feuil2").range("A1").value = "une valeur"
