capturing current range of cells
I am developing several utilities that I can give to my customers. I am a financial and accounting consultant to businesses specializing in Excel. The user selects a cell. I want to place that cell in a variable so I can use it in the future. i.e. x= cell selected. Location of new stuff cells(1,x+6) Or range = range(x, x=6) range(x).select Or The user selects a range a12.r12 I want to save that range in a variable so I can use it in a future function. X= A12.R12 wont work because it is absolute. I need a relative address.. I am looking for something like X= range.select Selection.AutoFill Destination:=ActiveCell.Range(x), Type:=xlFillDefault This selects the appropriate range and then copies the appropriate data. |
capturing current range of cells
dim X as range
Set x = selection or Dim X as range Set X = Range(activecell, activecell.offset(6,1)) Bob Flanagan Macro Systems 144 Dewberry Drive Hockessin, Delaware, U.S. 19707 Phone: 302-234-9857, cell 302-584-1771 http://www.add-ins.com Productivity add-ins and downloadable books on VB macros for Excel "lwm" wrote in message ... I am developing several utilities that I can give to my customers. I am a financial and accounting consultant to businesses specializing in Excel. The user selects a cell. I want to place that cell in a variable so I can use it in the future. i.e. x= cell selected. Location of new stuff cells(1,x+6) Or range = range(x, x=6) range(x).select Or The user selects a range a12.r12 I want to save that range in a variable so I can use it in a future function. 'X= "A12.R12" won't work because it is absolute. I need a relative address.. I am looking for something like X= range.select Selection.AutoFill Destination:=ActiveCell.Range(x), Type:=xlFillDefault This selects the appropriate range and then copies the appropriate data. |
capturing current range of cells
Unfortunately this
Selection.AutoFill Destination:=ActiveCell.Range(x), Type:=xlFillDefault gives the error select only one cell. If I use x="a1:L1" it works dim X as range Set x = selection gives erro that is my problem. "Bob Flanagan" wrote: dim X as range Set x = selection or Dim X as range Set X = Range(activecell, activecell.offset(6,1)) Bob Flanagan Macro Systems 144 Dewberry Drive Hockessin, Delaware, U.S. 19707 Phone: 302-234-9857, cell 302-584-1771 http://www.add-ins.com Productivity add-ins and downloadable books on VB macros for Excel "lwm" wrote in message ... I am developing several utilities that I can give to my customers. I am a financial and accounting consultant to businesses specializing in Excel. The user selects a cell. I want to place that cell in a variable so I can use it in the future. i.e. x= cell selected. Location of new stuff cells(1,x+6) Or range = range(x, x=6) range(x).select Or The user selects a range a12.r12 I want to save that range in a variable so I can use it in a future function. 'X= "A12.R12" won't work because it is absolute. I need a relative address.. I am looking for something like X= range.select Selection.AutoFill Destination:=ActiveCell.Range(x), Type:=xlFillDefault This selects the appropriate range and then copies the appropriate data. |
All times are GMT +1. The time now is 03:51 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com