在excel工作表中存储对象？

Question

你知道有没有人知道在工作表对象中存储对象的方法？或者我们是否必须将其序列化并将其另存为自定义属性？我想要存储的数据我真的不想坐在一张纸上.

Answer 1

取决于您想要添加到工作表中的内容（我假设的数据意味着文本），如果是的话。添加对应用程序可扩展性的引用

并添加您想要的内容。是否将子程序放入模块中，或者放入表中。我使用类似的方法将子过程添加到新模块中，但相同的想法也适用于工作表。

 Sub AddSomething()
    Dim VBCodeMod As CodeModule
    Dim LineNum As Long
    Set VBCodeMod = ActiveWorkbook.VBProject.VBComponents("Sheet1").CodeModule
    With VBCodeMod
    LineNum = .CountOfLines + 1
    .InsertLines LineNum, _
    "Dim thing as String"& Chr(13) & _
    "thing = ""toothpaste"""& Chr(13) & _
    " 'comments too"
    End With

当然，如果您愿意，您可以调整它来覆盖您的项目，并根据需要显式分配持久值。实际上添加模块将使事情更容易访问，但如果您愿意，您可以写入工作表