excel - 在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

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