A word in one cell to go into many cells

[KatiJ]

I want to type a word in one cell and have it spread out into multiple cells.

Exmaple:
Type the word "Baby" in cell A:1.
B:1 will then have "B", B:2 will have "a", B:3 will have "b", and B:4 will
have "y".

 

[Don Guillett]

Right click sheet tab>view code>insert this.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> Range("a1").Address Then Exit Sub
For i = 1 To Len(Target)
Target.Offset(, i) = Mid(Target, i, 1)
Next
End Sub

 

[Ragdyer]

I will assume that you really wish the word to be spread out *across*
columns, in a single row.
Word in A1, broken down into B1, C1, D1, E1, etc...

=IF(LEN($A1)<COLUMNS($A:A),"",MID($A1,COLUMNS($A:A),1))

Enter in B1, then copy across and down as needed.