offset to column A current row
any ideas how i can do this? I have the following macro to highlight a
series of cells, but for it to work correctly, the first step needs to be to select the first cell in the current row. thanks ActiveCell.Offset(0, 0).Range("A1:M1").Select Selection.Interior.ColorIndex = 15 ActiveCell.Offset(1, 0).Range("A1").Select |
offset to column A current row
Do you mean so that the colouring only starts at a cell with a value?
Can you give an example? -- --- HTH Bob (there's no email, no snail mail, but somewhere should be gmail in my addy) wrote in message ... any ideas how i can do this? I have the following macro to highlight a series of cells, but for it to work correctly, the first step needs to be to select the first cell in the current row. thanks ActiveCell.Offset(0, 0).Range("A1:M1").Select Selection.Interior.ColorIndex = 15 ActiveCell.Offset(1, 0).Range("A1").Select |
offset to column A current row
I am really not clear on what you want to do and the code you posted give me
no help. Perhaps this??? cells(activecell.row, "A").Interior.ColorIndex = 15 -- HTH... Jim Thomlinson " wrote: any ideas how i can do this? I have the following macro to highlight a series of cells, but for it to work correctly, the first step needs to be to select the first cell in the current row. thanks ActiveCell.Offset(0, 0).Range("A1:M1").Select Selection.Interior.ColorIndex = 15 ActiveCell.Offset(1, 0).Range("A1").Select |
offset to column A current row
activesheet.cells(activecell.row,1).select
Or maybe you really want: Activecell.entirerow.range("a1:M1").Interior.Color Index = 15 wrote: any ideas how i can do this? I have the following macro to highlight a series of cells, but for it to work correctly, the first step needs to be to select the first cell in the current row. thanks ActiveCell.Offset(0, 0).Range("A1:M1").Select Selection.Interior.ColorIndex = 15 ActiveCell.Offset(1, 0).Range("A1").Select -- Dave Peterson |
All times are GMT +1. The time now is 06:59 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com