引用Microsoft Scription Runtime声明Dim d As New Scripting.Dictionary看楼主选的答案，看来楼主VBA刚入门， Scripting.Dictionary是需要引用Microsoft Scription Runtime.dll的，否则获取的对象是nothing。而且Dictionary是键值对，你的用法也错了，正确的用法是d.add key