Auteur

MVP Office Access 2003, 2004, 2005 et 2006

Codes pour Access

Base de données

Administrateur

Table

Requête

Formulaire

Dates & Heures

Nombre

Math

Fichier

Commandes externes

Automation

º Ajout Password Excel

Annuler PassWord Excel
º Attache Excel
º Imprimer fichier Excel
º Ouvrir fichier Excel
º Ouvrir fichier Word

Equivalence

Tuto Access 2007

Base de données

Lettre d'information

Automation - Annuler PassWord Excel

Description

		Cette fonction permet d'annuler le mot de passe d'un fichier Excel.

Synthaxe

CancelPassWord (strDir, strDirDest)

La synthaxe de la fonction CancelPassWord comprend les éléments suivants :

Eléments	Description
strNomFile	Expression de chaîne correspondant au chemin complet et au nom du fichier Excel pour lequel on souhaite annuler son mot de passe.
strPassWord	Expression de chaîne correspondant au mot de passe actuel.

Exemple

		Aucun exemple disponible pour le moment.

Code de la fonction

Function CancelPassWord(strNomFile As String, _
strPassWord As String)

Dim appXl As Excel.Application

Set appXl = CreateObject(strAppXl)

With appXl
    .Workbooks.Open strNomFile, , , , strPassWord
    .Workbooks(strNomFile).SaveAs strNomFile & ".tmp", xlExcel7
    .Quit
End With

Set appXl = Nothing

Kill strNomFile
Name strNomFile & ".tmp" As strNomFile

End Function

Date de création : 30/10/2006 @ 14:07
Dernière modification : 30/10/2006 @ 14:07
Catégorie : Automation
Page lue 1150 fois

Prévisualiser la page Imprimer la page