Chiedo aiuto poichè mi sono incagliato in un problema , credo stupidi,
ma che fi stà facendo perdere molto tempo.
Ho creato un pulsante in excel che mi dovrebbe impostare un
collegamento ipertestuale su una maschera acces aperta. Senonchè
l'esecuzione del codice mi dà errore poiche il campo in oggetto è di
sola lettura. Il codice in oggetto è il seguente:

Sub Salva()

Dim appAccess As Access.Application
Dim strName As String
Dim strDB As String

    strName = Worksheets("Misure").Range("C1").Value
    ActiveWorkbook.SaveAs Filename:="L:\MISURAZIONI\" & strName, _
        FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
        ReadOnlyRecommended:=False, CreateBackup:=False
    Const strConPathToSamples = "C:\Documents and Settings\Fulvio
\Desktop\"
    strDB = strConPathToSamples & "Copia di Preventivi in Work.mdb"
    Set appAccess = _
        GetObject(strDB)
    appAccess.DoCmd.OpenForm ("NewPreventivo")
    appAccess.DoCmd.GoToControl ("CollExcel")
    appAccess.Screen.ActiveControl = "L:\MISURAZIONI\" & strName

End Sub

l'errore avviene sull'ultima riga.

Grazie per l'aiuto