harf harf

merhaba arkadaşlar. vba excelde hücredeki kelimeyi harf harf diziye atamak istiyorum hücrede SINIF yazıyor ise Dim strName As Variant strName = Array("S", "I", "N", "I", "F") şekline getirmek istiyorum. Yardımcı olur musunuz.