表格里的"文件夹地址"的数据类型已设成“超链接”了

在子窗体中用公式
Private Sub 文件夹地址_DblClick(Cancel As Integer)
Me.Form("文件夹地址") = "D:\"
End Sub

双击生成的地址在单击时无效，直接在表格里录入的地址就有效，这情况怎么解决？