title: How to copy cell formatting and style
body: <p>Guys if I use the following code:  </p>
  
  <pre><code>dim Defaultcol As Long
  
  Defaultcol = Sheets("Whatever").Cells(1, 1).Interior.Color
  </code></pre>
  
  <p>I can get the color formatting from a cell.</p>
  
  <p>Could I also write something like</p>
  
  <pre><code>dim FullFormat as object (Or dim FullFormat as cellformat)
  
  set FullFormat =  Sheets("Whatever").Cells(1, 1).formats
  </code></pre>
  
  <p>and get all the formats of a cell in one object?</p>
  
  <p>or maybe </p>
  
  <pre><code>dim sourcecell as cell
  
  set sourcecell = Sheets("Whatever").Cells(1, 1)
  </code></pre>
  
  <p>and then have property <code>sourcecell.formats</code> that I could use?</p>
  
  <p>Thanks in advance.</p>