View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
JLGWhiz JLGWhiz is offline
external usenet poster
 
Posts: 3,986
Default help with macro vba

See modified statements below.


Selection.AutoFill Destination:=Cells(LastRow, LastColumn).Address)

Range("A1:F" C2:"& Cells(LastRow, LastColumn).Address).Sort

ActiveWorkbook.Names.Add Name:="MyRangeName", RefersToR1C1:= _
"=Sheet1!R2C2:"& Cells(LastRow, LastColumn).Address


That should do it.

"mario" wrote:

I want to edit my macro (created by recording). Can you help me with the
codes for the following

I want to change this:
Selection.AutoFill Destination:=Range("C2:C1489")

to this:
Selection.AutoFill Destination:=Range("C2:"&Range(LastRow,
LastColumn).Address)
where the LastRow and LastColum, both integer, store the last row and last
column with data in a sheet.

I want to change this:
Range("A1:F1489").Sort
to this:
Range("A1:F" C2:"&Range(LastRow, LastColumn).Address)).Sort

I want to change this:
ActiveWorkbook.Names.Add Name:="MyRangeName", RefersToR1C1:= _
"=Sheet1!R2C2:R1489"
to:
ActiveWorkbook.Names.Add Name:="MyRangeName", RefersToR1C1:= _
"=Sheet1!R2C2:"&Range(LastRow, LastColumn).Address

Can you please correct the syntaxes above. I am trying to replace the actual
row and columns to an genarallized row and column number. The variables
LastRow and LastColumn stores the numeric values of last row and column

Pls help

Thanks
Mario