Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Copy format without copy & paste
Hi,
I have merged cells , let's say in sheet1: Reference A10 has MergeArea "A10:A14" I want to have the same format on a similar merged area in sheet2: "B10:B14" Now the procedure is a copy - paste solution, but I doesn't like that. How can I "transfere" the format? Thanks for any help! |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Copy format without copy & paste
Maybe I should tell the format to transfere is in the visual way (frame,
background, font etc. It should NOT transfere number format, date format, percent etc. /Regards "Gunnar Johansson" skrev i meddelandet ... Hi, I have merged cells , let's say in sheet1: Reference A10 has MergeArea "A10:A14" I want to have the same format on a similar merged area in sheet2: "B10:B14" Now the procedure is a copy - paste solution, but I doesn't like that. How can I "transfere" the format? Thanks for any help! |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Copy format without copy & paste
How bout using the Format-Painter (Icon) method?
"Gunnar Johansson" wrote in message ... Hi, I have merged cells , let's say in sheet1: Reference A10 has MergeArea "A10:A14" I want to have the same format on a similar merged area in sheet2: "B10:B14" Now the procedure is a copy - paste solution, but I doesn't like that. How can I "transfere" the format? Thanks for any help! |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
That's a copy & paste method (PasteSpecial)...
It has to be in VBA.
/Regards "Jim May" skrev i meddelandet news:inxEc.20765$WI2.14551@lakeread05... How bout using the Format-Painter (Icon) method? "Gunnar Johansson" wrote in message ... Hi, I have merged cells , let's say in sheet1: Reference A10 has MergeArea "A10:A14" I want to have the same format on a similar merged area in sheet2: "B10:B14" Now the procedure is a copy - paste solution, but I doesn't like that. How can I "transfere" the format? Thanks for any help! |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
That's a copy & paste method (PasteSpecial)...
And recording a macro works or not?
copy and paste, special to do the formatting Sub Macro1() Range("A10:A14").Select Selection.Copy Sheets("Sheet2").Select Range("A10").Select Selection.PasteSpecial Paste:=xlFormats, Operation:=xlNone, _ SkipBlanks:=False, Transpose:=False End Sub Sub Macro1() Sheets("sheet1").Range("A10:A14").Copy Sheets("Sheet2").Range("b10").PasteSpecial Paste:=xlFormats, _ Operation:=xlNone, _ SkipBlanks:=False, Transpose:=False End Sub --- HTH, David McRitchie, Microsoft MVP - Excel [site changed Nov. 2001] My Excel Pages: http://www.mvps.org/dmcritchie/excel/excel.htm Search Page: http://www.mvps.org/dmcritchie/excel/search.htm "Gunnar Johansson" wrote in message ... It has to be in VBA. /Regards "Jim May" skrev i meddelandet news:inxEc.20765$WI2.14551@lakeread05... How bout using the Format-Painter (Icon) method? "Gunnar Johansson" wrote in message ... Hi, I have merged cells , let's say in sheet1: Reference A10 has MergeArea "A10:A14" I want to have the same format on a similar merged area in sheet2: "B10:B14" Now the procedure is a copy - paste solution, but I doesn't like that. How can I "transfere" the format? Thanks for any help! |
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
Thanks! But it is already a Sub/procedure/macro like yours...
Hi David,
Thank you for your effort! I'm sorry if I described unclearly. I have a procedure in a sheet module now, using copy-paste like you've written down for me now. There is a lot of rows divided on several different areas, so there is a lot of code now and I feel I'm loosing control and speed. Therefore, I wondered if there is an other way than copy-paste in the Sub/procedure/ Hope this will clarify, Regards "David McRitchie" skrev i meddelandet ... And recording a macro works or not? copy and paste, special to do the formatting Sub Macro1() Range("A10:A14").Select Selection.Copy Sheets("Sheet2").Select Range("A10").Select Selection.PasteSpecial Paste:=xlFormats, Operation:=xlNone, _ SkipBlanks:=False, Transpose:=False End Sub Sub Macro1() Sheets("sheet1").Range("A10:A14").Copy Sheets("Sheet2").Range("b10").PasteSpecial Paste:=xlFormats, _ Operation:=xlNone, _ SkipBlanks:=False, Transpose:=False End Sub --- HTH, David McRitchie, Microsoft MVP - Excel [site changed Nov. 2001] My Excel Pages: http://www.mvps.org/dmcritchie/excel/excel.htm Search Page: http://www.mvps.org/dmcritchie/excel/search.htm "Gunnar Johansson" wrote in message ... It has to be in VBA. /Regards "Jim May" skrev i meddelandet news:inxEc.20765$WI2.14551@lakeread05... How bout using the Format-Painter (Icon) method? "Gunnar Johansson" wrote in message ... Hi, I have merged cells , let's say in sheet1: Reference A10 has MergeArea "A10:A14" I want to have the same format on a similar merged area in sheet2: "B10:B14" Now the procedure is a copy - paste solution, but I doesn't like that. How can I "transfere" the format? Thanks for any help! |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Lock Cell Format - Allow copy and paste of data without format change | Excel Worksheet Functions | |||
copy / paste format | Excel Worksheet Functions | |||
Copy and Paste in certain format | Excel Worksheet Functions | |||
Copy and Paste and keep format the same | Excel Discussion (Misc queries) | |||
How copy format, font, color and border without copy/paste? | Excel Programming |