A
AUBELIX
Guest
Bonsoir à tous.
Je reviens à vous pour un problème qui me préocupe:
J'ai un tableau 'RECAP' qui comme son nom l'indique récapitule les saisies de 12 feuilles.
1 par mois. Les feuilles portent le nom du mois suivi de l'année.
janvier-05 etc....pour l'année 2005.
Chaque année, je regénère des feuilles avec mois et année. janvier-06.
Les ancciennes sont effacées, pour laisser place aux nouvelles.
De ce fait, mon tableau 'RECAP' m'affiche #VALEUR!.
J'ai trouvé un moyen de garder les formules en remplaçant le '=' par un 'x'.
Après création de mes nouvelles feuilles, je substitue le 'x' par un '='.
Mes formulers sont de nouveau bonnes. Avez-vous une solution plus simple ?
Par avance merci de votre aide.
Je vous joints un fichier exemple.
' Sauvegarder_les_Formules_de_RECAP Macro
' Remplace le = des formules par un x
Sheets('RECAP').Select
Range('C3:L16').Select
Selection.Replace What:='=', Replacement:='x', LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False
' Regenerer_Formules_RECAP Macro
Sheets('RECAP').Select
Range('C3:L16').Select
Selection.Replace What:='x', Replacement:='=', LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False
[file name=SauvegarderFormules.zip size=9713]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/SauvegarderFormules.zip[/file]
Je reviens à vous pour un problème qui me préocupe:
J'ai un tableau 'RECAP' qui comme son nom l'indique récapitule les saisies de 12 feuilles.
1 par mois. Les feuilles portent le nom du mois suivi de l'année.
janvier-05 etc....pour l'année 2005.
Chaque année, je regénère des feuilles avec mois et année. janvier-06.
Les ancciennes sont effacées, pour laisser place aux nouvelles.
De ce fait, mon tableau 'RECAP' m'affiche #VALEUR!.
J'ai trouvé un moyen de garder les formules en remplaçant le '=' par un 'x'.
Après création de mes nouvelles feuilles, je substitue le 'x' par un '='.
Mes formulers sont de nouveau bonnes. Avez-vous une solution plus simple ?
Par avance merci de votre aide.
Je vous joints un fichier exemple.
' Sauvegarder_les_Formules_de_RECAP Macro
' Remplace le = des formules par un x
Sheets('RECAP').Select
Range('C3:L16').Select
Selection.Replace What:='=', Replacement:='x', LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False
' Regenerer_Formules_RECAP Macro
Sheets('RECAP').Select
Range('C3:L16').Select
Selection.Replace What:='x', Replacement:='=', LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False
[file name=SauvegarderFormules.zip size=9713]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/SauvegarderFormules.zip[/file]