excel几个数相加等于某个数_[求助]如何能计算出几个数字相加等于一个给定的数...

QUOTE:

以下是引用jiang041111在2007-2-6 19:54:13的发言：

已知一个数字和一组数字，比如说2、6、78、90、34、21、35……，113，如何能自动找出哪几个数字相加等于给定的那个113？

请各位高手指点！

Private Sub CommandButton1_Click()

Dim irow%, i%, i1%, i2%, i3%, a

Dim Xarr()

a = Timer

Application.ScreenUpdating = False

Range("C2:C65536").Select

Selection.ClearContents

i3 = 2

irow = [A65536].End(xlUp).Row

ReDim Preserve Xarr(1 To irow - 1)

For i = 1 To irow - 1

Xarr(i) = Cells(i + 1, 1)

Next i

For i1 = 2 To irow - 2

For i2 = i1 + 1 To irow - 1

If Cells(2, 2) = Cells(i1, 1) + Cells(i2, 1) Then

Cells(i3, 3) = Cells(i1, 1) & "+" & Cells(i2, 1) & "=" & Cells(2, 2)

i3 = i3 + 1

End If

Next i2

Next i1

Range("A1").Select

Application.ScreenUpdating = True

MsgBox "1.查找总用时 " & Format(Timer - a, "0.000") & "秒。" & Chr(13) & "2.daniel编写,不足之外请改进 ", 64, "统计用时提示"

End Sub

多位数相加的,可增加多个循环判断

excel几个数相加等于某个数_[求助]如何能计算出几个数字相加等于一个给定的数...相关推荐

给一个整数数组，找到两个数使得他们的和等于一个给定的数 target。
描述给一个整数数组,找到两个数使得他们的和等于一个给定的数 target. 你需要实现的函数twoSum需要返回这两个数的下标, 并且第一个下标小于第二个下标.注意这里下标的范围是 0 到 n-1. ...
程序实现：由给定几个数确定凸组合系数，组成一个给定的数
问题描述给定几个数xix_ixi确定凸组合系数λi\lambda_iλi,组成一个给定的数xxx. ∑λixi=x\sum \lambda_ix_i=x∑λixi=x s.t.∑λi=1s. ...
3600000毫秒等于多少小时_科学家解密！你知道月球上一天等于地球上多久吗？...
大家有没有想过在月球上呆一天,相当于在地球上是多少天呢?科学家通过一系列研究得出了惊奇的数字. 月球是太阳系中的第五大的卫星,也是地球唯一的天然卫星.月球的直径是地球的四分之一,质量是地球的八十分之一 ...
python余数不等于的符号_有乐这些符号如此重要，不知道就等于“白练琴”
除了音高.节奏,谱面上还有许多记号标识,很多琴童在演奏时,经常容易忽视它们.岂知同样的一段旋律,若记号不同,表现形式会有天大的差别.看完这组对比,我简直笑出了猪叫! 1 变音记号包括升号.降号.还原 ...
python爬取视频自动播放_求助该网站如何让它能自动播放下一个视频。。。醉了，要挂80个课时...
[Python] 纯文本查看复制代码#-*- coding:utf-8 -*- from selenium import webdriver import time import re " ...
java 读出数字声音_【求助】已经计算出的数字结果，想用声音播放出来。怎么弄！！！...
该楼层疑似违规已被系统折叠隐藏此楼查看此楼 public static void main(String[] args) throws IOException { String filePath=& ...
java 打印排序数字塔_求助，用循环方法输出以下数字塔
该楼层疑似违规已被系统折叠隐藏此楼查看此楼 package com.bift; import java.io.*; //杨辉三角 public class Test { public static ...
html 输入框相加,JS中，如何实现两个输入框中内容的数字相加？
事件 function count(){ var a=document.getElementById("txt1").value; var b=document.getElemen ...
两个经纬度偏角_怎么根据两个经纬度计算出航向
C/C++ codedouble CChartCtrl::CalcltDirct(float fStarPtx, float fStarPty, float fEndPtx, float fEndPt ...

excel几个数相加等于某个数_[求助]如何能计算出几个数字相加等于一个给定的数...

excel几个数相加等于某个数_[求助]如何能计算出几个数字相加等于一个给定的数...相关推荐

最新文章

热门文章