Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
copy from a list
I wrote the following macro to copy the contents of the
cell above the cursor into the cursor's current location. ActiveCell.Offset(-1, 0).Range("A1").Select Selection.copy ActiveCell.Offset(1, 0).Range("A1").Select ActiveSheet.Paste It works fine until I filter the list. For example, when I fliter, the cursor might be on A12 and the next row up is A10. When I run my macro, it returns the value that's in A11. (A11 isn't displayed since it was filtered out). What should the macro be? |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
copy from a list
Sub AAAcopydown()
Dim cell As Range Set cell = ActiveCell.Offset(-1, 0) Do While cell.EntireRow.Hidden = True And cell.Row 1 Set cell = cell.Offset(-1, 0) Loop If cell.EntireRow.Hidden = False Then ActiveCell.Value = cell.Value End If End Sub would be a start. -- Regards, Tom Ogilvy "Bob" wrote in message ... I wrote the following macro to copy the contents of the cell above the cursor into the cursor's current location. ActiveCell.Offset(-1, 0).Range("A1").Select Selection.copy ActiveCell.Offset(1, 0).Range("A1").Select ActiveSheet.Paste It works fine until I filter the list. For example, when I fliter, the cursor might be on A12 and the next row up is A10. When I run my macro, it returns the value that's in A11. (A11 isn't displayed since it was filtered out). What should the macro be? |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Copy list only with values? | Excel Discussion (Misc queries) | |||
Copy to list | Setting up and Configuration of Excel | |||
copy csv list | Excel Discussion (Misc queries) | |||
Copy # fm one list to matching id in list 2? | Excel Worksheet Functions | |||
How to remove duplicates from a list and copy new list to new colu | Excel Worksheet Functions |