Le refus d'une autorisation d'ouverture d'un Fichier Excel à l'aide d'Excel 12.0 Bibliothèque & VB6

J'ai utilisé Excel dans mon VB6 apps de nombreuses fois, et n'ai jamais couru dans un problème bizarre d'essayer d'accomplir quelque chose de très facile..

Je suis en train d'essayer d'ouvrir un fichier excel (xls ou xlsx) fichier et le lire à travers les valeurs, comme vous pouvez probablement voir.

Lorsque j'essaie d'ouvrir le fichier, j'obtiens une erreur 70 (permission denied) erreur. La chose étrange est qu'il n'y a pas d'autre instance d'excel ouvert (dans le gestionnaire des tâches des applications ou des processus). Personne d'autre est en train d'essayer d'accéder au fichier que ce soit. Je peux ouvrir le fichier dans excel, avec aucun avertissement, et je peux aussi ouvrir/lire/fermer le fichier en VB6 avec la base "d'Ouvrir le Fichier pour l'Entrée #1" syntaxe sans erreur. Je peux supprimer le fichier à l'aide de Kill() donc il ne peut pas être un répertoire problème d'autorisations - s'il vous Plaît aidez - je suis à une perte!!!

  Dim xlApp As New Excel.Application

  Dim xlWBook As Excel.Workbook

  'Error Occurs Here
  Set xlWBook = xlApp.Workbooks.Open(File)

  Dim xlSheet As Excel.Worksheet
  Set xlSheet = xlWBook.Sheets.Item(1)

  Dim y As Integer
  For y = 1 To 99999
    If Len(xlSheet.Cells(y, 1)) > 0 Then
      Send xlSheet.Cells(y, 1) & " - " & xlSheet.Cells(y, 2) & "<br>"
    End If
  Next

  Set xlWBook = Nothing
  Set xlApp = Nothing

-Jay

Quelqu'un dans mon équipe résolu en utilisant ceci: hagrin.com/319/... j'espère que cela fonctionne pour vous

OriginalL'auteur HemiJay | 2009-01-08

1

Pouvez-vous ouvrir un nouveau document de feuille de calcul vide?

Si cela ne fonctionne pas c'est peut être que votre Excel installation doit être ré-enregistré. Ouvrez une invite de commande et accédez au dossier où Excel est installé, généralement quelque chose comme
```
cd "C:\Program Files\Microsoft Office\Office12"
```
puis démarrez Excel avec l'option /regserver
```
excel.exe /regserver
```
Si cela ne vous aide pas, vous pourriez aller à Panneau de configuration -> Ajouter ou Supprimer des Programmes et de commencer une réparation de Microsoft Office.

Une autre chose à vérifier serait de savoir s'il y a des add-ins chargés. Si oui, essayez de les désactiver un par un et voir si le problème disparaît.

Si le problème persiste, vous pouvez vouloir vérifier pour les mises à jour disponibles.

Je ne sais pas si tout cela est lié à votre problème, c'est plutôt les techniques de dépannage standard des applications de Bureau...

Mise à JOUR: Peut-être dépannage avec Procmon va révéler où se trouve le problème (voir http://support.microsoft.com/kb/286198).

C'est la meilleure réponse. Il vous mènera à la solution. Suivez les étapes indiquées par @0xA3. en particulier réparer office, utilisez procmon pour résoudre le "accès refusé" message d'erreur. Et l'utilisation de l'Add feuille de calcul methdo est une autre bonne.

OriginalL'auteur Dirk Vollmar
1

Avez-vous vérifié que votre configuration DCOM.

Eu un problème similaire aujourd'hui, où un service web qui a été d'essayer de créer le Excel.Application a la réception d'un accès refusé.

Dans mon exemple, j'ai dû ajouter le compte invité internet sur les autorisations d'accès à la composante.

Vous pouvez accéder à la configuration DCOM à partir de Démarrer -> Exécuter

Tapez DCOMCNFG - appuyez sur entrée

Puis accédez aux Services de Composants/Ordinateurs/Ordinateur/DCOM Config/Application Microsoft Excel

Clic droit, propriétés...

Les paramètres sont dans l'onglet Sécurité.

OriginalL'auteur Andy

Dim xlApp As New Excel.Application    
Dim xlWBook As Excel.Workbook    
'Error Occurs Here   
Set xlWBook = xlApp.Workbooks.Open(File)

Il n'existe pas de Fichier est en. c'est à dire.

File="C:\myDocuments\myexcel.xlsx". 'Because File string is empty.

OriginalL'auteur Excel expert

0

C'est peut-être pas le fichier que l'autorisation est refusée.

OriginalL'auteur Raminder
0

Juste une pensée, avez-vous regardé le journal des événements Windows pour voir si vous pouvez trouver plus d'informations?

OriginalL'auteur jac
0

Cela pourrait se produire quand il ya un problème dans le fichier excel, un problème de cohérence. Le fichier est une sorte de corrompu.

Par exemple, il y a 2 objets sur la feuille avec le même nom. Le point est, je ne peux pas dire comment il est possible que votre fichier a été enregistré, avec ce genre de "problème", mais lorsque Excel essaie de l'ouvrir, il jette ce genre d'erreur.

OriginalL'auteur afewcc
0

Vous semble pour créer une nouvelle instance d'Excel sans explicitement de clôture (c'est à dire xlApp.Fermer avant de l'installer pour Rien). Qui peut être la cause de problèmes.

Quelques temps les choses se détraque si il ya un peu lâche les instances de l'Office des Applications en cours d'exécution sur lors de l'appel de VBA. Si vous avez quelques Excel.exe cours d'exécution dans le gestionnaire des tâches, mais vous ne pouvez pas voir l'application sur l'écran ou la barre des tâches puis de les tuer et de réessayer.

OriginalL'auteur Marcand

Vous devez vous connecter pour publier un commentaire.