그래프를 그림으로 통합 문서로 복사

"내"통합 문서의 데이터를 가져 와서 "wbnew"통합 문서의 값만 (V)으로 복사 할 수 있습니다. 이렇게하면 행의 수식이 중요하지 않게됩니다. 그래프 (U)에 대한 그림 붙여 넣기 옵션도 있습니다. 아래에서는 어떻게 가치가있는 것만을 쉽게 할 수 있는지 보여주었습니다. 내 그래프 시트에 대해서만 사진을 찍으려면 어떻게해야합니까?그래프를 그림으로 통합 문서로 복사

Main.Worksheets("Histogram data").Copy Before:=wbnew.Sheets(1) 
With wbnew.Sheets(1).UsedRange 
    .Value = .Value 'converts formulas to values 
End With

Main.Worksheets("Histogram graphs").Copy Before:=wbnew.Sheets(1) 
With wbnew.Sheets(1).UsedRange 
    .Pictures = .Pictures 'converts graphs to pictures 
End With

출처

2017-09-07 Amasian21

MSDN에 따르면 following method을 사용하여 선택한 개체를 클립 보드에 그림으로 복사 할 수 있습니다.

다음 코드는 귀하의 경우에 작동합니다 :

Sheet1.ChartObjects(1).Chart.CopyPicture 
Sheet2.Paste

감사를 의 teasel

출처

2017-09-07 12:33:23 Teasel

Sheets("Sheet1").ChartObjects("Chartname").Activate 
ActiveChart.ChartArea.Select 
ActiveChart.ChartArea.Copy 

Range("A1").Select 
Sheets("Sheet1").Pictures.Paste.Select

출처

2017-09-07 12:50:11

이 즉각적인 도움을 제공 할 수도 있습니다 코드, 주셔서 감사합니다. 적절한 해결책은 이것이 왜이 문제에 대한 좋은 해결책인지를 보여줌으로써 교육의 가치를 크게 향상시킬 것이며, 비슷한 미래의 독자들에게 더 유용하게 활용할 수있게 될 것입니다 (https://meta.stackexchange.com/q/114762) 그러나 동일하지는 않습니다. 설명을 추가하여 답을 편집하고 어떤 제한 및 가정이 적용되는지 표시하십시오. – GrumpyCrouton

그래프를 그림으로 통합 문서로 복사

답변

관련 문제