Lancer macro vba à partir de vb.net dans un classeur excel déjà ouvert .....

Question

Posez votre question Signaler

Lancer macro vba à partir de vb.net dans un classeur excel déjà ouvert .....

imran_6144

Messages postés: 15
Date d'inscription: jeudi 19 septembre 2019
Statut: Membre
Dernière intervention: 29 septembre 2019

- 23 sept. 2019 à 17:34 - Dernière réponse : imran_6144

Messages postés: 15
Date d'inscription: jeudi 19 septembre 2019
Statut: Membre
Dernière intervention: 29 septembre 2019

- 29 sept. 2019 à 08:41

VB.NET Posez votre question Signaler

Bonjour,

Je travail avec vb.net.
Je lance à partir de vb.net en"run" une macro VBA dans 1 classeur fermé (nommé "PREMIERE"):

ApExcel.Run("PREMIERE.xlsm!Module1.ESSAI").

Ça fonctionne impeccable puisque la macro s’exécute (en ouvrant le classeur). C'est pourquoi il faut qu'il soit fermé avant. Si il n'est pas fermé avant, le code l'ouvre en lecture seule...

Or, je voudrais l’exécuter dans le classeur déjà ouvert!!!!!
(j'ai essayé un certain nombre de choses.........)

Précision:

Voilà comment j'ouvre et travaille dans ce classeur (avant....)

Dim ApExcel As New Excel.Application
Wk2 = ApExcel.Workbooks.Open("C:\Users\Machin\Documents\PREMIERE.xlsm")

Si une âme charitable prends peine, merci d'avance

Afficher la suite

A voir également:

Vb vba
Developpez.net vba - Meilleures réponses
Vba to vb.net - Meilleures réponses
Vb vba difference ✓ - Forum - VB.NET
Différence entre VB6 et VB.net ✓ - Forum - Visual Basic 6
[VBA/Excel] Différence entre exécutions directe et pas-à-pas ✓ - Forum - Visual Basic 6
**** Différence entre VB et VBA*********** - Forum - Visual Basic
Dll pour vb/vba (4) - Codes sources - Visual Basic / VB.NET (API)

1 réponse

Répondre Posez votre question

cs_Le Pivert · Answer 1 · 2019-09-23T18:30:52+0200

Signaler Commenter la réponse de cs_Le Pivert

cs_Le Pivert

Messages postés: 6434
Date d'inscription: jeudi 13 septembre 2007
Statut: Contributeur
Dernière intervention: 13 décembre 2019

91 23 sept. 2019 à 18:30

0

Merci

Bonjour,

voir cela, pas essayé!

https://www.developpez.net/forums/d1200323/dotnet/langages/vb-net/declencher-macro-excel-vb-net/#post6580582

Afficher les 13 commentaires

Signaler Commenter la réponse de imran_6144

imran_6144

Messages postés: 15
Date d'inscription: jeudi 19 septembre 2019
Statut: Membre
Dernière intervention: 29 septembre 2019

- 24 sept. 2019 à 11:22

Bonjour,
D'abord merci, mais le problème demeure.....

C'est exactement ce que je mets.
Mais c'est une ouverture de fichier, puisqu'il l'ouvre en lecture seule.

J'ouvre le fichier avant dans le "load" de mon form ainsi:
Wk2 = ApExcel.Workbooks.Open("C:\Users\Machin\Documents\PREMIERE.xlsm")

Peu importe la façon dont j'ouvre le fichier avant.

Une chose est sure, c'est que la ligne de commande que tu suggère et que j'utilise déjà:
ApExcel.Run("PREMIERE.xlsm!Module1.ESSAI")

Fonctionne parfaitement quand le fichier est fermé.
C'est mon drame du moment car je vais avoir d'autre sub VBA à piloter dans différents Evénements de mon code VB.NET.
Je ne peux pas les transcrire en VB.NET pour l'instant.

Je suis convaincu que si il lance bien la macro VBA dans le fichier fermé, il faut juste qu'il sache que le fichier est déjà ouvert.

Je sais que de sub vba à sub vba si tu fais un application.run, il ne cherche pas à réouvrir le classeur de destination.

Je vais faire des recherches vers le Get(objetcs,......

Si tu as quelque chose, je te congratule d'avance

Signaler Commenter la réponse de cs_Le Pivert

cs_Le Pivert

Messages postés: 6434
Date d'inscription: jeudi 13 septembre 2007
Statut: Contributeur
Dernière intervention: 13 décembre 2019

91 - 24 sept. 2019 à 16:17

Essaie cela:

 Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        'Créer une instance de Excel
        Dim ApExcel As New Excel.Application
        Dim wbExcel As New Excel.Worksheet
        'Ouvrir un  classeur
        ApExcel.Workbooks.Open("C:\Users\LePivert\Documents\Classeur1.xlsm")'a adapter
        'rendre le classeur visible
        ApExcel.Visible = True
    End Sub
 Private Sub Button4_Click(sender As System.Object, e As System.EventArgs) Handles Button4.Click
        'Créer une instance de Excel
        Dim ApExcel As New Excel.Application
        Dim wbExcel As New Excel.Worksheet
        ApExcel.DisplayAlerts = False
        ApExcel.Workbooks.OpenText("C:\Users\LePivert\Documents\Classeur1.xlsm")'a adapter
        ApExcel.Run("Classeur1.xlsm!Module1.essai")'a adapter
        ApExcel.DisplayAlerts = True
        ApExcel.Workbooks.Close() 'on ferme le classeur
        ApExcel.Visible = False
        ApExcel.Quit() 'on ferme Excel
    End Sub

Voilà

@+ Le Pivert

Signaler Commenter la réponse de imran_6144

imran_6144

Messages postés: 15
Date d'inscription: jeudi 19 septembre 2019
Statut: Membre
Dernière intervention: 29 septembre 2019

- 26 sept. 2019 à 07:46

Bonjour à toi,

Encore une fois merci, mais cette solution ne vas pas vers le résultat souhaité.
Je pense que la seule solution pour l'instant est d'agir sur un classeur au préalable fermé...

Je n'abdique pas pour autant.

Si j'y arrive, je te tiens au courant.

A bientôt

Signaler Commenter la réponse de imran_6144

imran_6144

Messages postés: 15
Date d'inscription: jeudi 19 septembre 2019
Statut: Membre
Dernière intervention: 29 septembre 2019

- 26 sept. 2019 à 07:52

Bonjour,

Encore une fois merci.
En effet ça ne règle pas le problème puisque l'objectif premier est de pouvoir lancer une macro.
Je pense que la seule solution pour l'instant est d'agir sur un classeur fermé au préalable.

Je ne renonce pas.

Je te tiens au courant si j'obtiens quelque chose.

A bientôt

Signaler Commenter la réponse de cs_Le Pivert

cs_Le Pivert

Messages postés: 6434
Date d'inscription: jeudi 13 septembre 2007
Statut: Contributeur
Dernière intervention: 13 décembre 2019

91 - 26 sept. 2019 à 11:58

Bonjour,
Voilà un exemple avec le Partage, j'ai tout automatisé. Si tu ne trouves pas une autre manière de lancer des macros sur un classeur ouvert. J'ai fait un exemple avec 2 macros, tu peux en mettre le nombre que tu veux. Elle prennent effet à la fermeture du classeur.

https://www.cjoint.com/c/IIAj3BTphZQ

@+ Le Pivert

Signaler Commenter la réponse de imran_6144

imran_6144

Messages postés: 15
Date d'inscription: jeudi 19 septembre 2019
Statut: Membre
Dernière intervention: 29 septembre 2019

- 26 sept. 2019 à 15:19

Merci à toi,

Je vais regarder ça.

Signaler Commenter la réponse de imran_6144

imran_6144

Messages postés: 15
Date d'inscription: jeudi 19 septembre 2019
Statut: Membre
Dernière intervention: 29 septembre 2019

- 29 sept. 2019 à 08:41

Bonjour,
Je n'ai pas encore regarder ta solution.
Bien entendu, je te ferai un retour dès que.

A+

Lancer macro vba à partir de vb.net dans un classeur excel déjà ouvert .....

Votre réponse