Sauvegarder et fermer un autre fichier excel en VB

Signaler
Messages postés
87
Date d'inscription
jeudi 2 février 2012
Statut
Membre
Dernière intervention
17 avril 2013
-
Messages postés
87
Date d'inscription
jeudi 2 février 2012
Statut
Membre
Dernière intervention
17 avril 2013
-
Salut!

Alors voila j ai créé un programme qui permet de copier certaines colonnes d un fichier a l autre et je voudrais donner le choix a l utilisateur d'afficher ou non le nouveau fichier.

L'emplacement, le nom et l extension de ce nouveau fichier est choisi par l utilisateur.

Le probleme est que lorsqu il copie les colonnes, le nouveau fichier est créé et ouvert en lecture seule et donc il ne peut ni enregistrer ni fermer un fichier en lecture seule.

J'ai essayé quelque chose de ce genre la :

 If Parametres.AffTexte.Value = False Then
        ActiveWorkbook.SaveAs FileName:=file, FileFormat:=xlCSV
        ActiveWorkbook.Close
    End If


mais cela ne marche pas

File contient l adresse complete du nouveau fichier: "d:/xxxx/xxxx/xxx/xxx.csv"

pour simplifier j ai voulu test en imaginant que l utilisateur choisisse que l extension : csv, d'ou : "FileFormat:=xlCSV"

De plus avec l extension justement, un autre probleme apparait, il est recommandé a l utilisateur de choisir le format csv, mais moi je parle du csv (points virgules) et il y a plein de format csv avec excel:

csv(séparateur: point-virgule)
csv(macintosh)
csv(DOS)


Si vous pourriez m aider ca serait sympa =) le gros probleme ici est qu il l ouvre en lecture seule

- geo

2 réponses

Messages postés
87
Date d'inscription
jeudi 2 février 2012
Statut
Membre
Dernière intervention
17 avril 2013

j'ai oublié de précisé que j ouvre le fichier comme ca:
    Dim wb As Workbook
    Dim ws As Worksheet
    Set wb = Workbooks.Open(file)
    Set ws = wb.Worksheets(1)
Messages postés
87
Date d'inscription
jeudi 2 février 2012
Statut
Membre
Dernière intervention
17 avril 2013

pas d'idées ? s'il vous plait j ai vraiment besoin d aide, j ai beau chercher je vois pas comment gérer un fichier ouvert en lecture seule