Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
copy format to new sheet
This code works fine... Just need to add second command to also copy
format of Range ("a14:f44") from "Ind Templates" to new sheet. Private Sub Workbook_newsheet(ByVal Sh As Object) Sheets("Ind Templates").Range("A1:f13").Copy Sh.Range("a1") End Sub |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
copy format to new sheet
Option Explicit Private Sub Workbook_newsheet(ByVal Sh As Object) with workSheets("Ind Templates") .Range("A1:f13").Copy _ destination:=Sh.Range("a1") .range("a14:f44").copy sh.range("a14").pastespecial paste:=xlpasteformats end with End Sub I made some minor changes that don't matter, but that I find makes the code easier to read. "J.W. Aldridge" wrote: This code works fine... Just need to add second command to also copy format of Range ("a14:f44") from "Ind Templates" to new sheet. Private Sub Workbook_newsheet(ByVal Sh As Object) Sheets("Ind Templates").Range("A1:f13").Copy Sh.Range("a1") End Sub -- Dave Peterson |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
copy format to new sheet
worked GREAT!
thanx! |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Copy conditional format from one sheet to another using VBA | Excel Programming | |||
How to copy a conditional format from one sheet to another? | Excel Discussion (Misc queries) | |||
Help: copy sheet format | Excel Programming | |||
VB code to copy sheet format to another sheet | Excel Discussion (Misc queries) | |||
How do I copy a print format from sheet to sheet in excel ? | Excel Discussion (Misc queries) |