Bonjour,
Je rencontre un souci, je n'arrive pas à modifier une formule qui est présente dans un code vba (enregistreur de macro).
Je souhaite modifier cette variable :
"='X:\veihe\CLIENOURS\MONIOCE\Livraisnts\2015\[Bamaine 5 - 2015.xls]Global'!R[1]C[-12]"
Je souhaiterais remplacer 'X:\veihe\CLIENOURS\MONIOCE\Livraisnts\2015\[Semaine 5 - 2015.xls] par Periode!M2
Mon numéro de semaine change chaque semaine, et la référence est contenue en Periode!M2.
Objectif, quelque chose de similaire : "='Periode!M2Global'!R[1]C[-12]"
Merci
Sub Macro42()
Sheets("Periode").Select
Selection.Copy
Sheets("Global").Select
Range("N3").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
ActiveSheet.Paste
Application.CutCopyMode = False
Sheets("Periode").Select
Selection.Copy
Sheets("Global").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = _
"='X:\veihe\CLIENOURS\MONIOCE\Livraisnts\2015\[Bamaine 5 - 2015.xls]Global'!R[1]C[-12]"
Range("N3").Select
Selection.AutoFill Destination:=Range("N3:N12"), Type:=xlFillDefault
Range("N3:N12").Select
Range("N12").Select
ActiveCell.FormulaR1C1 = "=RC[-12]"
Range("N13").Select
End Sub