Error Checking in Excel
Thanks Thanks:  0
Likes Likes:  0
Results 1 to 7 of 7

Thread: Picture name

  1. #1
    Board Regular
    Join Date
    Mar 2002
    Location
    Sydney/Brisbane , Australia
    Posts
    542
    Post Thanks / Like
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    Default

    how do i rename a picture inserted into excel.
    i.e. default name is "picture 1".

  2. #2
    Board Regular
    Join Date
    Mar 2002
    Location
    Cincinnati, Ohio, USA
    Posts
    6,824
    Post Thanks / Like
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    Default

    Hi
    Select your picture and rename it in the name box...
    The name box is the combobox directly above column A on a default sheet.
    Tom

  3. #3
    Board Regular
    Join Date
    Mar 2002
    Location
    Sydney/Brisbane , Australia
    Posts
    542
    Post Thanks / Like
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    Default


    Thanks for that.. but i am trying to do it in a macro so that i can then set the size properties of the shape.

    the problem is that each time i add a shape it gets a new number...
    currently i am doing a
    activesheet.pictures.insert
    but i cant work out how to give it a new name

  4. #4
    MrExcel MVP Ivan F Moala's Avatar
    Join Date
    Feb 2002
    Location
    Auckland, New Zealand
    Posts
    4,209
    Post Thanks / Like
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    Default

    On 2002-04-25 19:42, Qroozn wrote:

    Thanks for that.. but i am trying to do it in a macro so that i can then set the size properties of the shape.

    the problem is that each time i add a shape it gets a new number...
    currently i am doing a
    activesheet.pictures.insert
    but i cant work out how to give it a new name
    Would this help ?


    Sub Name()
    Dim Pict As Object

    '// Note Inserts Picture Object @ Activecell and names it
    Set Pict = ActiveSheet.Pictures.Insert("C:My DocumentsMy PicturesBALL01.PCX")
    Pict.Name = "mypicture1"

    End Sub


    Kind Regards,
    Ivan F Moala From the City of Sails

  5. #5
    Board Regular
    Join Date
    Mar 2002
    Location
    Sydney/Brisbane , Australia
    Posts
    542
    Post Thanks / Like
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    Default

    SOLUTION:

    pict = folder & Frame & ext

    Range("e6").Select
    ActiveSheet.Pictures.Insert(pict).Select
    Selection.Name = "picture 1"

    Thanx Ivan. but i think i stole this from one of your old postings

  6. #6
    Board Regular
    Join Date
    Apr 2002
    Location
    Cape Town,South Africa
    Posts
    234
    Post Thanks / Like
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    Default

    How's about renaming the picture totally in its name box ?


  7. #7
    MrExcel MVP Ivan F Moala's Avatar
    Join Date
    Feb 2002
    Location
    Auckland, New Zealand
    Posts
    4,209
    Post Thanks / Like
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    Default

    On 2002-04-25 22:31, gareth wrote:
    How's about renaming the picture totally in its name box ?

    I think TsTom already suggested that ?!
    Kind Regards,
    Ivan F Moala From the City of Sails

Some videos you may like

User Tag List

Like this thread? Share it with others

Like this thread? Share it with others

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •