Code:List36 = Array("BAR", "BEE", "BEI", "BEM", "BSG", "CTM", "CTO", "CTS", "DEG", "EBK", "ECT", "FEE", "FEI", "FEM", "FGA", "FVI", "IPR", "LGS", "NOX", "NTM", "OBA", "OTH", "PDR", "PKG", "PLA", "PLM", "PSG", "RCV", "REL", "RPR", "RTX", "SAR", "SED", "SFT", "SMK", "SMT") Range("A3:A38").Value = Application.Transpose(List36) 'or if the list size varies: 'Range("A3").Resize(UBound(List36) + 1).Value = Application.Transpose(List36)
Bookmarks