View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.misc
Kasper Kasper is offline
external usenet poster
 
Posts: 48
Default Cannot copy merged cell to a single cell

Hi

I've created a macro to copy two values to another part of the sheet.
The original cell is merged and the goal cell is not.
Normally this is not a problem, but since I started to protect the
sheet the problem has risen.

I have an idea that i cannot copy the merged cell since the cell next
to the goal cell is locked. The goal cell is not locked.
I need the cell after the goalcell to be locked so I cannot change
that.

Any ideas on how to get around this? Maybe rewriting the paste line?

Macro below:


Range("C8").Select
Selection.Copy
Range("C17").Select
Cells.Find(What:="", After:=ActiveCell, LookIn:=xlFormulas,
LookAt:=xlPart, Searchorder:=xlByColumns, SearchDirection:=xlNext,
MatchCase:=False, SearchFormat:=False).Activate
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:=False, Transpose:=False



Range("G8").Select
Selection.Copy
Range("E17").Select
Cells.Find(What:="", After:=ActiveCell, LookIn:=xlFormulas,
LookAt:=xlPart, Searchorder:=xlByColumns, SearchDirection:=xlNext,
MatchCase:=False, SearchFormat:=False).Activate
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False


Thank you for any help.