View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
keepITcool keepITcool is offline
external usenet poster
 
Posts: 2,253
Default Fill MT cells in a range

Biff,

I dont know what you mean with MT cells,
but does this work for you?

If fills the selected cells..


Sub FillPuzzle()
Dim c As Range
Randomize
For Each c In Selection.Cells
c = Chr$(64 + Int(26 * Rnd + 1))
Next
End Sub



keepITcool

< email : keepitcool chello nl (with @ and .)
< homepage: http://members.chello.nl/keepitcool


"Biff" wrote:

Hello Folks!

My VBA knowledge is slim to none so I need a little help
with a macro.

I would like a macro that fills MT cells in a range with
random uppercase letters A-Z. The cells will not always be
contiguous. I'm playing around with a word search puzzle
and looking for a quick way to fill the MT cells.

Thanks for your help
Biff