如何添加“select数据源”到我的Excel应用程序?

我需要将“select数据源”对话框添加到我的应用程序中,以便用户可以在Excel中手动select一个或多个范围,并将范围粘贴到我的文本框中。 这个function在Excel中无处不在(最显着的是为图表select一个范围)。 我怎样才能轻松做到这一点?

你有没有尝试过使用refedit控件?

如何使用用户窗体RefEdit控件

Dim myRange As Range On Error Resume Next Set myRange = Application.InputBox(prompt:="Select the cells you want", Type:=8) On Error GoTo 0 If myRange Is Nothing Then MsgBox "User cancelled" Else MsgBox "User selected " & myRange.Address End If 

这将显示一个input对话框。 不要input任何东西,而是用鼠标select单元格,他们的地址将出现在对话框文本框中。 当你按OK,它们应该被分配给variablesmyRange。

注意:InputBox行末尾的“Type:= 8”告诉VBA它必须是一个单元格范围如果用户取消,On Error位将防止错误

我们发现这看起来可能是完美的(.NET兼容):

如何编码.NET的REFEDIT控件