Bonjour,
Pour macro Mme:
tu sélectionnes la première ligne où tu veux écrire Mme ça c'est bon.
Range("A13").Select
le reste déraille un peu. Tu dois faire une boucle pour tester et chaques lignes. Tu as plusieurs possibilités, je t'en propose une:
Public Sub Mme()
'Déclaration d'une variable de type range
Dim Cellule As Range
'sélectionne les cellule à traiter
Range("A13:A20").Select
'pour chaque cellule de ta selection
For Each Cellule In Selection
'si ta cellule est vide alors écrit Mme
If Cellule = "" Then Cellule = "Mme"
Next Cellule
End Sub
avec les commentaires ça devrait etre clair, mais si t'as des questions hésite pas.
Pour la sub Ouverture:
tu inscris uniquement le répertoire du classeur à ouvrir et non le nom du fichier
Workbooks.Open Filename:= "C:\Program Files\Ostreon\CasiSys-Acess\NomDuFichier.xls"
voila en espérant t'aider un peu