clwn.net
当前位置:首页 >> VBA,inputBox返回的是单元格地址 >>

VBA,inputBox返回的是单元格地址

那就不能用inputbox了,用文本框就可以轻松实现

可以两次分别输入 行号与列号,确定单元格 irow = Application.inputbox("请输入行号") icol = Application.inputbox("请输入列号") 或者输入含有行号与列号的字额定单元格符串, 处理后 irc = Application.inputbox("请输入行号与列号")

Sub t() Range("A1") = InputBox("请输入数值", "WPS表格") End Sub

String 类型 在一对话框来中显示提示,等待用户输入正文或按下按钮,并返回包含文本框内容的 String。 如果用户单击 Cancel,则此函数返回一个长度为零的字符串 ("")。

a = InputBox("请输入内容:") If a = "" Then MsgBox "您没有输入任何信息,将会退出程序!" Exit Sub Else Range("A1:B2") = a End If

Dim s As StringSub test() s = InputBox("请输入:") MsgBox sEnd Sub

type参数选择8

Private Sub iCheckGs() '--------验证密码 Dim iPsw$, i&, tmp iPsw = " " '"300029" Do tmp = InputBox( _ "系统温馨提醒:" & Chr(10) & Chr(10) & _ "非专业用户请点击{取消}退出!" & Chr(10) & Chr(10) & _ "请输入密码(您还有 " & 3 -...

你是不是想达到这样的效果? Range("I2") = "=STDEV.P(H3:H" & i+3 & ")"

首先你变量值赋反了,其次inputbox输入的只是一个值,如果是要数组需要用到split分割,形如arr=Split(InputBox("输入发包方编码数组(以空格分格):", ""))

网站首页 | 网站地图
All rights reserved Powered by www.clwn.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com