Fonction Replace avec boucle sur onglet

Bonjour,

Je cherche à modifier certains caractères dans les formules de différents onglets : "C01" à "C66".

Voici la construction de ma procédure :

• 1 - Je fais une boucle sur chacun des onglets,
  2 - J'identifie les caractère à remplacer avec la variable nouvelle_base
  3 - Je remplace les caractères des formules par la variable nouvelle_base

Problème recontré :

A la fin de la procédure, aucune modification n'a été effectuée. Pourtant j'ai récupéré la formule de remplacement à partir de l'enregistreur de formule qui me donne la fonction suivante :

        ActiveSheet.Select
        Cells.Replace What:="$5:$U$13", Replacement:=nouvelle_base, LookAt:=xlPart _
        , SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False

Avez-vous une idée de ce qui ne fonctionne pas. Je n'ai aucun message d'erreur...

J'ai joins un fichier exemple pour mieux illustrer le problème.

Merci d'avance,

Cordialement,

Batoine

Bonjour,

Le minimum serait que tu postes la totalité de ta macro ...

A priori ... ActiveSheet.Select ... doit te jouer des tours ...

Bonjour

que contientnouvelle_base ?

ta macro a-t-elle unon error resume next ?

essaie

    Cells.Select
    Selection.Replace ...

@James007:

Merci pour cette piste, j'ai essayé d'autres types de sélection --> même résultat

c'est une erreur, voici le fichier contenant la macro...

A partir de quelle feuille tu lances ta procédure ?

sheet_number = ActiveSheet.Index
sheet_fin = Sheets("C66").Index

'On fait la boucle sur les onglets
    For k = sheet_number To sheet_fin ...

Tu tentes en fait de remplacer $F$5:$U$13 (What:="$5:$U$13") par $F$14:$37 sur la feuille 3 C02

Il ne te manquerait pas le U ??!!

On revient à ma question ...

Steelson a écrit :

que contient nouvelle_base ?

essaie avec

nouvelle_base = "$" & premiere_ligne & ":$U$" & derniere_ligne

Bonjour Steelson,

Effectivement le problème venait de la définition de ma variable nouvelle_base où il manquait le "U" faisant référence à la colonne.

Merci beaucoup pour cette aide, parfois ça ne tient qu'à un petit quleque chose...

Cordialement,

Batoine