Excel怎么一点一个框,就弹出一个浏览框,并且把我选择的内容返回到这个框里?

ifilename = Application.GetOpenFilename
If ifilename = "False" Then
MsgBox "没有选择文件!"
Else
TextBox.1.Text = ifilename
End If
把上面这段代码加在你的文本框的MouseDown 事件中即可, 即在Excel 的设计模式下双击你那个textbox.1 然后在他的事件里面选MouseDown 然后把上面的代码写在这个事件里面即可实现你要的 完整的代码如下面类似:
Private Sub TextBox1_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
ifilename = Application.GetOpenFilename
If ifilename = "False" Then
MsgBox "没有选择文件!"
Else
TextBox21.Text = ifilename
End If
End Sub