cells(i,1).value=i
next i追问
我没有表达清楚...分别赋值ada,dfgdfd,dgdgd好了
追答将值放到一个数组中a()
a(1)="ada"
a(2)="dfgdfd"
a(3)="dgddfd"
for i=1 to 3
cells(i,1).value=a(i)
next i
用vba给Excel单元格赋值vba单元格数值格式赋值给变量
2、接着，在表格中输入简单的表格，比如水果表格。3、然后在VBA控件下拉菜单中，选择按钮控件。4、接着在表格中绘制出按钮控件，并修改控件名称。5、然后，鼠标左键单击【查看代码】按钮。6、接着，在代码窗口中输入给单元格的赋值语句。7、最后在设计窗口上，鼠标左键单击按钮，可以看到表格中的单元格...
如何用变量给excel单元格赋值
1、首先打开一个工作样表作为例子。2、使用alt+f11组合快捷键进入vbe编辑器，插入一个新的模块，并在模块中输入以下代码：Sub test2()Worksheets("Sheet1").Range("A1").Value = _Worksheets("Sheet1").Range("A5").ValueMsgBox "现在A1单元格中的值也为" & _Worksheets("Sheet1").Range("A5...
vba怎样把一个单元格中的值赋给另一个单元格
1、首先点击EXCEL打开EXCEL工作薄，工作簿的名称为“给单元格赋值.xls”。2、进入EXCEL界面后点击开发工具选项卡，点击上面的VIUAL BASIC按钮打开VBA编辑器。3、进入VBA编辑器后再代码输入窗口输入如下代码。Sub 给单元格赋值()Workbooks("给单元格赋值.xls").Worksheets("数据").Range("A1").Value = ...
vba数组怎么赋值?
1、首先选中Excel表格中要数组赋值的单元格内容。2、然后在该界面中，点击“插入”里“表单控件”里“按钮”选项。3、再者在该界面中，在表格中生成按钮控件，修改控件名称。4、其次在该界面中，点击“查看代码”选项。5、继续在VBA界面中，输入定义一维数组的语句。6、然后在VBA界面中，输入给单元格...
用vba给Excel单元格赋值
1.打开Excel 2010。2.点击开发工具-宏。3.命名-然后点击创建。4.复制以下语句。Sheet1.Name = "对sheet1表名赋值"。Sheet1.Range("a1")= "对sheet1的a1单元格赋值"。粘贴到下图光标处。5.了解语句含义，见图。6.了解语句含义，见图。7.改成自己需要赋的值，点击运行，然后返回excel表查看是否...
vba 单元格赋值
vba单元格赋值：sub 赋值1 [a1] = [b2].value end sub ---题外话 1、可以直接赋值，单元格 = 赋值内容 ，例如给A1,A2单元格赋值 sub 赋值 [a1] = "测试"[a2] = "99"end sub 2、用变量赋值，例如给A1,A2单元格赋值 sub 赋值 dim z ,k z = "测试"k = 99 [a1] = z [a2] =...
VBA 给EXCEL单元格赋值问题,高深!!!
打开你的Excel文件，按“Alt+F11”打开VBA编辑窗口，然后在左侧对应的Sheet上双击，右侧空白处粘贴下面的代码。关闭VBA窗口。然后按“Alt+F8”打开宏窗口，选择刚插入的宏，点击“执行”。Sub wj()Dim i, r As Longr = Cells(Rows.Count, "A").End(xlUp).RowFor i = 2 To r GetObject (...
excel vba如何引用单元格值?
excel中使用vba引用单元格值的方法，不会的朋友可以参考本文！步骤 1、首先我们打开一个工作样表作为例子。2、在工作表中引用单元格数值我们使用=加上单元格序列即可引用，如图中所示在c22单元格中输入=b13，则c22的单元格中的数据就是引用b13单元格的数据。3、与直接输入数据相比，这样的引用更能保证...
在excel表格中使用vba引用单元格区域
4、我们先来设置以下区域单元格的范围，这里myRange是在sheet1工作表中的a1到d5的矩形连续单元格范围。而rng是同样sheet1工作表中的e1到i5的矩形连续单元格。5、因为声明了range类型，所以我们这里直接可以对myRange变量进行赋值，使用=号直接赋值即可。由于我们赋值的是一个excel程序函数，所以要用双引号...
Excel VBA中,怎么给单元格赋值为复杂公式
Sub 给单元格输入公式()With Sheets("st1")R_zj = WorksheetFunction.Match("总计*", .[B:B], 0) '找到“总计”的行号 .Cells(R_zj, 13).Formula = "=SUMIF($C$7:$C$" & R_zj - 1 & ",""*合计*"",$M$7:$M$" & R_zj - 1 & ")" '填入总计公式 For i = 7 To...
