A Microsoft Office (Excel, Word) forum. OfficeFrustration

If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below.

Go Back   Home » OfficeFrustration forum » Microsoft Excel » Setting up and Configuration
Site Map Home Register Authors List Search Today's Posts Mark Forums Read  

Export custom Macro Button Images



 
 
Thread Tools Display Modes
  #1  
Old November 25th, 2006, 09:17 PM posted to microsoft.public.excel.setup
RWN
external usenet poster
 
Posts: 11
Default Export custom Macro Button Images

Home - xl2kPro, Work-xl'03
I routinely create macro's for various functions (Personal.xls) and export them to/from
work - no problems there

I also create custom button images and would like to export them as well.
Is there a way to do this or are they "hidden away" within the Button bar file?

--
Regards;
Rob
------------------------------------------------------------------------


  #2  
Old November 26th, 2006, 11:52 AM posted to microsoft.public.excel.setup
Gary''s Student
external usenet poster
 
Posts: 7,584
Default Export custom Macro Button Images

This code (adapted from the Recorder) runs in a workbook called nurdel.xls
and assumes that N11 is free (you can use any cell). A button has already
been created with an image on it. The code:

1. copies the button and pastes the image onto the worksheet
2. saves the file as html
3. saves the file as xls

The html save produces a folder called nurdel_files. In the folder is a jpg
file containing the picture that originally appeared in the button.

Sub snap_it()
ActiveSheet.Shapes("CommandButton1").Select
Selection.Copy
Range("N11").Select
With ActiveSheet
..PasteSpecial Format:="Picture (JPEG)", Link:=False, DisplayAsIcon:=False
End With

ActiveWorkbook.SaveAs Filename:= _
"C:\Documents and Settings\Owner\Desktop\nurdel.htm", FileFormat:=xlHtml, _
ReadOnlyRecommended:=False, CreateBackup:=False
ActiveWorkbook.SaveAs Filename:= _
"C:\Documents and Settings\Owner\Desktop\nurdel.xls",
FileFormat:=xlNormal, _
Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False
End Sub
--
Gary's Student


"RWN" wrote:

Home - xl2kPro, Work-xl'03
I routinely create macro's for various functions (Personal.xls) and export them to/from
work - no problems there

I also create custom button images and would like to export them as well.
Is there a way to do this or are they "hidden away" within the Button bar file?

--
Regards;
Rob
------------------------------------------------------------------------



 




Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is Off
HTML code is Off
Forum Jump


All times are GMT +1. The time now is 08:07 PM.


Powered by vBulletin® Version 3.6.4
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 OfficeFrustration.
The comments are property of their posters.