如何引用inputbox的值

qq_42717019 2018-07-17 02:07:27
现有一列数据(AH),我希望用两个inputbox输入两个阈值,将某区间内的数据筛选出来反映在K列,例如大于05小于40的为"05-40"
先尝试得到区间的最小值
令a获得inputbox的输入值,将a与RC[24]比较
尝试过:
1. RC[24]>a
2.RC[24]>""a""
3.RC[24]>"a"
4.RC[24]>&a
5.RC[24]>""""&a



------------------------------------------------------------
Sub Macro7()

Dim a As String

a = InputBox("begin", "zyh")

Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove
Application.Goto Reference:="R6C11:R1200C11"
Selection.FormulaR1C1 = _
"=IF(RC[24]>a,"""",IF(RC[24]>""38"",""40-65"",IF(RC[24]>""05"",""06-38"","""")))"
End Sub
...全文
294 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
qq_42717019 2018-07-18
  • 打赏
  • 举报
回复
5555 excel可太难了
舉杯邀明月 2018-07-17
  • 打赏
  • 举报
回复
引用 1 楼 SupermanKing 的回复:
:= 怎么看上去像 Delphi 的赋值语句

那叫“命名参数”。
现在还是人类 2018-07-17
  • 打赏
  • 举报
回复
:= 怎么看上去像 Delphi 的赋值语句

1,216

社区成员

发帖
与我相关
我的任务
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
  • 数据库(包含打印,安装,报表)社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧