vba编写一个程序a b c d e f g1 8 2 3 =randbetween(1,5)2 2 9 43 6 4

来源：学生作业帮编辑：神马作文网作业帮分类：综合作业时间：2024/11/18 13:00:39

vba编写一个程序
a b c d e f g
1 8 2 3 =randbetween(1,5)
2 2 9 4
3 6 4 5
4 7 5 6
5 1 6 4
在g1单元格里有一个公式,用于产生1——5之间的一个整数
假如随机数g1=3
能否将abc列第三行,第四行内容填充到def列第一行,第二行
【即d1,e1,f1分别是6,4,5；d2,e2,f2分别是7,5,6】
注：使用vba编写
先判断g1的值
假如g1=3,将abc列第三行,第四行内容填充到def列第一行,第二行
假如g1=4,将abc列第四行,第五行内容填充到def列第一行,第二行
假如g1=2,将abc列第二行,第三行内容填充到def列第一行,第二行

这个很简单
Sub Macro1()
'
' Macro1 Macro
Dim i As Integer, N As Integer
N = 1 + 5 * Rnd()
Cells(1, 7).Value = N
Range("A" & N & ":C" & N + 1).Select
Selection.Copy
Range("D1").Select
ActiveSheet.Paste
End Sub
再问：是呀没有g1我也会呀怎么以g1作为abc列第g1行以g1+1作为abc列第g1+1行

用汇编语言编写程序计算表达式：f=a*(b+c)/（d-e）.本人... a、c、d、e、f是六个有理数,关且b/a=2/9,c/b=3/8,d/c=4/7,e/d=5/6,f/e=6/5,则a (x+1)^5=ax^5+bx^4+cx^3+dX^2+ex+f,求a+b+c+d+e+f,b+c+d+e,a+c+e 已知有一个集合A={a,b,c,d,e,f}编写程序打印出A的所有非空子集用C语言解决已知有A,B,C,D,E,F,取值1,2,3,4,5,6；则S=|A-B|+|B-C|+|C-D|+|D-E|+|E-F 用等比性质解已知a/b=c/d=e/f=3,求2a+3c-4e/4b+6d-8f 已知a/b=c/d=e/f=4/5,求2a+3c-5e/4b+6d-10f的值已知a/b=c/d=e/f=3/4,求(2a+3c+5e)/(4b+6d+10f)的值设有一四位数abcd=(ab+cd)^2,编写一个程序,求a、b、c、d. 户外活动中,A、B、C、D、E、F、G、七人围成一个圆圈依次报数.A报1、B报2、C报3、D报4、E报5、F报6、G报7 C程序编写1*2*3*4*5*6 一：若a/b=c/d=e/f=2/5,求（1）（a-c)/(b-d) ; (2)(2a+3c-4e)/(2b+3d-4f