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

[onyirimba]

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😀29").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

 

[pierrejean]

Bonjour onyirimba

Un essai : Décalage par choix en F2
NB: Les formules ont été étendues jusqu'en Y

 

[onyirimba]

ok je te remercie beaucoup

 

[Paf]

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 ?