WorksheetFunction.Transpose > 65536 lines

[yytanweiwei]

I have a scripting.dictionary object with more than 65536 lines items. When trying to use the WorksheetFunction.Transpose function, system display Type Mismatch Error 13.

VBA Codes:
.Columns("A").Value = WF.Transpose(dicOrg.Keys)
.Columns("B:E").Value = WF.Transpose(WF.Transpose(dicOrg.Items))

How can I fix this issue? Or split the dictionary object? Thanks so much!

 

[Andrew Poulsom]

Welcome to MrExcel.

There's a function here that might help you:

http://www.tushar-mehta.com/publish_train/xl_vba_cases/1011_Array_CountIf.htm

 

[yytanweiwei]

Andrew, Thank you for the warm welcome and reference!