Bonjour à tous,
Je débute avec les UserForms, j'ai réussi à mettre en place un formulaire d'insertion de donnée qui quand on valide insère une nouvelle ligne et recopie les formats et formules de la ligne du dessus, voila le code:
Rows("10:10").Select
Selection.Insert Shift:=xlDown
Range("v9:y9").Select
Selection.Copy
Range("v10").Select
ActiveSheet.Paste
Application.CutCopyMode = False
Range("c9:h9").Select
Selection.Copy
Range("c10").Select
ActiveSheet.Paste
Application.CutCopyMode = False
D'accord il est pas très beau... Mais il fonctionne :p, néanmoins le problème que je rencontre c'est qu'il est TRES lent...
Ainsi je pense qu'il existe plus simple pour arriver au même résultat plus rapidement mais je n'y arrive pas...
Pouvez-vous m'aider?
Merci d'avance pour votre aide
PS: si vous avez besoin du fichier, n'hésitez pas!