Menu

Erreur sur une macro [Résolu]

mzkcfrannat 2 Messages postés samedi 3 février 2018Date d'inscription 4 février 2018 Dernière intervention - 3 févr. 2018 à 18:45 - Dernière réponse : Mike-31 16129 Messages postés dimanche 17 février 2008Date d'inscriptionContributeurStatut 19 mai 2018 Dernière intervention
- 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
Afficher la suite 

Votre réponse

3 réponses

Mike-31 16129 Messages postés dimanche 17 février 2008Date d'inscriptionContributeurStatut 19 mai 2018 Dernière intervention - 3 févr. 2018 à 19:52
0
Utile
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 
Commenter la réponse de Mike-31
mzkcfrannat 2 Messages postés samedi 3 février 2018Date d'inscription 4 février 2018 Dernière intervention - 4 févr. 2018 à 16:40
0
Utile
merci la macro et ok
Commenter la réponse de mzkcfrannat
Mike-31 16129 Messages postés dimanche 17 février 2008Date d'inscriptionContributeurStatut 19 mai 2018 Dernière intervention - 4 févr. 2018 à 17:18
0
Utile
Re,

alors je passe le statut de la discussion en résolu
Commenter la réponse de Mike-31