Re:Ecrire dans fichier fermé
bonjour Tonio
ton fichier doit etre zippé ( avec WinZip ), de taille inferieure à 50 ko , sans espaces ni caracteres speciaux dans le nom ( é ,è , ç , à , ...etc ...)
dans la demo de Rob Bovey DataToWrite correspond à la donnée qui va s'inscrire dans les cellules du classeur fermé
'écrit dans le classeur fermé la valeur des cellules A1:A5
'du classeur actif
For Each cell In ActiveWorkbook.Sheets('Feuil1').Range('A1:A5')
'transfert des données dans les cellules equivalentes du classeur fermé
SetExternalDatas Fich, 'Feuil1', cell.Address(0, 0), cell.Text
Next
'écrit en A6 la date et l'heure de l'opération
SetExternalDatas Fich, 'Feuil1', 'A6', 'mise à jour du ' & Now
tu trouveras d'autres exemples dans ce lien
Lien supprimé
bonne journée
MichelXld