<div>
Alphabet:<br />
A=Chr(65)...Z=Chr(90)<br />
<br />
How you want to fill your sheet?<br />
Usually it is filled by column like this:<br />
<br />

<pre><code id="code-70429">rem  if we use only column A, 
rem  then i=65
rem  file = excel file object 
rownumber = 1 
For x = Lbound(ArrName) To Ubound(ArrName) 
  
   cellname$ = chr(i) &amp; cstr(rownumber)
   file.range( cellname$ ).Select
   file.Activecell.FormulaR1C1 = ArrName(x)
   rownumber = rownumber + 1 
End For 
rem If you need to change column, then substitute needed number for i
</code></pre>
</div>


Alphabet:
A=Chr(65)...Z=Chr(90)

How you want to fill your sheet?
Usually it is filled by column like this:



rem  if we use only column A, 
rem  then i=65
rem  file = excel file object 
rownumber = 1 
For x = Lbound(ArrName) To Ubound(ArrName) 
  
   cellname$ = chr(i) & cstr(rownumber)
   file.range( cellname$ ).Select
   file.Activecell.FormulaR1C1 = ArrName(x)
   rownumber = rownumber + 1 
End For 
rem If you need to change column, then substitute needed number for i


<div>
abt 250 columns (depends of array) with at least 10 rows each.
</div>


abt 250 columns (depends of array) with at least 10 rows each.

<div>
Then add column loop and row loop.<br />
<br />
Or, swap columns and rows, if its possible.<br />
<br />

</div>


Then add column loop and row loop.

Or, swap columns and rows, if its possible.



<div>
chr(i) is from A to Z, but when it reach colums AA,AB... that caused the problem
</div>


chr(i) is from A to Z, but when it reach colums AA,AB... that caused the problem

<div>
<div class="content wysiwyg-content">
Hi,<br />
<br />
Error:&quot;Object not found ...&quot; <br />
Reasons:When excel column reach &quot;AB&quot; chr(i) no longer working<br />
Question:Any workaround/fix ?<br />
<br />
i=97<br />
For x = Lbound(ArrName) To Ubound(ArrName) <br />
&nbsp;i = i + 1 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br />
&nbsp;ctr = ctr + 1 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br />
&nbsp;xlSheet.Range(Trim(Chr(i))<wbr /> &amp;&nbsp;Cstr(ctr)).Value = ArrName(x)<br />
..<br />
<br />
<br />

</div>
</div>


Hi,

Error:"Object not found ..." 
Reasons:When excel column reach "AB" chr(i) no longer working
Question:Any workaround/fix ?

i=97
For x = Lbound(ArrName) To Ubound(ArrName) 
 i = i + 1		
 ctr = ctr + 1			
 xlSheet.Range(Trim(Chr(i)) & Cstr(ctr)).Value = ArrName(x)
..




LotusScript - Excel Range

Lotus Software produced the Lotus 1-2-3 spreadsheet program, and later developed Lotus Notes, a groupware and email system. Following its acquisition by IBM, the Notes and Domino client/server collaborative platform were expanded to include functions such as email, calendars, to-do lists, contacts management, teamrooms, discussion forums, file sharing, microblogging, instant messaging, blogs, and user directories. IBM also release SmartSuite, a comprehensive office suite, and followed that with Symphony, unrelated to the Lotus suite of the same name.