- eBay-es kütyük kis pénzért
- gban: Ingyen kellene, de tegnapra
- sziku69: Szólánc.
- Luck Dragon: Asszociációs játék. :)
- sziku69: Fűzzük össze a szavakat :)
- f(x)=exp(x): A laposföld elmebaj: Vissza a jövőbe!
- Mr Dini: Mindent a StreamSharkról!
- Brogyi: CTEK akkumulátor töltő és másolatai
- moha bácsi: VIII. Viharsarki Hobbi Elektronika Találkozó Békéscsaba 2025.06.14. szombat
- Magga: PLEX: multimédia az egész lakásban
Hirdetés
Talpon vagyunk, köszönjük a sok biztatást! Ha segíteni szeretnél, boldogan ajánljuk Előfizetéseinket!
Ú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 IfMi 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
- Új INTEL LAMINAR RM1 (LGA1700/1851) nullperces, rézmagos hűtők! GAR/SZÁMLA! A LEGOLCSÓBB SZÁMLÁS ÁR!
- AKCIÓ! DDR5 GAMER PC: Intel Core Ultra 7 265KF +RTX 3060Ti/3080/4060/4070 +16-64GB DDR5! GAR/SZÁMLA!
- iPhone 13 Pro MAX 128 GB Graphite - 4 hónap Apple Szervízgarancia - APCOM
- AKCIÓ! DDR5 GAMER PC: Intel Core Ultra 5 225F/245K +RTX 5050/5060/5070/Ti +16-64GB DDR5! GAR/SZÁMLA!
- OnePlus 12 5G 256GB 12GB RAM
- HIBÁTLAN iPhone 12 128GB Purple -1 ÉV GARANCIA - Kártyafüggetlen, MS3028
- Hp Prodesk 600 G3/ G5/ G6 SFF/ i5 8-9-10 gen / Elitedesk 800 G4 /Win11- Számla, garancia
- BESZÁMÍTÁS! ASRock Z370 i7 9700KF 16GB DDR4 512GB SSD RX 7600 XT 16GB ZALMAN I3 NEO ADATA 600W
- HP ZBook 15 G6 i7-9850H 32GB RAM 1000GB SSD NVIDIA Quadro T2000 15.6 FHD 1 év garancia
- Gamer Notebook! Csere-Beszámítás! Asus Tuf F15 FX506H / 11400H / RTX 3050 / 16GB DDR4 / 512 SSD
Állásajánlatok
Cég: FOTC
Város: Budapest