pingouinal
XLDnaute Occasionnel
Bonjour,
J'ai un souci de rapidité sur une macro qui fait un simple copier coller d'une dizaine de lignes.
Le problème est que ces lignes comportent un peu de format (couleurs) mais surtout énormément de formules avec notamment des liens vers d'autres classeurs. Je ne peux malheureusement pas mettre l'exemple concret en ligne, il est très gros et confidentiel.
Par contre voici mon code :
Ma question est donc la suivante : est-il possible de faire en sorte qu'un copier-coller de formules se fasse plus rapidement? Actuellement il prend une dizaine de secondes, et comme l'opération peut avoir à se répéter plusieurs centaines de fois, ça peut vite être long.
Je précise que l'option Calcul est en manuel et ne se fait donc pas à chaque collage.
D'avance merci pour ceux qui pourront m'aider et désolé de ne pas joindre d'exemple concret en pièce jointe. Si jamais vous avez besoin d'infos que j'aurais oublié de donner, n'hésitez pas à demander.
J'ai un souci de rapidité sur une macro qui fait un simple copier coller d'une dizaine de lignes.
Le problème est que ces lignes comportent un peu de format (couleurs) mais surtout énormément de formules avec notamment des liens vers d'autres classeurs. Je ne peux malheureusement pas mettre l'exemple concret en ligne, il est très gros et confidentiel.
Par contre voici mon code :
Code:
Sub Create_BC()
Dim PSSD, Promo, NoPromo As Worksheet, Rec As Worksheet
Dim l, config As String
Set PSSD = Sheets("PSSD")
Set Promo = Sheets("Promo")
Set NoPromo = Sheets("No Promo")
l = 3
Do While PSSD.Cells(l, 1).Value <> ""
Promo.Rows("8:19").Copy
config = 8 + 12 * (PSSD.Cells(l, 1).Value - 1)
Promo.Cells(config, 1).Select
ActiveSheet.Paste
l = l + 1
Loop
End Sub
Ma question est donc la suivante : est-il possible de faire en sorte qu'un copier-coller de formules se fasse plus rapidement? Actuellement il prend une dizaine de secondes, et comme l'opération peut avoir à se répéter plusieurs centaines de fois, ça peut vite être long.
Je précise que l'option Calcul est en manuel et ne se fait donc pas à chaque collage.
D'avance merci pour ceux qui pourront m'aider et désolé de ne pas joindre d'exemple concret en pièce jointe. Si jamais vous avez besoin d'infos que j'aurais oublié de donner, n'hésitez pas à demander.