查看完整版本: 请问如下简单VBA功能，如何在永中实现？

请问如下简单VBA功能，如何在永中实现？

下面是EXCEL的VBA程序

Private Sub dx1y_Click()
dx1n.Enabled = False
dx1d.Enabled = True
Cells(10, 5) = "yes"
Range("e11").Select
Selection.ClearContents
End Sub

其中，dx1y，dx1n，dx1d都是普通的button控件。
Range("e11").Select
Selection.ClearContents
是把e11的内容清空。


谢谢。

我自己查到了答案。


dx1y.setEnabled(false);
dx1d.setEnabled(true);
ActiveWorksheet.select("e9");
ActiveCell.setValue("yes");
ActiveWorksheet.select("e11");
ActiveRange.clearContents();