Reference via VBA

Såvidt jeg ved nej, men jeg mener at du i din kode ikke behøver at erklære noget som excel.nogetjegikkeligekanhuske.11 men bare som excel.nogetjegikkeligekanhuske

Jeg har løst problemmet på denne måde:

    Dim objXlApp As Object
    Set objXlApp = CreateObject("Excel.Application")

Her behøves ingen reference overhovedet :)

Jeg lader spm stå åbent lidt endnu hvis der kommer andre løsningsforslag evt. bedre end min.

Niels

Jeg har lavet en kode her som ser ud til at virke:

Sub tjekForExcel()
    Dim ref As Reference
    For Each ref In References
        If Not ref.IsBroken Then
            Debug.Print ref.Guid & ":  " & ref.Name & " "; ref.Major & "." & ref.Minor
        Else
            If ref.Name = "Excel" Then
                Application.References.Remove ref
                Application.References.AddFromGuid "{00020813-0000-0000-C000-000000000046}", 1, 1
            Else
                Application.References.Remove ref
            End If
        End If
    Next ref
End Sub

Niels