Excel-VBA Help

[c_m]

Hello,

I have a excel file where I have a flowchart. I am trying to link each box in flowchart to a picture that happens to be in the same directory as the excel file.
All I want to do is when I click on the textbox, I want a particular bmp or jpeg to be inserted in the document.
I tried with macro recording and it worked. The concern is I am going to explain this flowchart to clients and all my data will be on flash drive.
So I have to get rid of the absolute path of the jpeg location and make it dependent on the directory or path where the excel file is located.
Any ideas how to do it?

Thanks

 

[dafan]

If your file is located in the same map, you can just use Open "filename"

For example, this will open Workbook1 if it is in the same map (else error)

Workbooks.Open "Workbook1"

You can adept this to insert pictures etc.

 

[c_m]

This is not working.
I tried

ActiveSheet.Pictures.Insert("cs.bmp").Select

(cs is the bitmap image in the same folder as the excel file)

I get
Run-time error '1004':
Unable to get the Insert Property of the Pictures class

However it works fine if I specify the absolute path of the picture

 

[dafan]

I'm not quite sure if this will work, it's something i just cam up with:

Can't you try to get the absolute, full path of the location, store this in a string and strip it to the last "\". You could then use

ActiveSheet.Pictures.Insert(path & "cs.bmp").Select

 

[c_m]

Thats a very good comment. I was thinking about the same.
The code that you werent sure of worked perfect.
So if I could just store the address of the folder where all my stuff is resting in and store it in string, I should be good to go.
Thankyou very much

 

[dafan]

Good luck, hope it works out for you!