Forum Discussion

marhen's avatar
marhen
Copper Contributor
May 07, 2020

Problem using embeded pictures in Excel 2016

Hi,  when I am using in Excel Embeded pictures there is a bug which i didn't understand, sometimes everything works fine and sometimes the embeded pictures have a wrong zoom.    In this picture  y...
excel
JKPieterse's avatar
JKPieterse
Silver Contributor
May 07, 2020
Is any VBA code involved in the file?
marhen's avatar
marhen
Copper Contributor
May 08, 2020

Hi Jan,

yes, i am using a small code to copy an Image to the sheet onklick

 

Sub EskalationLinks()
'
' EskalationLinks Makro
    Dim sheetName As String
    Dim Pfeilname As String
    
    DimPfeilname = "TcardOrange"
    
    
    sheetName = Application.ActiveSheet.Name
    Sheets("Pfeile").Select
    ActiveSheet.Shapes.Range(Array(DimPfeilname)).Select
    Selection.Copy
    Sheets(sheetName).Select
    Range("A1").Select
    ActiveSheet.Paste
End Sub

 

JKPieterse 

Resources