toExcel.ActiveWorkBook.ActiveSheet.RANGE(m.lcRange).PasteSpecial()

how do I know what row I am on right now???
need something like:

x2=loRange.LastRow
x1=x2-lnNumRows

x3=[=SUM(D]+tran(x1)+[:D]+tran(x2)+[)]

unfortunately the vba help does not seem to help me at all here <s>

Thanks

Peter



>>I am still working on by balnce sheet with all group totals on sheet 1 and the detail on sheet 2
>>sheet one has hyperlinks to the groups in sheet 2
>>so if you click on Current Assest (cell A1) sheet 2 come to the fore with the range containing all accounts for tis group highlighted.
>>
>>so far so good. When I create the ranges I do an pastespecial as advised by Cetin Basoz.
>>
>>But I want a total in sheet 1 in cell B8
>>
>>See: www.cortiel.com/bs_xl.htm
>>
>>any ideas how to get the formula from a range object which in this example id A5:H19 but I want =Sum(Sheet2!D6:D19)
>>
>>thanks alot!
>>
>>Peter
>
>Peter,
>Not sure I understood the question.
>
>.Range('B8').Formula = "=Sum(Sheet2!D6:D19)"
>
>Cetin