I have written a visual basic module to insert pictures from a list
contained in a worksheet. I have figured out how to delete the picture
when I load the next picture. For this I need to know the picture
number.

My problem is the indexing or the picture number. The number of shapes
ActiveSheet.Shapes.Count doesn't change But the picture number does
increment. I am using workaround by updating the picture number in a
cell on the active sheet BUT this is a kluge! More importantly, I will
be using this to display a large number of images [1000s 100000s]. I
don't know wheter there is an upper limit, but it would be cleaner if
the pic number always reset.

I am using Excel 2004 for the MAC [OSX]

Thanks

Brujolito

Brujolito, if you want to delete ALL the pictures you could try this

ActiveSheet.Pictures.Delete

this works for a PC not sure if it will work with Mac version

--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003

wrote in message
oups.com...
I have written a visual basic module to insert pictures from a list
contained in a worksheet. I have figured out how to delete the picture
when I load the next picture. For this I need to know the picture
number.

My problem is the indexing or the picture number. The number of shapes
ActiveSheet.Shapes.Count doesn't change But the picture number does
increment. I am using workaround by updating the picture number in a
cell on the active sheet BUT this is a kluge! More importantly, I will
be using this to display a large number of images [1000s 100000s]. I
don't know wheter there is an upper limit, but it would be cleaner if
the pic number always reset.

I am using Excel 2004 for the MAC [OSX]

Thanks

Brujolito

Thanks Paul:

Tried it. Works sorta...., the next picture loads, when selected the
object identification id: 'Picture 626, 627' etc even though there is
only one picture on the sheet. This does help in that I no longer need
the cell on the sheet to keep track of the picture for the purpose of
deleting it. If I create a drawing shape such as an autoshape it is
'autoshape 629'. I guess that it works but it will get cumbersome down
the road.

Thanks. It is at least good to know that one operation that works on
the PC works on the Mac

Brijolito
Paul B wrote:
Brujolito, if you want to delete ALL the pictures you could try this

ActiveSheet.Pictures.Delete

this works for a PC not sure if it will work with Mac version

--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003

wrote in message
oups.com...
I have written a visual basic module to insert pictures from a list
contained in a worksheet. I have figured out how to delete the picture
when I load the next picture. For this I need to know the picture
number.

My problem is the indexing or the picture number. The number of shapes
ActiveSheet.Shapes.Count doesn't change But the picture number does
increment. I am using workaround by updating the picture number in a
cell on the active sheet BUT this is a kluge! More importantly, I will
be using this to display a large number of images [1000s 100000s]. I
don't know wheter there is an upper limit, but it would be cleaner if
the pic number always reset.

I am using Excel 2004 for the MAC [OSX]

Thanks

Brujolito

Hi Brijolito

See this page also
http://www.rondebruin.nl/controlsobjectsworksheet.htm


--
Regards Ron de Bruin
http://www.rondebruin.nl



wrote in message ups.com...
Thanks Paul:

Tried it. Works sorta...., the next picture loads, when selected the
object identification id: 'Picture 626, 627' etc even though there is
only one picture on the sheet. This does help in that I no longer need
the cell on the sheet to keep track of the picture for the purpose of
deleting it. If I create a drawing shape such as an autoshape it is
'autoshape 629'. I guess that it works but it will get cumbersome down
the road.

Thanks. It is at least good to know that one operation that works on
the PC works on the Mac

Brijolito
Paul B wrote:
Brujolito, if you want to delete ALL the pictures you could try this

ActiveSheet.Pictures.Delete

this works for a PC not sure if it will work with Mac version

--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003

wrote in message
oups.com...
I have written a visual basic module to insert pictures from a list
contained in a worksheet. I have figured out how to delete the picture
when I load the next picture. For this I need to know the picture
number.

My problem is the indexing or the picture number. The number of shapes
ActiveSheet.Shapes.Count doesn't change But the picture number does
increment. I am using workaround by updating the picture number in a
cell on the active sheet BUT this is a kluge! More importantly, I will
be using this to display a large number of images [1000s 100000s]. I
don't know wheter there is an upper limit, but it would be cleaner if
the pic number always reset.

I am using Excel 2004 for the MAC [OSX]

Thanks

Brujolito