Passer au contenu principal

Comment ouvrir un fichier Excel spécifique à partir d'Outlook?

Si vous souhaitez utiliser fréquemment un fichier Excel spécifique lorsque vous travaillez sur Outlook, vous devez donc ouvrir ce fichier de temps en temps. Existe-t-il un moyen rapide et facile pour vous d'ouvrir un fichier de classeur spécifié à partir d'Outlook? Cet article, je vais parler de la façon de le résoudre.

Ouvrez un fichier Excel spécifique à partir d'Outlook avec le code VBA


Ouvrez un fichier Excel spécifique à partir d'Outlook avec le code VBA

Vous pouvez utiliser le code VBA suivant pour ouvrir un fichier de classeur par défaut selon vos besoins, procédez comme suit:

1. Dans Outlook, maintenez la touche ALT + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.

2. Puis clique insérer > Moduleet collez le code suivant dans le Module Fenêtre.

Code VBA: ouvrez un fichier Excel spécifique à partir d'Outlook:

Public Sub OpenSpecificExcelWorkbook()
    Dim xExcelFile As String
    Dim xExcelApp As Excel.Application
    Dim xWb As Excel.Workbook
    Dim xWs As Excel.Worksheet
   Dim xExcelRange As Excel.Range
    xExcelFile = "C:\Users\DT168\Desktop\split document\kto-data.xlsx"
    Set xExcelApp = CreateObject("Excel.Application")
    Set xWb = xExcelApp.Workbooks.Open(xExcelFile)
    Set xWs = xWb.Sheets(1)
    xWs.Activate
    Set xExcelRange = xWs.Range("A1")
    xExcelRange.Activate
    xExcelApp.Visible = True
End Sub

Notes: Dans le code ci-dessus, vous devez modifier le chemin du fichier Excel: C: \ Users \ DT168 \ Desktop \ split document \ kto-data.xlsx à la vôtre

3. Et puis, toujours dans le Microsoft Visual Basic pour applications fenêtre, cliquez sur Outils > Bibliographie pour aller à la Références-Projet1 boîte de dialogue et cochez Bibliothèque d'objets Microsoft Excel Option de Références disponibles zone de liste, voir capture d'écran:

doc open spécifique excel 1

4. Puis clique OK bouton pour quitter la boîte de dialogue, enregistrer et fermer la fenêtre de code. Maintenant, vous devez ajouter ce code au Barre d'outils d'accès rapide.

5. Dans l'interface principale d'Outlook, cliquez sur Personnaliser la barre d'outils Accès rapide icône et sélectionnez Plus de commandes, voir capture d'écran:

doc open spécifique excel 2

6. Dans le Options d'Outlook boite de dialogue:

  • (1.) Sélectionnez Macros du Choisissez les commandes de la liste déroulante;
  • (2.) Et puis choisissez le nom de code VBA que vous venez d'insérer;
  • (3.) Cliquez sur Ajouter pour ajouter le code dans le Personnaliser la barre d'outils Accès rapide zone de liste.

doc open spécifique excel 3

7. Et puis une icône de macro s'affiche dans le Barre d'outils d'accès rapide comme illustré ci-dessous. À partir de maintenant, lorsque vous cliquez sur ce bouton, votre fichier Excel spécifié sera ouvert à la fois.

doc open spécifique excel 4


Meilleurs outils de productivité bureautique

Kutools for Outlook - Plus de 100 fonctionnalités puissantes pour booster votre Outlook

🤖 Assistant de messagerie IA: E-mails professionnels instantanés avec la magie de l'IA : un clic pour des réponses géniales, un ton parfait, une maîtrise multilingue. Transformez l’emailing sans effort ! ...

📧 Email Automation: Absent du bureau (disponible pour POP et IMAP)  /  Programmer l'envoi d'e-mails  /  Auto CC/BCC par règles lors de l'envoi d'un e-mail  /  Transfert automatique (règles avancées)   /  Ajouter un message d'accueil automatique   /  Divisez automatiquement les e-mails multi-destinataires en messages individuels 

(I.e. Email Management: Rappel facile des e-mails  /  Bloquer les e-mails frauduleux par sujets et autres  /  Supprimer les e-mails en double  /  Recherche Avancée  /  Consolider les dossiers 

(I.e. Pièces jointes ProSauvegarde par lots  /  Détachement par lots  /  Compression par lots  /  Enregistrement automatique   /  Détachement automatique  /  Compression automatique 

???? Magie de l'interface: 😊Plus d'émojis jolis et cool   /  Boostez votre productivité Outlook avec des vues à onglets  /  Réduire Outlook au lieu de fermer 

???? Merveilles en un clic: Répondre à tous avec les pièces jointes entrantes  /   E-mails anti-hameçonnage  /  🕘Afficher le fuseau horaire de l'expéditeur 

👩🏼‍🤝‍👩🏻 Contacts et calendrier: Ajouter par lots des contacts à partir des e-mails sélectionnés  /  Diviser un groupe de contacts en groupes individuels  /  Supprimer les rappels d'anniversaire 

infos Caractéristiques 100 Attendez votre exploration ! Cliquez ici pour en savoir plus.

 

 

Comments (6)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
7行目のファイルのフルパスを修正して使っていますが、読み取り専用で開いてしまい、データを修正した後上書き保存ができませんでした。

ネットワークフォルダにあるエクセルの場合は、読み取り専用で開いてしまうのでしょうか?
Windowsのプレビューウインドウも含めて、Excelアプリケーションは一切開いていない状態でも同様に読み取り専用で開いてしまいます。
何か対処法があれば教えていただければ幸いです。

ちなみに、Outlook、Excelともに2019環境です。
This comment was minimized by the moderator on the site
Hello,
The code works well in my Outlook, and the Excel file opens normally, not open with read only mode.

You can insert your Excel file here if you don't mind, so that I can check the code.

Thank you!
This comment was minimized by the moderator on the site
Outlook rejects the code immediately with an error. "Compile Error. User defined type not defined." And it zeroes in on "Dim xExcelApp As Excel.Application" as the problem. I literally just copied and pasted it as is into the editor and tried to run it and it fails out immediately.
This comment was minimized by the moderator on the site
Did you enable the microsoft excel library first?
This comment was minimized by the moderator on the site
This works pretty well!

Could you help me with the line of code in addition to it on how to close the workbook without saving changes.
This comment was minimized by the moderator on the site
Or you can run .bat file:


.bat:
@echo off
"C:\Program Files (x86)\Microsoft Office\Office12\EXCEL.EXE" "D:\your_file.xlsx"

and VBA:
Set WshShell = CreateObject("WScript.Shell")
WshShell.Run chr(34) & "D:\your_BAT.bat" & Chr(34), 0
Set WshShell = Nothing



https://www.winhelponline.com/blog/run-bat-files-invisibly-without-displaying-command-prompt/
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations