Erreur sur une macro

Résolu/Fermé
mzkcfrannat Messages postés 2 Date d'inscription samedi 3 février 2018 Statut Membre Dernière intervention 4 février 2018 - 3 févr. 2018 à 18:45
Mike-31 Messages postés 18313 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 21 avril 2024 - 4 févr. 2018 à 17:18
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
A voir également:

3 réponses

Mike-31 Messages postés 18313 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 21 avril 2024 5 073
3 févr. 2018 à 19:52
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 
0
mzkcfrannat Messages postés 2 Date d'inscription samedi 3 février 2018 Statut Membre Dernière intervention 4 février 2018
4 févr. 2018 à 16:40
merci la macro et ok
0
Mike-31 Messages postés 18313 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 21 avril 2024 5 073
4 févr. 2018 à 17:18
Re,

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