Je travaille avec Excel 2000 en VBA
J'ai besoin de copier un fichier .dbf en fichier .xls puis d'exécuter des
opérations pour récupérer les données.
Je procède ainsi:
Sub CopieBase()
Workbooks.Open Filename:=NomFichierDbf, ReadOnly:=True
ActiveWorkbook.SaveAs Filename:=NomFichierXls, FileFormat:=xlNormal,
Password:="", _
WriteResPassword:="", ReadOnlyRecommended:=False,
CreateBackup:=False
ActiveWorkbook.Close
End Sub
A la première exécution du programme, tout va pour le mieux, mais si je veux
exécuter à nouveau mon programme
j'ai une erreur m'indiquant que le fichier NomFichierXls est toujours
ouvert. En effet, dans l'explorateur de projet
je vois une instance du fichier ouverte.
Je dois avoir un problème de compréhension dans la définition des objets.
Quelqu'un peut-il m'expliquer comment fermer ce fichier et pouquoi je me
plante une nouvelle fois.
Je referme ce sujet, Pierre Fauconnier m'ayant apporté la solution:
A bientôt de vous lire
Michel
"MorMic" a écrit dans le message de news: 45196176$0$5108$
Bonsoir à toutes et à tous.
Je travaille avec Excel 2000 en VBA J'ai besoin de copier un fichier .dbf en fichier .xls puis d'exécuter des opérations pour récupérer les données. Je procède ainsi:
Sub CopieBase() Workbooks.Open Filename:=NomFichierDbf, ReadOnly:=True ActiveWorkbook.SaveAs Filename:=NomFichierXls, FileFormat:=xlNormal,
Password:="", _ WriteResPassword:="", ReadOnlyRecommended:úlse, CreateBackup:úlse ActiveWorkbook.Close End Sub
A la première exécution du programme, tout va pour le mieux, mais si je veux
exécuter à nouveau mon programme j'ai une erreur m'indiquant que le fichier NomFichierXls est toujours ouvert. En effet, dans l'explorateur de projet je vois une instance du fichier ouverte.
Je dois avoir un problème de compréhension dans la définition des objets.
Quelqu'un peut-il m'expliquer comment fermer ce fichier et pouquoi je me plante une nouvelle fois.
Merci d'avance
Michel
Bonsoir à tous
Je referme ce sujet, Pierre Fauconnier m'ayant apporté la solution:
A bientôt de vous lire
Michel
"MorMic" <mor.mic@wanadoo.fr> a écrit dans le message de news:
45196176$0$5108$ba4acef3@news.orange.fr...
Bonsoir à toutes et à tous.
Je travaille avec Excel 2000 en VBA
J'ai besoin de copier un fichier .dbf en fichier .xls puis d'exécuter des
opérations pour récupérer les données.
Je procède ainsi:
Sub CopieBase()
Workbooks.Open Filename:=NomFichierDbf, ReadOnly:=True
ActiveWorkbook.SaveAs Filename:=NomFichierXls,
FileFormat:=xlNormal,
Password:="", _
WriteResPassword:="", ReadOnlyRecommended:úlse,
CreateBackup:úlse
ActiveWorkbook.Close
End Sub
A la première exécution du programme, tout va pour le mieux, mais si je
veux
exécuter à nouveau mon programme
j'ai une erreur m'indiquant que le fichier NomFichierXls est toujours
ouvert. En effet, dans l'explorateur de projet
je vois une instance du fichier ouverte.
Je dois avoir un problème de compréhension dans la définition des objets.
Quelqu'un peut-il m'expliquer comment fermer ce fichier et pouquoi je me
plante une nouvelle fois.
Je referme ce sujet, Pierre Fauconnier m'ayant apporté la solution:
A bientôt de vous lire
Michel
"MorMic" a écrit dans le message de news: 45196176$0$5108$
Bonsoir à toutes et à tous.
Je travaille avec Excel 2000 en VBA J'ai besoin de copier un fichier .dbf en fichier .xls puis d'exécuter des opérations pour récupérer les données. Je procède ainsi:
Sub CopieBase() Workbooks.Open Filename:=NomFichierDbf, ReadOnly:=True ActiveWorkbook.SaveAs Filename:=NomFichierXls, FileFormat:=xlNormal,
Password:="", _ WriteResPassword:="", ReadOnlyRecommended:úlse, CreateBackup:úlse ActiveWorkbook.Close End Sub
A la première exécution du programme, tout va pour le mieux, mais si je veux
exécuter à nouveau mon programme j'ai une erreur m'indiquant que le fichier NomFichierXls est toujours ouvert. En effet, dans l'explorateur de projet je vois une instance du fichier ouverte.
Je dois avoir un problème de compréhension dans la définition des objets.
Quelqu'un peut-il m'expliquer comment fermer ce fichier et pouquoi je me plante une nouvelle fois.
