testlist <- list(r = c("lrlsfnjgpcjekqbfgpww", "gauzcvleuptzdtwsli", NA,  "vhw", "lopr", "zmmdoneufnjtwltvrhju", NA, "rapcwqoqjfoofbyybnns",  "pucecdbkaghjcevppbpc", "zwwfsmjqlxx", NA, "njbltffdfpeslwvxzakv",  NA, "naetvcerkdyxorn", "xfjjwcvizzzocgkeexnz", "udnliauzsjuzmeiukzui",  NA, "nyyarcsnlbfthcdbjvfa", "bfkgqwzorqzurtddhtyv", NA, NA, "sefnzsjwyaspimbxthfu",  "pyaqymkyrfhdkgfvesuy", NA, NA, NA, "wbnwiudbjcyizxhdp", NA,  "gnnrveuygou", NA, NA, NA, NA, "ytyvjxxlglbwhphmrern", NA, "hmhngoppjhreqpvkilup",  "qntlzlaowudjhxdnjvkp", "uuflsddvhadtavoglh", "eq", "cachb",  "ciciyrrgpsrdtgsuipgt", "muyflbbadmmmkdlbjqef", "qbgdaiphvvgkcrgsmmus",  NA, "mpnjxhadsimvksjiskaq", NA, "", NA, NA, NA, "", "fnewcdlwv",  "dgykuahruhisqwwavubb", NA, NA, "vdangggqjtoxhsekcyom", "gjmogvnwvvglffndlzhs",  NA, NA, "wj"), t = c("", "msqyrbuxygzcchnf", NA, "hytgtxdiyhusiiquazzg",  NA, NA, NA, NA, NA, "qv", "dsayktn", "kqfmq", "wvmnya", "bhfxqzlwolcdv",  "cmnztedc", "wvpqubfltulqtsirqove", NA, "uzxkplxlfzsthkwzsacl",  "lnmyhoqmmkdrxgogwdcw", NA, "o", "ggbf", "yqzckklshtfywbkqdpfb",  "snoeryywvqaynclbadwo", "fzbyobmqewfbpvnzzxhv", "anasgomfavjbrelvlmev",  "exjvgbfcm", "ydcyajjmywgyzyieiikn", "eovfzeidudners", "tkvrakpzjpojghqjurfi",  "aduijihouuxcgzbbrnvl", "bymyqi", "f", NA, NA, "bfpuhnmwcdjamb",  "kt", "vnjrxy", NA, "oylcqxjeygbzorqdyhn", "sqgcvhm", NA, NA,  "hdealnmjnglkbdltinkc", "qjaqylfrxtfxnwnfkohg", "slboumqltbnczngt",  NA, "vrxexessdrimsmrwbnwy", "qmzkcxupzozdgxuzavkk", "uuys", "nhjwrimyah",  "trumnhfi", "xrs", NA, "mqhtosmalvownnudayax", "tudtyjqjwlnwcps",  NA, NA), v = c(NA, NA, NA, "dvvcyimswqgb", "xxxkmeqbiaobiinbmkqv",  NA, "qflcezdlygywxyienxfr", "pqyieafkozjgwjum", "a", "ygcgacotdugvvauyiwjz",  "ahlheyzqgnfkvjfrxezg", "twkgsgwiwrozt", NA, NA, NA, "zcjzbiimjwxphbaln",  "feqn", "gvzerdj", "unvucrbvbdtg", "qaoakjyqeyidyipkqhgi", NA,  "xgmwkmldqssfpbdtguxb", NA, NA, "cdpubqdydxlgukfkwzer", NA, "kzvyfraciimvtxmlqalv",  NA, NA, "fjzvzanrrxacjpsyvbjo", "ddbflgusziuyeq", NA, "jxkmsbmryeyyxbqitepp",  "", NA, "pyospzzqgcesaikjlzez", "rpnoaxxncxlcquhqxdoy", NA, NA,  "ya", "huwkfgqbblzbfssgpjce", NA, "enydjomebwzkdowqaptb", "vnrophkghrkktztveztt",  "khaaszbzblkdsuvelwjh", "ilxoze", "mcxlcsvhkrqczlyixddl", "xyozpilxjzttsxydgqdp",  "hoiqqkepposyfyddufk", "hfdlwrcunchftzjpl", "rzjxxcbcvlwtixhyhh",  "qqjavunkpsabougggsc", "heizxaqfdlmzbrdqtmmr", "a", NA, NA, NA ))
result <- do.call(openxlsx:::buildCellList,testlist)
str(result)