Macro

Fermé
Ganache63 Messages postés 6 Date d'inscription mercredi 13 avril 2016 Statut Membre Dernière intervention 21 mai 2016 - 21 mai 2016 à 21:38
f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024 - 22 mai 2016 à 08:14
Bonjour,
J'ai fait une modification d'édition sur la macro suivante :
"Sub CRExcel()

ActiveSheet.Unprotect

ActiveSheet.Select
ActiveSheet.Copy

Cells.Select
Range("J20").Activate
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("L1:L2").Select
ActiveSheet.Protect DrawingObjects:=False, Contents:=True, Scenarios:= _
False

' Pieds de page automatique

ActiveSheet.Select
refname = ActiveSheet.Name
ins = "INS I 10 05 GST/EM Chimie 09 FOR 01"

ActiveSheet.PageSetup.LeftFooter = "D3-YC+5" & Chr(10) & refname & Chr(10)
ActiveSheet.PageSetup.RightFooter = "édition du 01/07/16" & Chr(10) & ins
Cancel = False


End Sub"

L'édition était au 11.12.14 j'ai juste changer les dates et cela ne change rien quand j'imprime ca sort toujours l'ancienne date .. Même quand je vais dans pied de page c'est toujours pareil..Qqn peut il m'aider ?
A voir également:

1 réponse

f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024 1 709
22 mai 2016 à 08:14
Bonjour,

ca sort toujours l'ancienne date ..
Et c'est quoi l'ancienne date, car dans ce code il ya une date écrite en "dur" ??????
0