| Home |
| Search |
| Today's Posts |
|
|
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Dealing with merged cells
I have a range name for a cell of MYNAME.
MYNAME started off life just being a single cell and I could do all sorts of wonderful things to it concisely: Range("MYNAME").ClearContents Range("MYNAME").Locked = True I have now made MYNAME a merged cell that spans two columns (A1:B1). Now I find for my code to work I have to select the merged cells first then perform my operations: Range("MYNAME").Select Selection.ClearContents Selection.Locked = True Is there a way to deal with merged cells so that I can perform the above operations with just one line of code to make the code easier to read and follow? Chrisso |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Dealing with merged cells
I'd probably do it this way
Sub Test() With Range("MYNAME").MergeArea .ClearContents .Locked = True End With End Sub HTH, Barb Reinhardt "Chrisso" wrote: I have a range name for a cell of MYNAME. MYNAME started off life just being a single cell and I could do all sorts of wonderful things to it concisely: Range("MYNAME").ClearContents Range("MYNAME").Locked = True I have now made MYNAME a merged cell that spans two columns (A1:B1). Now I find for my code to work I have to select the merged cells first then perform my operations: Range("MYNAME").Select Selection.ClearContents Selection.Locked = True Is there a way to deal with merged cells so that I can perform the above operations with just one line of code to make the code easier to read and follow? Chrisso |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Dealing with merged cells
I is unclear if the definition of myname is 1 cell or 2, but if it is
actually defined to be two cells or could be two cells, then I would alter it as such: Sub Test() With Range("MYNAME")(1).MergeArea .ClearContents .Locked = True End With End Sub -- Regards, Tom Ogilvy "Barb Reinhardt" wrote: I'd probably do it this way Sub Test() With Range("MYNAME").MergeArea .ClearContents .Locked = True End With End Sub HTH, Barb Reinhardt "Chrisso" wrote: I have a range name for a cell of MYNAME. MYNAME started off life just being a single cell and I could do all sorts of wonderful things to it concisely: Range("MYNAME").ClearContents Range("MYNAME").Locked = True I have now made MYNAME a merged cell that spans two columns (A1:B1). Now I find for my code to work I have to select the merged cells first then perform my operations: Range("MYNAME").Select Selection.ClearContents Selection.Locked = True Is there a way to deal with merged cells so that I can perform the above operations with just one line of code to make the code easier to read and follow? Chrisso |
|
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Dealing with merged cells
Tom,
What's the difference between Range("MYNAME")(1).MergeArea and Range("MYNAME").MergeArea Thanks, Barb "Tom Ogilvy" wrote: I is unclear if the definition of myname is 1 cell or 2, but if it is actually defined to be two cells or could be two cells, then I would alter it as such: Sub Test() With Range("MYNAME")(1).MergeArea .ClearContents .Locked = True End With End Sub -- Regards, Tom Ogilvy "Barb Reinhardt" wrote: I'd probably do it this way Sub Test() With Range("MYNAME").MergeArea .ClearContents .Locked = True End With End Sub HTH, Barb Reinhardt "Chrisso" wrote: I have a range name for a cell of MYNAME. MYNAME started off life just being a single cell and I could do all sorts of wonderful things to it concisely: Range("MYNAME").ClearContents Range("MYNAME").Locked = True I have now made MYNAME a merged cell that spans two columns (A1:B1). Now I find for my code to work I have to select the merged cells first then perform my operations: Range("MYNAME").Select Selection.ClearContents Selection.Locked = True Is there a way to deal with merged cells so that I can perform the above operations with just one line of code to make the code easier to read and follow? Chrisso |
|
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Dealing with merged cells
If:
Name: MyName Refersto: Sheet1!$A$1:$B$2 then Range("MYNAME").MergeArea raises an error Range("MYNAME")(1).MergeArea doesn't. -- Regards, Tom Ogilvy "Barb Reinhardt" wrote: Tom, What's the difference between Range("MYNAME")(1).MergeArea and Range("MYNAME").MergeArea Thanks, Barb "Tom Ogilvy" wrote: I is unclear if the definition of myname is 1 cell or 2, but if it is actually defined to be two cells or could be two cells, then I would alter it as such: Sub Test() With Range("MYNAME")(1).MergeArea .ClearContents .Locked = True End With End Sub -- Regards, Tom Ogilvy "Barb Reinhardt" wrote: I'd probably do it this way Sub Test() With Range("MYNAME").MergeArea .ClearContents .Locked = True End With End Sub HTH, Barb Reinhardt "Chrisso" wrote: I have a range name for a cell of MYNAME. MYNAME started off life just being a single cell and I could do all sorts of wonderful things to it concisely: Range("MYNAME").ClearContents Range("MYNAME").Locked = True I have now made MYNAME a merged cell that spans two columns (A1:B1). Now I find for my code to work I have to select the merged cells first then perform my operations: Range("MYNAME").Select Selection.ClearContents Selection.Locked = True Is there a way to deal with merged cells so that I can perform the above operations with just one line of code to make the code easier to read and follow? Chrisso |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Copy paste non merged to merged cells | Excel Worksheet Functions | |||
| How can I sort an Excel Doc containing merged & non-merged cells? | Excel Discussion (Misc queries) | |||
| Autofit Merged cell Code is changing the format of my merged cells | Excel Discussion (Misc queries) | |||
| how do i link merged cells to a merged cell in another worksheet. | Excel Worksheet Functions | |||
| Sorting merged cellsHow do I sort merged cells not identically siz | Excel Worksheet Functions | |||
Hybrid Mode
