vba编程中,要得到[15,75]上的随机整数可以用表达式-搜答案-搜搜做题作业网

Subtest()DimiAsInteger'声明i是整数变量Fori=1To10'循环1到10Cells(i,1)=i'赋值NextEndSu

doloop就是一直循环dox=x+1loop那么就是个死循环一直循环所以要用while设置个条件当满足条件才循环DOWHILEX

Subaa()Fori=1To100IfiMod30andiMod70AndiMod20Thenn=n+iNextMsgBoxnEndSu

LOG10是工作表函数,在VBA中要使用工作表函数,必须通过WorksheetFunction对象：Cells(3,k+2).Value=Cells(6,19)*Power((Cells(3,k)+2

你这个题还有别的意思吗?楼上答得很好.但是我觉得不应该意思这么简单吧.再问：我只是举的简单例子，A1可能由很多数据计算得到，我无法改变A1的数据及公式，我需要得到假设A1的任何一项参数改变时，C1的值

都要得到

给你题目内容自己想1.快乐的一天2.难忘的眼神3.特别的晚餐4.传递中,递传着5.友谊至深6.等待上车7.把握现在8.雨天9.奶奶的称赞10.成长的足迹11.化茧成蝶12.明天因我而精彩13.回归自然

单元格第一行第bb列

（6+9+1）*7*4+3=451（9-3+1）*6*4+7=175

G=0H=0J=1fori=1to20fort=1to7ifi/3=tthentext1,text=text1&","&iG=G+1H=H+iJ=J*iendifnextnexttext2.text=

x="R100"[d1]="=SUMPRODUCT((明细!R2C1:"&x&"C1=RC1)*(明细!R2C19:"&x&"C19=R1C)*(明细!R2C3:"&x&"C3))"再问：SubMK6

cos第一个字母大写

Rnd产生一个[0,1]区间的随机小数0

Subtest()DimNumAsLong,Arr(1To5)Forn=1ToUBound(Arr)Num=Application.InputBox("请输入第:"&n&"个数字:","数字输入窗口"

Sub Rndnum()dim n as integerdim t as rangeset t =

第2次循环,i=1,j=-3,n=2第3次循环,i=1,j=-2,n=3第4次循环,i=1,j=--1,n=4第5次循环,i=2,j=-4,n=5...共循环3x4=12次,所有n=12-------

C其实相当于：2+（9*7）Mod（17\(15/5)）=2+63Mod（17\3）=2+63\5=2+3=5

这个表示方法的参数的赋值号,就跟变量或对象变量的＝号一样i=1seta=worksheets(1)中的＝号跟你那个一样,一个表示变量的赋值号,一个表示参数的赋值号

PublicSubsuiji()Range("A5")=Int(Rnd()*60+15)EndSubrnd()函数得到0到1的随机数,所以,当rnd()*60后就得到0到60的随机数在加上15就得到1

一般是对的.但对于超导材料来说可以没有电源.

Amodb即A除以B取余