VBA Remplacer 2 éléments simultanément dees données d'un onglet

onyirimba

XLDnaute Occasionnel
Supporter XLD
Bonjour,

Je dois actualiser un tableau toute les semaines : les données sont liées à une recherche V et il faut décaler les données source (onglet BDD) toutes les semaines d'une colonne vers la droite
je souhaiterai une macro qui me permette de décaler les données source pour actualiser le tableau final (onglet SYNTHESE)

J'ai testé avec la macro ci-dessous mais cela ne fonctionne pas

Merci beaucoup de votre aide.


Sub MacroRemplacer()
'
' MacroRemplacer Macro
'
Range("C6:D29").Select
Selection.Replace What:=";Range("I5").Value;", Replacement:=";Range("I5").Value + 1;", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False
Selection.Replace What:=";Range("I5").Value + 3;", Replacement:=";Range("I5").Value + 4;", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False
End Sub
 

Pièces jointes

  • Macro Remplacer.xlsm
    65.8 KB · Affichages: 7

Paf

XLDnaute Barbatruc
Bonjour à tous,

Sur un autre forum cela parait être régler avec la fonction Decaler() !?

Il y a peut-être un 3ème forum ...

edit : Ah non sur un 3ème ce n'est pas cette solution ...

Un quatrième ?
 
Dernière édition:

Discussions similaires