按字符串名称排列的工作表数组

Question

是否有一种使用其名称来声明和初始化工作表数组的方法？像这样：

Dim ws() As Worksheet

set ws = Sheets(Array("Data_Ensemble", "Data_Text", "Data_Numbers"))

我很高兴可以将元素设置为for循环，只是想知道是否可以在一行代码中完成？我的朋友Google似乎拒绝了。