View Single Post
  #6   Report Post  
Posted to microsoft.public.excel.programming
Brandon[_2_] Brandon[_2_] is offline
external usenet poster
 
Posts: 8
Default Change formating in other sheet cell based on match condition

For some reason the Worksheets object call isn't working. When I manually
type it, the tooltip popup appears showing me the syntax, but it doesn't
appear to have any attributes, i.e. Range(...) when I've typed
Worksheets("Sheet1")

There clearly is a MS Excel Object called Sheet1 in the VB editor IDE... Argh.

I tried, but none seem to work:

Worksheets("Sheet1")
Worksheets(Sheet1)
Worksheets(1)


"Patrick Molloy" wrote:
you can copy/pastespecial formats
thsi example copies the format from a range on sheet1 and format the same
size area to two other sheets...

Worksheets("sheet1").Range("B4:K17").Copy
Worksheets("Sheet2").Range("X1").PasteSpecial xlPasteFormats
Worksheets("Sheet3").Range("X1").PasteSpecial xlPasteFormats
Application.CutCopyMode = false