Classe Connections (Excel VBA)

Collection d'objets WorkbookConnection pour le classeur spécifié. Pour utiliser une variable de classe Connections, elle doit d'abord être instanciée, par exemple

Dim cnns as Connections
Set cnns = ActiveWorkbook.Connections

For Each

Voici un exemple de traitement des éléments Connections dans une collection

Dim wbconConnection As WorkbookConnection
For Each wbconConnection In ActiveWorkbook.Connections
	
Next wbconConnection

Add2

Add2 (Name, Description, ConnectionString, CommandText, lCmdtype, CreateModelConnection, ImportRelationships)

Dim strName As String: strName = 
Dim strDescription As String: strDescription = 
Dim strConnectionString As String: strConnectionString = 
Dim strCommandText As String: strCommandText = 
Dim wbconAdd2 As WorkbookConnection
Set wbconAdd2 = ActiveWorkbook.Connections.Add2(Name:=strName, Description:=strDescription, ConnectionString:=strConnectionString, CommandText:=strCommandText)

Arguments

Les arguments nommés :

Name - String

Description - String

ConnectionString - String

CommandText - String

Optional arguments

Les arguments suivants sont facultatifs

lCmdtype

CreateModelConnection

ImportRelationships

AddFromFile

Ajoute une connexion à partir du fichier spécifié.

AddFromFile (Filename, CreateModelConnection, ImportRelationships)

Dim strFilename As String: strFilename = 
Dim wbconAddFromFile As WorkbookConnection
Set wbconAddFromFile = ActiveWorkbook.Connections.AddFromFile(Filename:=strFilename)

Arguments

Un argument nommé

Filename (String) - Nom du fichier.

Optional arguments

Les arguments suivants sont facultatifs

CreateModelConnection (Boolean) - Indique si la connexion au modèle doit être créée.

ImportRelationships (Boolean) - Spécifie si la relation de connexion doit être importée.

Count

Renvoie le nombre d'objets dans la collection. En lecture seule longue.

Dim lngCount As Long
lngCount = ActiveWorkbook.Connections.Count

Item

Cette méthode crée un élément de connexion.

Item (Index)

Index: Valeur d'index de l'élément.

Dim wbconConnection As WorkbookConnection
Set wbconConnection = ActiveWorkbook.Connections(Index:=1)