This function will print the ASCII values for corresponding characters in the first and second column respectively
Sub Convert2_Asc_Values()
For i1 = 1 To 256
Cells(i1 + 1, 3).Value = Asc(Cells(i1 + 1, 2).Value)
Next i1
End Sub
AddMe - Search Engine Optimization
Friday, March 02, 2007
Download Windows Live Toolbar and personalize your Web experience! Add custom buttons to get the information you care about most.
Posts
i1 gives an error... Don't you mean just 'i'?
ReplyDeleteThe complete: i1 its a Var not declarated
ReplyDeleteSub Convert2_Asc_Values()
Dim i1 as integer
For i1 = 1 To 256
Cells(i1 + 1, 3).Value = Asc(Cells(i1 + 1, 2).Value)
Next i1
End Sub
its given error.. invalid procedure call or argument
ReplyDeleteput the value in the cell from row 2 to row 257
ReplyDelete