ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

for -step- nextÂùÅܼƦ^°é«ç»ò¼g

a = Join(Application.Transpose([b2:b11]), "  ")
Sheet2.[c4].Resize(19, 1) = Application.Transpose(Split(a))

TOP

i = 4
For Each c In Sheet1.[d10:d14]
Sheet2.Cells(i, 4) = c
i = i + 5
Next

TOP

        ÀR«ä¦Û¦b : ¥¬¬I¦p¼½ºØ¡A¥HÅw³ß¤ß´þ¼íºØ¤l¡A¤~·|µoªÞ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD