Bonjour

J'ai un code à rallonge dans Excel que j'essaye de simplifier au maximum.
A un endroit je veux faire un copié-collé-valeurs mais ca me prend 5 lignes :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Columns("A:O").Select
    Application.CutCopyMode = False
    Selection.Copy
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
J'essaye

Code : Sélectionner tout - Visualiser dans une fenêtre à part
Columns("a:o").Copy.PasteSpecial Paste:=xlPasteValues
Mais ca bugue et fait une erreur 404 "objet requis"

Plus loin je veux remplacer un libellé [Calcul Cadrages.xlsm] par rien dans des cellules :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
  Rows("1:28").Select
    Selection.Replace What:="[Calcul Cadrages.xlsm]", _
        Replacement:="", LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:= _
        False, SearchFormat:=False, ReplaceFormat:=False
Mais ca me prend 4 lignes

Pouvez-vous me dire comment écrire ces 2 demandes en 1 ou 2 lignes maxi ?

Merci beaucoup
Didier