Bonjour,
J'ai crée une macro pour quelqu'un, mais il n'arrive pas a l'ouvrir sur son pc. Le fichier que je lui ai envoyé à été fait sous xp, enregistré en format excel 95/2002. Lors de l'ouverture un message d'erreur apparaît.
Je vous joint le code de la macro, en esperant qu'un de vous puisse m'aider !
Merci , Craac.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19 Sub addapge() ' ' addapge Macro ' Macro enregistrée le 04/10/2007 par Admin Sheets("S1").Select Sheets(Sheets.Count).Copy After:=Sheets(Sheets.Count) Sheets(Sheets.Count).Name = "S" & Sheets.Count - 1 ' Cells.replace What:="S" & Sheets.Count - 3, Replacement:="S" & Sheets.Count - 2, LookAt:=xlPart, SearchOrder _ :=xlByColumns, MatchCase:=False, SearchFormat:=False, ReplaceFormat:= _ False Range("E4").Select ActiveCell.FormulaR1C1 = Sheets.Count - 1 End Sub
Partager