excel 如何使用 VBA CustomDocumentProperties 方法 删除自定义的文档属性呢？谢谢！

ThisWorkbook.CustomDocumentProperties.Add Name:="bbb", LinkToContent:=False, Type:=msoPropertyTypeString, Value:=1000 这个可以添加自定义文档属性，现在我需要有个方法来判断是否这个 自定义属性是否存在，存在就删除重新添加。谢谢！

使用错误陷阱
Sub CustProperties()

On Error Resume Next
a = ThisWorkbook.CustomDocumentProperties("bbb") '返回自定义属性value，属性不存在抛出错误
If Err.Number Then '添加自定义属性
ThisWorkbook.CustomDocumentProperties.Add Name:="bbb", LinkToContent:=False, Type:=msoPropertyTypeString, Value:=1000
Else
ThisWorkbook.CustomDocumentProperties("bbb").Delete '删除自定义属性
End If
End Sub

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息