Path: csiph.com!x330-a1.tempe.blueboxinc.net!usenet.pasdenom.info!aioe.org!eternal-september.org!feeder.eternal-september.org!.POSTED!not-for-mail From: GS Newsgroups: comp.lang.basic.visual.misc Subject: Re: VB6 to Excel Date: Sun, 24 Apr 2011 14:58:56 -0400 Organization: A noiseless patient Spider Lines: 19 Message-ID: References: Mime-Version: 1.0 Content-Type: text/plain; charset="iso-8859-15"; format=flowed Content-Transfer-Encoding: 8bit Injection-Date: Sun, 24 Apr 2011 18:55:55 +0000 (UTC) Injection-Info: mx01.eternal-september.org; posting-host="UVJBuiIZprDyxzUkJsiwfw"; logging-data="8727"; mail-complaints-to="abuse@eternal-september.org"; posting-account="U2FsdGVkX1+oHMZ3P3vO71plInCdpicY" X-Antivirus-Status: Clean X-Newsreader: MesNews/1.08.03.00-gb X-Antivirus: avast! (VPS 110424-0, 04/24/2011), Outbound message Cancel-Lock: sha1:nDsXSSkE8qNviC9mX+M4NIen2ek= X-ICQ: 543516788 Xref: x330-a1.tempe.blueboxinc.net comp.lang.basic.visual.misc:104 > .Select - That's the bit I was missing. Got it now Thanks to a handy tip from Steve Rindsberg I've been able to remove the need to select the button as was coded using the macro recorder. This also serves as an example of what I meant by 'cleanup' to code generated by the macro recorder. Revised code follows: With xlSheet.Shapes.AddFormControl(xlButtonControl, 100, 100, 100, 100) .OLEFormat.Object.Caption = "ButtonCaption" .OnAction = "MacroName" End With -- Garry Free usenet access at http://www.eternal-september.org ClassicVB Users Regroup! comp.lang.basic.visual.misc