Ouvrir et sauvegarder une base access en vb

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : Ouvrir et sauvegarder une base access en vb

lithiumart

Bonjour à tous,

J'ai créé, sous access et en vb, un code pour simuler un copier - coller d'un fichier excel même si il est ouvert.

Code :

Dim Xl As New Excel.Application
Dim xls As Workbook
Dim SourceFile, DestinationFile
DoCmd.SetWarnings False
Xl.DisplayAlerts = False
Xl.Visible = False
Set xls = Xl.Workbooks.Open(FileName:=("fichier1.xls" ), UpdateLinks:=0, ReadOnly:=True)
Xl.ActiveWorkbook.SaveAs "fichier2.xls"
Xl.Quit
Xl.DisplayAlerts = False

J'aurais besoin de réaliser la même chose pour ouvrir et sauvegarder une base access et non un fichier excel car certaines instructions du code sont propres à excel.
Quelqu'un aurait-il une idée ?

Merci !
Lithiumart

Message édité par lithiumart le 13-06-2007 à 13:51:09

Publicité

tegu

Dans l'exemple que tu nous montres, tu ouvres une base access (mabase1.mdb) comme si c'était un document .xls ?
Et le .SaveAs fonctionne ?
La sauvegarde d'une base access, c'est simplement la copie du fichier .MDB (et renommage éventuel).
Pas besoin de plus, ou alors il faut donner des détails sur tes besoins.

lithiumart

Oui désolé, dans le code ce n'est pas une base access mais bien un fichier .xls
C'est corrigé.

Le .SaveAs fonctionne, je confirme.
Je procède ainsi car si le fichier est ouvert par un autre utilisateur, je ne peux pas faire de CopyFile. J'ouvre donc le fichier et je le sauvegarde ailleurs.

Message édité par lithiumart le 13-06-2007 à 13:51:32

tegu

À ma connaissance une base Access est copiable, même ouverte par un autre utilisateur.
Sauf si cet utilisateur est en modification de la structure des tables ou a des droits particuliers.
Et là je ne pense pas qu'ouvrir la base pour la sauvegarder changera quoi que ce soit au problème.

FORUM HardWare.fr

Programmation

VB/VBA/VBS

Ouvrir et sauvegarder une base access en vb

Sujets relatifs
[Access] update de toute les colonnes si...	Mise en page pour base de données de fichiers
ACCESS Reprendre le numéro auto en cours dans un autre formulaire	[ACCESS] requete SQL max date
Questions de "base" ambigues sur la programmation objet	[PHP] Ouvrir et modifier une série de fichiers jpg
[Resolu] taille de base de données oracle	Formulaire pdf préremplis depuis la base de donnée
[Access] Création de base "multitable" pour la même entité (xpl inside
Plus de sujets relatifs à : Ouvrir et sauvegarder une base access en vb

Page générée en 0.037 secondes