Home |
Search |
Today's Posts |
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
I have the macro code below that follows the cursor and underlines the active
cell selection row to assist users. But this seems to kill any copy/paste capability. Is there any easy way around this problem? Cells.Borders.LineStyle = xlNone ActiveCell.EntireRow.Borders(xlEdgeBottom).LineSty le = xlContinuous ActiveCell.EntireRow.Borders(xlEdgeBottom).Weight = xlThick |
#2
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Sorry. There is no effective way around it.
-- HTH... Jim Thomlinson "John" wrote: I have the macro code below that follows the cursor and underlines the active cell selection row to assist users. But this seems to kill any copy/paste capability. Is there any easy way around this problem? Cells.Borders.LineStyle = xlNone ActiveCell.EntireRow.Borders(xlEdgeBottom).LineSty le = xlContinuous ActiveCell.EntireRow.Borders(xlEdgeBottom).Weight = xlThick |
#3
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
?B?Sm9obg==?= wrote
I have the macro code below that follows the cursor and underlines the active cell selection row to assist users. But this seems to kill any copy/paste capability. Is there any easy way around this problem? Cells.Borders.LineStyle = xlNone ActiveCell.EntireRow.Borders(xlEdgeBottom).LineSty le = xlContinuous ActiveCell.EntireRow.Borders(xlEdgeBottom).Weight = xlThick Try putting this line ahead of Cells.Borders.LineStyle = xlNone If Application.CutCopyMode = 1 Then Exit Sub -- David |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
auto copy and paste | Excel Discussion (Misc queries) | |||
Group Names Change Upon Paste, Kills Code. | Excel Programming | |||
Group Names Change Upon Paste, Kills Code. | Excel Programming | |||
Procedure kills copy and paste | Excel Programming | |||
Worksheet_Change Event - Macro kills copy and paste | Excel Programming |