Erreur sur une macro

Résolu
mzkcfrannat Messages postés 2 Date d'inscription   Statut Membre Dernière intervention   -  
Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   -
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 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 135
 
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   Statut Membre Dernière intervention  
 
merci la macro et ok
0
Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 135
 
Re,

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