= CHAR(Row() + 61)

H

Howard

The subject line works on the worksheet, when entered in row 4 it returns an A. What little tweek do I need to make it work in the test code here?
The word "Row" is highlighted along with the error msg.

Sub test()
Dim i As Long
i = Range("G2").Value
Range("A3").Resize(i, i).Select
For i = 1 To i
ActiveCell.Offset(0, i) = i
ActiveCell.Offset(i, 0) = CHAR(Row() + 61) 'SUB OR FUNCTION NOT DEFINED
Next
End Sub

I was a bit suprised that Help was useless using:
Ascii Char
Char()
Char(Row)

Thanks,
Howard
 
I

isabelle

hi Howard,

x = Chr(ActiveCell.Row + 61)

happy holidays
isabelle


Le 2012-12-24 16:30, Howard a écrit :
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top