LinkBack Thread Tools Search this Thread Display Modes
Prev Previous Post   Next Post Next
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 74
Default smart tags

I am working in Excel 2003 and have a workbook with multiple tabs. The
information on tab "REC" needs to be copied into tab "REC" I have build the
macro to do this by inserting a formula (from d16-d300):

=IF(REC!D16="","",REC!D16)

Everything works fine but when the macro is run the smart tags are in the
upper left hand corner of each cell. I can click on the icon and say ignor
error and they go away but I want it to do this automically. When I ignor the
error when recording the macro it doesn't recognize the action. Here is the
macro I am running:

Sub ECNINFO()
'
' ECNINFO Macro
' Macro recorded 11/25/2009 by tpeter
'

'
Range("D16").Select
ActiveCell.FormulaR1C1 = "=IF(REC!RC="""","""",REC!RC)"
Range("E16").Select
ActiveCell.FormulaR1C1 = "=IF(REC!RC="""","""",REC!RC)"
Range("G16").Select
ActiveCell.FormulaR1C1 = "=IF(REC!RC[-1]="""","""",REC!RC[-1])"
Range("H16").Select
ActiveCell.FormulaR1C1 = "=IF(REC!RC[-1]="""","""",REC!RC[-1])"
Range("G16:H16").Select
Selection.Copy
Range("G17:G300").Select
Selection.PasteSpecial Paste:=xlPasteFormulas, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False

Range("D16:E16").Select
Application.CutCopyMode = False
Selection.Copy
Range("D17:D300").Select
Selection.PasteSpecial Paste:=xlPasteFormulas, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False

Range("D16").Select
End Sub

Could someone please let me know what to insert into the macro to get rid of
this. Thank you very much for your help.

Tim Peter

 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

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
SMART TAGS MikeyJ Excel Discussion (Misc queries) 4 September 4th 08 08:15 PM
Smart Tags Cassie Excel Discussion (Misc queries) 0 August 20th 08 06:37 PM
smart tags scubagal Excel Discussion (Misc queries) 4 March 6th 06 09:42 AM
smart tags cindyl Excel Worksheet Functions 0 September 23rd 05 06:58 PM
smart tags Tom_in_Jersey Excel Discussion (Misc queries) 2 August 29th 05 09:56 PM


All times are GMT +1. The time now is 06:56 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"