Bonjour,
j'ai un souci avec une macro créée à partir d'excel 2003 qui ne fonctionne plus avec 2007.
Pouvez-vous m'aider ?
voici la macro en question
Sub Recup_info()
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
' Cherche la dernière version du dossier N-1
' Ouverture du dossier N-1
' Lance l'exécution de la macro de récup des infos et des immos.
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Application.ScreenUpdating = False
On Error GoTo Erreur:
Sheets("Info.").Select
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
' Recherche du dernier N° de version du fichier de l'année précédente
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Set fs = Application.FileSearch
With fs
.LookIn = "P:\REP\" & AnneePrecedente
.FileName = monFichier1
If .Execute > 0 Then
For i = 1 To .FoundFiles.Count
Next i
Else
GoTo Erreur
End If
End With
DerniereVersion = "V" & i - 1
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
' Ouverture du fichier de l'année précédente
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''