Posted to microsoft.public.excel.programming

external usenet poster

Posts: 2

Copy Cell Formatting to activecell with VBA

Hi,
I wrote the below code to copy formatting of the selected cell to
current cell. But its not working. Kindly let me know whats the fault
with the code

Public Function CopyFormat(myrng As Range)
If myrng.Interior.ColorIndex = xlNone Then
Exit Function
Else
ActiveCell.Interior.ColorIndex = myrng.Interior.ColorIndex
ActiveCell.Interior.Pattern = myrng.Interior.Pattern
End Function

Regards,
Upendra

Reply With Quote

Thread Tools	Search this Thread
Show Printable Version	Search this Thread: Advanced Search
Display Modes
Switch to Linear Mode Switch to Hybrid Mode Threaded Mode

Posting Rules
Smilies are On [IMG] code is On HTML code is Off Trackbacks are On Pingbacks are On Refbacks are On

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Activecell range copy	Allan	Excel Programming	3	October 28th 07 01:28 AM
Copy File from activecell	FIRSTROUNDKO via OfficeKB.com	Excel Discussion (Misc queries)	1	December 13th 06 09:21 PM
Copy content of ActiveCell in a variable	Ulrik loves horses	Excel Programming	2	October 8th 06 11:05 PM
Copy format of row above my activecell	al007	Excel Programming	4	December 9th 05 09:58 PM
ActiveCell.Copy Range("R3C27")	Stuart Grant	New Users to Excel	2	September 30th 05 09:00 AM

All times are GMT +1. The time now is 09:04 AM.

About Us

"It's about Microsoft Excel"

Menu

About Us