VbaReferenceCollection
Contenido
[
Ocultar
]VbaReferenceCollection class
Representa una colección deVbaReference
objetos.
Para obtener más información, visite elTrabajar con macros VBA artículo de documentación.
public sealed class VbaReferenceCollection : IEnumerable<VbaReference>
Propiedades
Nombre | Descripción |
---|---|
Count { get; } | Devuelve el número de referencias de VBA en la colección. |
Item { get; } | ObtieneVbaReference objeto en el índice especificado. |
Métodos
Nombre | Descripción |
---|---|
Remove(VbaReference) | Elimina la primera aparición de un determinadoVbaReference artículo de la colección. |
RemoveAt(int) | Elimina elVbaReference elemento en el índice especificado de la colección. |
Ejemplos
Muestra cómo obtener/eliminar un elemento de la colección de referencia de VBA.
public void RemoveVbaReference()
{
const string brokenPath = @"X:\broken.dll";
Document doc = new Document(MyDir + "VBA project.docm");
VbaReferenceCollection references = doc.VbaProject.References;
Assert.AreEqual(5 ,references.Count);
for (int i = references.Count - 1; i >= 0; i--)
{
VbaReference reference = doc.VbaProject.References[i];
string path = GetLibIdPath(reference);
if (path == brokenPath)
references.RemoveAt(i);
}
Assert.AreEqual(4 ,references.Count);
references.Remove(references[1]);
Assert.AreEqual(3 ,references.Count);
doc.Save(ArtifactsDir + "VbaProject.RemoveVbaReference.docm");
}
/// <summary>
/// Devuelve una cadena que representa la ruta LibId de una referencia especificada.
/// </summary>
private static string GetLibIdPath(VbaReference reference)
{
switch (reference.Type)
{
case VbaReferenceType.Registered:
case VbaReferenceType.Original:
case VbaReferenceType.Control:
return GetLibIdReferencePath(reference.LibId);
case VbaReferenceType.Project:
return GetLibIdProjectPath(reference.LibId);
default:
throw new ArgumentOutOfRangeException();
}
}
/// <summary>
/// Devuelve la ruta de un identificador especificado de una biblioteca de tipo Automatización.
/// </summary>
private static string GetLibIdReferencePath(string libIdReference)
{
if (libIdReference != null)
{
string[] refParts = libIdReference.Split('#');
if (refParts.Length > 3)
return refParts[3];
}
return "";
}
/// <summary>
/// Devuelve la ruta de un identificador especificado de una biblioteca de tipo Automatización.
/// </summary>
private static string GetLibIdProjectPath(string libIdProject)
{
return libIdProject != null ? libIdProject.Substring(3) : "";
}
Ver también
- class VbaReference
- espacio de nombres Aspose.Words.Vba
- asamblea Aspose.Words