次の方法で共有

Chart.MouseUp Event

  • Reference

Definition

Namespace:
Microsoft.Office.Tools.Excel
Assembly:
Microsoft.Office.Tools.Excel.dll

Occurs when a mouse button is released when the pointer is over the Chart control.

public:
 event Microsoft::Office::Interop::Excel::ChartEvents_MouseUpEventHandler ^ MouseUp;
event Microsoft.Office.Interop.Excel.ChartEvents_MouseUpEventHandler MouseUp;
member this.MouseUp : Microsoft.Office.Interop.Excel.ChartEvents_MouseUpEventHandler 
Event MouseUp As ChartEvents_MouseUpEventHandler

Event Type

ChartEvents_MouseUpEventHandler

Examples

The following code example creates a Chart with a handler for the MouseUp event that displays a message in cell D14 when the mouse button is released while the pointer is over the chart. The example also uses the x and y parameters of the event handler to display the coordinates of the mouse pointer.

private void DisplayMouseUp()
{
    this.Range["A1", "A5"].Value2 = 22;
    this.Range["B1", "B5"].Value2 = 55;

    Microsoft.Office.Tools.Excel.Chart chart1 =
        this.Controls.AddChart(this.Range["D2", "H12"], "chart1");
    chart1.SetSourceData(this.Range["A1", "B5"], 
        Excel.XlRowCol.xlColumns);
    chart1.ChartType = Excel.XlChartType.xl3DColumn;

    chart1.MouseUp +=
        new Excel.ChartEvents_MouseUpEventHandler(chart1_MouseUp);
}

void chart1_MouseUp(int Button, int Shift, int x, int y)
{
    this.Range["D14"].Value2 = "The mouse was released" +
        " on the chart at coordinates " + x.ToString() + ", " + 
        y.ToString();
}

WithEvents MouseUpChart As Microsoft.Office.Tools.Excel.Chart

Private Sub DisplayMouseUp()
    Me.Range("A1", "A5").Value2 = 22
    Me.Range("B1", "B5").Value2 = 55

    MouseUpChart = Me.Controls.AddChart(Me.Range("D2", "H12"), _
        "MouseUpChart")
    MouseUpChart.SetSourceData(Me.Range("A1", "B5"), _
        Excel.XlRowCol.xlColumns)
    MouseUpChart.ChartType = Excel.XlChartType.xl3DColumn
End Sub

Sub MouseUpChart_MouseUp(ByVal Button As Integer, _
    ByVal Shift As Integer, ByVal x As Integer, _
    ByVal y As Integer) Handles MouseUpChart.MouseUp

    Me.Range("D14").Value2 = "The mouse was released on" & _
        " the chart at coordinates " & x.ToString() & ", " & _
        y.ToString()
End Sub

Applies to