网页资讯视频图片知道文库贴吧地图采购
进入贴吧全吧搜索
excel吧 关注：280,523贴子：1,540,044
  • 3回复贴，共1页

【大神请进来】求大神指教！如何自动列出以下结果

例：12.5X+5Y=A, A＜700
要求出X、Y的所有整数组合，以及对应的A值
在线等，请指教


目前我只能想到这种方法


vba解决
清空A B两列
Sub 找XY()
For x = 1 To 56
For y = 1 To 140
If 12.5 * x + 5 * y < 700 Then
[a102400].End(xlUp).Offset(1, 0) = x
[b102400].End(xlUp).Offset(1, 0) = y
End If
Next
Next
End Sub


用规划求解工具。文件-选项-加载项-规划求解-转到。然后在数据选项卡中选择规划求解去做


扫二维码下载贴吧客户端

下载贴吧APP
看高清直播、视频！
  • 3回复贴，共1页
分享到: