Discussion :

[Invité]

Bonjour,

J'avais lors d'une une précédente discussion, concernant la création d'un fichier txt pour suivre les modifications d'une base de données, poser cette question. je salue en passant "Rdurupt" qui m'a donné un coup de main pour la création d'un fichier csv en vba, code ci-dessous.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Sub ecriture()
If Dir("c:\Modif-BD.CSV") = "" Then
   Open "c:\Modif-BD.CSV" For Append As 1
Print #1, " Feuille;Cellule;Ancienne valeur;Nouvelle valeur;Changée par;Modifiée le" ' & vbCrLf
Close 1
 
End If
Open "c:\Modif-BD.CSV" For Append As 1
Print #1, feuille & ";" & reference & ";" & av & ";" & nv & ";" & utilisateur & ";" & datemodif ' & vbCrLf
Close 1
End Sub

Donc est-il possible de l'enregistrer de façon qu'à son ouverture il soit en lecture seule? Tout en sachant que ceci ne pas bloquer l'enregistrement des modifications.

Je vous remercie beaucoup.

Cordialement,