Új hozzászólás Aktív témák

  • Taybore

    aktív tag

    Sziasztok!

    Nekem egy olyan problémám van, hogy írtam egy macrot még Excel 2003-ban, ami egyszerűen egy képet szúrt be. Ha ezt elküldtem e-mailben, akkor a fogadó fél is látta a képet, ergo a macro "beágyazta" a képet az xls-be. Ugyanez a macro viszont erre nem hajlandó Excel 2010-ben, ugyanis én látom, hogy milyen képet rakott bele, de nem ágyazza be, és másik számítógépen megnyitva csak egy üres keret jelenik meg piros X-el, és a fájlméret se módosul számottevően. Kb olyan, mintha csak hivatkozna egy külső fájlra, ami ha nincs meg, nem jeleníti meg. Nekem az kéne, hogy ágyazza bele a képet az xls-be, ahogy a 2003-as Excel tette.
    A kód eléggé egyszerű:
    Set fs = CreateObject("Scripting.FileSystemObject")
    If fs.fileexists("c:\Pic\xy.jpg") Then
    ActiveSheet.Pictures.Insert("c:\Pic\xy.jpg").Select
    Selection.ShapeRange.LockAspectRatio = msoTrue
    Selection.ShapeRange.Height = 59.25
    Selection.ShapeRange.Width = 59.25
    End If

    Mi lehet e megoldás? Valami Excel biztonsági beállítás vagy ilyesmi? Lehet, hogy nem a macroval van a baj, hanem az Excel beállítással? Mit nézzek meg, hol keressem?

    Köszi: Norbi

Új hozzászólás Aktív témák

Hirdetés