Get a VBA Module Introduction VBA (Visual Basic for Applications) modules in PowerPoint are used to automate tasks and add functionality that is not supported by the standard PowerPoint features. VBA allows you to write macros and create custom functions that can perform various operations, such as modifying slides, working with objects on a slide, managing animations, and much more. Use the following method to get modules from VBA projects.
GetVbaModule
API Type Description Resource
/slides/{name}/vbaProject/modules/{moduleIndex}
GET
Returns a VBA module from a presentation saved in a storage.
GetVbaModule
Request Parameters
Name Type Location Required Description
name
string
path
true
The name of a presentation file.
moduleIndex
integer
path
true
The 1-based index of a VBA module.
password
string
header
false
The password to open the presentation.
folder
string
query
false
The path to the folder containing the presentation file.
storage
string
query
false
The name of the storage contaning the folder.
Examples In the default storage, the document MyPresentation.pptm contains a VBA project with one module. Get the source code from the module.
cURL Solution
SDK Solutions
C#
using System ;
using Aspose.Slides.Cloud.Sdk ;
using Aspose.Slides.Cloud.Sdk.Model ;
class Application
{
static void Main ( string [] args )
{
SlidesApi slidesApi = new SlidesApi ( "MyClientId" , "MyClientSecret" );
string fileName = "MyPresentation.pptm" ;
int moduleIndex = 1 ;
VbaModule vbaModule = slidesApi . GetVbaModule ( fileName , moduleIndex );
Console . WriteLine ( vbaModule . SourceCode );
}
}
// Example output:
//
// Attribute VB_Name = "MyModule"
// Sub MyMacro()
// MsgBox ("Hello, World!")
// End Sub
Java
import com.aspose.slides.ApiException ;
import com.aspose.slides.api.SlidesApi ;
import com.aspose.slides.model.VbaModule ;
public class Application {
public static void main ( String [] args ) throws ApiException {
SlidesApi slidesApi = new SlidesApi ( "MyClientId" , "MyClientSecret" );
String fileName = "MyPresentation.pptm" ;
int moduleIndex = 1 ;
VbaModule vbaModule = slidesApi . getVbaModule ( fileName , moduleIndex , null , null , null );
System . out . println ( vbaModule . getSourceCode ());
}
}
// Example output:
//
// Attribute VB_Name = "MyModule"
// Sub MyMacro()
// MsgBox ("Hello, World!")
// End Sub
PHP
use Aspose\Slides\Cloud\Sdk\Api\Configuration ;
use Aspose\Slides\Cloud\Sdk\Api\SlidesApi ;
$configuration = new Configuration ();
$configuration -> setAppSid ( "MyClientId" );
$configuration -> setAppKey ( "MyClientSecret" );
$slidesApi = new SlidesApi ( null , $configuration );
$fileName = "MyPresentation.pptm" ;
$moduleIndex = 1 ;
$vbaModule = $slidesApi -> getVbaModule ( $fileName , $moduleIndex );
print ( $vbaModule -> getSourceCode ());
// Example output:
//
// Attribute VB_Name = "MyModule"
// Sub MyMacro()
// MsgBox ("Hello, World!")
// End Sub
Ruby
require "aspose_slides_cloud"
include AsposeSlidesCloud
configuration = Configuration . new
configuration . app_sid = "MyClientId"
configuration . app_key = "MyClientSecret"
slides_api = SlidesApi . new ( configuration )
file_name = "MyPresentation.pptm"
module_index = 1
vba_module = slides_api . get_vba_module ( file_name , module_index )
puts vba_module . source_code
# Example output:
#
# Attribute VB_Name = "MyModule"
# Sub MyMacro()
# MsgBox ("Hello, World!")
# End Sub
Python
from asposeslidescloud.apis import SlidesApi
slides_api = SlidesApi ( None , "MyClientId" , "MyClientSecret" )
file_name = "MyPresentation.pptm"
module_index = 1
vba_module = slides_api . get_vba_module ( file_name , module_index )
print ( vba_module . source_code )
# Example output:
#
# Attribute VB_Name = "MyModule"
# Sub MyMacro()
# MsgBox ("Hello, World!")
# End Sub
Node.js
const cloudSdk = require ( "asposeslidescloud" );
const slidesApi = new cloudSdk . SlidesApi ( "MyClientId" , "MyClientSecret" );
fileName = "MyPresentation.pptm" ;
moduleIndex = 1 ;
slidesApi . getVbaModule ( fileName , moduleIndex ). then ( vbaModule => {
console . log ( vbaModule . body . sourceCode );
});
// Example output:
//
// Attribute VB_Name = "MyModule"
// Sub MyMacro()
// MsgBox ("Hello, World!")
// End Sub
Go
import (
"fmt"
asposeslidescloud "github.com/aspose-slides-cloud/aspose-slides-cloud-go/v24"
)
func main () {
configuration := asposeslidescloud . NewConfiguration ()
configuration . AppSid = "MyClientId"
configuration . AppKey = "MyClientSecret"
slidesApi := asposeslidescloud . NewAPIClient ( configuration ). SlidesApi
fileName := "MyPresentation.pptm"
var moduleIndex int32 = 1
vbaModule , _ , _ := slidesApi . GetVbaModule ( fileName , moduleIndex , "" , "" , "" )
fmt . Println ( vbaModule . GetSourceCode ())
}
// Example output:
//
// Attribute VB_Name = "MyModule"
// Sub MyMacro()
// MsgBox ("Hello, World!")
// End Sub
C++
#include "asposeslidescloud/api/SlidesApi.h"
using namespace asposeslidescloud :: api ;
int main ()
{
std :: shared_ptr < SlidesApi > slidesApi = std :: make_shared < SlidesApi > ( L "MyClientId" , L "MyClientSecret" );
const wchar_t * fileName = L "MyPresentation.pptm" ;
int moduleIndex = 1 ;
std :: shared_ptr < VbaModule > vbaModule = slidesApi -> getVbaModule ( fileName , moduleIndex ). get ();
std :: wcout << vbaModule -> getSourceCode ();
}
// Example output:
//
// Attribute VB_Name = "MyModule"
// Sub MyMacro()
// MsgBox ("Hello, World!")
// End Sub
Perl
use AsposeSlidesCloud::Configuration ;
use AsposeSlidesCloud::SlidesApi ;
my $configuration = AsposeSlidesCloud::Configuration -> new ();
$configuration -> { app_sid } = "MyClientId" ;
$configuration -> { app_key } = "MyClientSecret" ;
my $slides_api = AsposeSlidesCloud::SlidesApi -> new ( config => $configuration );
my $vbaModule = $slides_api -> get_vba_module (
name => "MyPresentation.pptm" ,
module_index => 1 );
print $vbaModule -> { source_code };
# Example output:
#
# Attribute VB_Name = "MyModule"
# Sub MyMacro()
# MsgBox ("Hello, World!")
# End Sub
SDKs Check Available SDKs to learn how to add an SDK to your project.
