word serch

make1up

New Member
Joined
Apr 7, 2011
Messages
4
i am trying to make a word search puzzle for my kids using excel i want to be able to enter there spelling words and have excel place them in a grid of letters in random places either up and down or back and forth or diagonal and have it different each time in order to help them spell there words i can get a field of random letters to fill a grid of what ever size i want and then i could go in and enter the words manually but i would like the computer do it for me lol i could send the work sheet that i have started with the grid of letters but i am at a loss for the placement of the words thanks for any help you could give me
 

Some videos you may like

Excel Facts

Back into an answer in Excel
Use Data, What-If Analysis, Goal Seek to find the correct input cell value to reach a desired result

GTO

MrExcel MVP
Joined
Dec 9, 2008
Messages
6,154
Excel Workbook
ABCDEFGHIJKL
1SNPHHUATVSBK
2ZSWFRIENDBHY
3BPEMHQQGHVOV
4XFSCZGNCZRRA
5CUHBRHJHYZSK
6EQKKSEIQFEEP
7XGUJHXTQQLCO
8AOXLRNNMJKHB
9KJMEMNOOMYRS
10NKCULTPVAFBC
Sheet2
Excel 2003

You mean something like that?
 

make1up

New Member
Joined
Apr 7, 2011
Messages
4
yes that is what i mean does it do it randomly? and let you use a word list of your own?
 

GTO

MrExcel MVP
Joined
Dec 9, 2008
Messages
6,154
yes that is what i mean does it do it randomly? and let you use a word list of your own?

Okay, then let's try something very easy. Rather than the code operate from the list of words, make the list, and enter the words into the (blank) puzzle area of the sheet in various manners as shown. Then select the puzzle area and run:
Excel Workbook
ABCDEFGHI
1SNSPHHUAT
2VSEBKWUJZ
3WBCARROTY
4JNRTBPMHQ
5QGEHVVPZX
6FSTZGNCZR
7AOCCUHBHJ
Sheet2
Excel 2003
The above simply runs through the range selected, and randomly assigns letters to each blank cell.

How's that?

Mark
 

GTO

MrExcel MVP
Joined
Dec 9, 2008
Messages
6,154

ADVERTISEMENT

ACK! How about I include the code...

Rich (BB code):
Sub FillIt()
Dim Cell As Range
    
    For Each Cell In Selection
        If Cell.Value = vbNullString Then
            Cell.Value = Chr(Int((90 - 65 + 1) * Rnd + 65))
        End If
    Next
End Sub
 

make1up

New Member
Joined
Apr 7, 2011
Messages
4
i did make a grid and entered the formula
=LOWER(CHAR(RANDBETWEEN(65,90)))
into each cell then i can go back and enter the words over the formula to make the word search puzzle and i can hit f9 to randomize the unused cells but i was wanting excel to place the words for me it may not be able to be done thanks for the help
 

make1up

New Member
Joined
Apr 7, 2011
Messages
4
the lower command just puts lower case letters instead of uppercase ones
 

Watch MrExcel Video

Forum statistics

Threads
1,122,910
Messages
5,598,803
Members
414,260
Latest member
joishe

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Top