Bonjour,
etant débutant en VBA, je suis sur que mon code est optimisable (je sais pas si sa existe ce mot)
Merci
etant débutant en VBA, je suis sur que mon code est optimisable (je sais pas si sa existe ce mot)
Code:
shtbase.Range("C11").Copy
shtpda.Range("A1").PasteSpecial
shtbase.Range("D11").Copy
shtpda.Range("B1").PasteSpecial
shtbase.Range("N11").Copy
shtpda.Range("C1").PasteSpecial
shtbase.Range("E11").Copy
shtpda.Range("D1").PasteSpecial
shtbase.Range("F11").Copy
shtpda.Range("E1").PasteSpecial
shtbase.Range("G11").Copy
shtpda.Range("F1").PasteSpecial
shtbase.Range("S11").Copy
shtpda.Range("G1").PasteSpecial
Merci