논리/엑셀 프로그래밍

단어의 모든 알파벳 뒤에 "," 넣기

섬그늘 2008. 11. 14. 13:02

http://kin.naver.com/detail/detail.php?d1id=1&dir_id=1050202&eid=EzpWhEFYYLcf2LkoID0BnHCM+hvpBf9e

 

여러 가지 해법 중 아래는 함수로 처리하는 방법 중 하나입니다.

 

 

B

C

D

E

F

G

H

I

J

K

2

force

 

5

f,o,r,c,e

 

f

f,o

f,o,r

f,o,r,c

f,o,r,c,e

3

array

 

5

a,r,r,a,y

 

a

a,r

a,r,r

a,r,r,a

a,r,r,a,y

4

side

 

4

s,i,d,e

 

s

s,i

s,i,d

s,i,d,e

 

5

give

 

4

g,i,v,e

 

g

g,i

g,i,v

g,i,v,e

 

 

D2 =LEN(B2)

G2 =LEFT(B2)

H2 =IF(COLUMN(A$1)<$D2,G2&","&MID($B2,COLUMN(A$1)+1,1),"")

E2 =OFFSET(G2,0,D2-1)

 

H2 잡아 오른쪽으로 최대길이 감안하여 넉넉히 복사, D2:n2 잡아 아래로 드래그 복사하면 E열에 원하는 결과가 찍힙니다.