>

나는 두 개의 피벗 테이블과 각각에 대해 하나의 차트를 만들었습니다. 차트가 무엇이든 상관없이 항상 두 번째 차트를 보려면 마우스로 드래그해야합니다. 2를 어떻게 이동합니까? 표와 차트를 만드는 코드 부분을 첨부했습니다.

감사합니다

Set PTable = PCache.CreatePivotTable _
    (TableDestination:=graphe_dos.Cells(1, 1), TableName:="Test")
    graphe_dos.Cells(2, 1).Select
    ActiveWorkbook.ShowPivotTableFieldList = False
    ActiveSheet.Shapes.AddChart2(201, xlColumnClustered).Select
    '**********************************
    '          2nd Pivot Tables
    '**********************************
LastRow = graphe_dos.Cells(Rows.count, 1).End(xlUp).Row
 Set PTable2 = PCache2.CreatePivotTable _
    (TableDestination:=graphe_dos.Cells(LastRow + 5, 1), TableName:="Test2")
    'Sheets("Graphe DOS").Select
    graphe_dos.Cells(LastRow + 6, 1).Select
    ActiveWorkbook.ShowPivotTableFieldList = False
    ActiveSheet.Shapes.AddChart2(204, xlColumnClustered).Select


  • 답변 # 1

    모양/차트를 원하는 위치로 이동할 수 있습니다

    With ActiveSheet.Shapes("ShapeName")
        .Left = 3
        .Top = 2
    End With
    
    
    <시간>

    또는 심지어

    With ActiveSheet.Shapes.AddChart2(204, xlColumnClustered)
        .Left = 3
        .Top = 2
    End With
    
    

    작동해야합니다.

  • 이전 visual studio 2017 - 다른 테스트 프로젝트에서 VS2017으로 여러 C # 테스트 빌드를 실행하십시오
  • 다음 mysql - 왼쪽 조인을 사용할 때 고유 한 선택된 ID로 선택한 결과 제한