Erreur sur une macro

Résolu/Fermé
Messages postés
2
Date d'inscription
samedi 3 février 2018
Statut
Membre
Dernière intervention
4 février 2018
-
Messages postés
17829
Date d'inscription
dimanche 17 février 2008
Statut
Contributeur
Dernière intervention
24 janvier 2022
-
j'ai un mesage d'erreur sur cette macro et je sais pas pour quoi


Private Sub CommandButton2_Click()
Rows("2:2").Select
Selection.Insert shift:=x1down, copyorigin:=x1formatfromleftorabove
Range("T1").Select
Selection.Copy
Range("E3").Select
Selection.PasteSpecial Paste:=x1PasteAll, Operation:=x1Multiply, _
SkipBlanks:=False, Transpose:=False
Unload UserForm1
Load UserForm1
UserForm1.Show
End Sub

3 réponses

Messages postés
17829
Date d'inscription
dimanche 17 février 2008
Statut
Contributeur
Dernière intervention
24 janvier 2022
4 910
Bonsoir,

ces lignes de code ne veulent rien dire,
Unload UserForm1 'cette ligne ferme l'userform qui n'est pas encore ouverte
Load UserForm1
UserForm1.Show ' cette ligne l'ouvre


regarde ton code comme cela
Private Sub CommandButton2_Click()
Rows("2:2").Select
Selection.Insert
Range("T1").Copy
Range("E3").Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlMultiply
UserForm1.Show
End Sub 
Messages postés
2
Date d'inscription
samedi 3 février 2018
Statut
Membre
Dernière intervention
4 février 2018

merci la macro et ok
Messages postés
17829
Date d'inscription
dimanche 17 février 2008
Statut
Contributeur
Dernière intervention
24 janvier 2022
4 910
Re,

alors je passe le statut de la discussion en résolu