Wow, with all these neat answers, it almost makes me wish it were *my*
problem to be solved. I shall pass yours along with the rest to wifey <g!
Thanks!!!
--
Dave
Temping with Staffmark
in Rock Hill, SC


"Scoops" wrote:

On 4 May, 13:27, Dave Birley
wrote:
My wife works tech support at a large company. Her specialty is Outlook, but
she covers all MS Office products to a degree. Her job description precludes
her from supporting VBA programming, so guess who gets delegated to smoke out
the answer? Here's her question:

"I need to copy the alphabet across and this formula will only copy the
alphabet down.

=LEFT(ADDRESS(1,ROW(B1),4,1),FIND("1",ADDRESS(1,RO W(B1),4,1))-1)"

However looking at the formula she sent me, it appears to have nothing to do
with the question. Sheesh!

Anyway, copying the alphabet across is what she mentioned to me before, and
I suspect that is really what she wants. (Be nice to me -- Anita is wife
v.2.0, as of less than two years, and the "period of adjustment" is still in
full flower <g!)

For something so simple, and assuming it would be needed to use on various
WSs, This dorky macro does it:

Sub Macro1()
'
' Macro1 Macro
' Macro recorded 5/4/2007 by Administrator
'

'
ActiveCell.FormulaR1C1 = "A"
Range("B1").Select
ActiveCell.FormulaR1C1 = "B"
Range("C1").Select
ActiveCell.FormulaR1C1 = "C"
Range("D1").Select
.
.
.
ActiveCell.FormulaR1C1 = "Y"
Range("Z1").Select
ActiveCell.FormulaR1C1 = "Z"
Range("A1").Select
End Sub

But surely there must be a formula that could be fired off in a single cell
to do it?

Could it be that this clown's formula is trying to capture the letters from
the column names? I can't make head nor tail of it.
--
Dave
Temping with Staffmark
in Rock Hill, SC

You could type the alphabet in once and then:

Highlight the range
Tools Options Custom Lists tab (the "Import list from cells" box
should contain the higlighted range address)
Click Import

Now you can type an alpha anywhere in a sheet and use the fill handle
to complete the alphabet.

Regards

Steve