Présentation via VBA

Le namespace Aspose.Slides.Vba contient des classes et des interfaces pour travailler avec des macros et du code VBA.

Ajouter des macros VBA

Aspose.Slides fournit la classe VbaProject pour vous permettre de créer des projets VBA (et des références de projet) et d’éditer des modules existants. Vous pouvez utiliser l’interface IVbaProject pour gérer le VBA intégré dans une présentation.

  1. Créez une instance de la classe Présentation.
  2. Utilisez le constructeur VbaProject pour ajouter un nouveau projet VBA.
  3. Ajoutez un module au VbaProject.
  4. Définissez le code source du module.
  5. Ajoutez des références à .
  6. Ajoutez des références à Microsoft Office.
  7. Associez les références au projet VBA.
  8. Enregistrez la présentation.

Ce code C# vous montre comment ajouter une macro VBA à partir de zéro dans une présentation :

    // Crée une instance de la classe présentation
using (Presentation presentation = new Presentation())
{
    // Crée un nouveau projet VBA
    presentation.VbaProject = new VbaProject();

    // Ajoute un module vide au projet VBA
    IVbaModule module = presentation.VbaProject.Modules.AddEmptyModule("Module");
  
    // Définit le code source du module
    module.SourceCode = @"Sub Test(oShape As Shape) MsgBox ""Test"" End Sub";

    // Crée une référence à <stdole>
    VbaReferenceOleTypeLib stdoleReference =
        new VbaReferenceOleTypeLib("stdole", "*\\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\\Windows\\system32\\stdole2.tlb#OLE Automation");

    // Crée une référence à Office
    VbaReferenceOleTypeLib officeReference =
        new VbaReferenceOleTypeLib("Office", "*\\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.0#0#C:\\Program Files\\Common Files\\Microsoft Shared\\OFFICE14\\MSO.DLL#Microsoft Office 14.0 Object Library");

    // Ajoute des références au projet VBA
    presentation.VbaProject.References.Add(stdoleReference);
    presentation.VbaProject.References.Add(officeReference);

            
    // Enregistre la présentation
    presentation.Save(dataDir + "AddVBAMacros_out.pptm", SaveFormat.Pptm);
}

Supprimer des macros VBA

En utilisant la propriété VbaProject de la classe Présentation, vous pouvez supprimer une macro VBA.

  1. Créez une instance de la classe Présentation et chargez la présentation contenant la macro.
  2. Accédez au module Macro et supprimez-le.
  3. Enregistrez la présentation modifiée.

Ce code C# vous montre comment supprimer une macro VBA :

    // Charge la présentation contenant la macro
using (Presentation presentation = new Presentation(dataDir + "VBA.pptm"))
{
    // Accède au module Vba et le supprime 
    presentation.VbaProject.Modules.Remove(presentation.VbaProject.Modules[0]);

    // Enregistre la présentation
    presentation.Save(dataDir + "RemovedVBAMacros_out.pptm", SaveFormat.Pptm);
}

Extraire des macros VBA

  1. Créez une instance de la Présentation et chargez la présentation contenant la macro.
  2. Vérifiez si la présentation contient un projet VBA.
  3. Parcourez tous les modules contenus dans le projet VBA pour visualiser les macros.

Ce code C# vous montre comment extraire des macros VBA d’une présentation contenant des macros :

    // Charge la présentation contenant la macro
using (Presentation pres = new Presentation("VBA.pptm"))
{
	if (pres.VbaProject != null) // Vérifie si la Présentation contient un projet VBA
	{
		foreach (IVbaModule module in pres.VbaProject.Modules)
		{
			Console.WriteLine(module.Name);
			Console.WriteLine(module.SourceCode);
		}
	}
}

Vérifier si un projet VBA est protégé par mot de passe

En utilisant la propriété IVbaProject.IsPasswordProtected, vous pouvez vérifier si les propriétés du projet sont protégées par un mot de passe.

  1. Créez une instance de la Présentation et chargez la présentation contenant la macro.
  2. Vérifiez si la présentation contient un projet VBA.
  3. Vérifiez si le projet VBA est protégé par un mot de passe pour afficher les propriétés du projet.

Ce code C# démontre l’opération :

using (Presentation pres = new Presentation("VBA.pptm"))
{
    if (pres.VbaProject == null) // Vérifie si la Présentation contient un projet VBA
        return;

    if (pres.VbaProject.IsPasswordProtected)
    {
        Console.WriteLine("Le projet VBA '" + pres.VbaProject.Name +
                            "' est protégé par mot de passe pour visualiser les propriétés du projet.");
    }
}