Excel写代码(excel 写代码)

excel怎么写个代码？

Sub Demo()

? Dim i As Long, j As Long, k As Long

? Dim Arr(1 To 50) As Long, T(1 To 10) As Long

? For i = 1 To 50

? ? ? Arr(i) = i

? Next

? For j = 1 To 10

? ? ? Call FY(Arr)

? ? ? For k = 1 To 10

? ? ? ? ? T(k) = Arr(k)

? ? ? Next k

? ? ? Range("a" j + 1 ":j" j + 1) = T

? Next

End Sub

Function FY(Arr)

? Dim i As Integer, k As Integer, T

? Dim L As Integer, U As Integer

? L = LBound(Arr)

? U = UBound(Arr)

? For i = U To L Step -1

? ? ? k = Application.RandBetween(L, i)

? ? ? T = Arr(k)

? ? ? Arr(k) = Arr(i)

? ? ? Arr(i) = T

? Next

? FY = Arr

End Function

帮我写一个EXCEL的代码，简单的

代码如下：

Private?Sub?Worksheet_Change(ByVal?Target?As?Range)

????If?Target.Row?=?6?And?Target.Column?=?10?Then

????????Cells(8,?8).Select

????End?If

End?Sub

代码不能放在模块中，需要放在工作表中。

怎么在EXCEL中使用代码？

excel中代码是通过vba编辑器编辑和运行的，以excel2007为例介绍操作步骤：

1、单击excel2007窗口左上角的“office

按钮”图标，在弹出的菜单中，单击“excel选项”按钮；

2、在“excel选项”对话框中,单击左侧“常用”分类，勾选“在功能区显示"开发工具"选项卡”项，单击“确定”按钮返回excel2007主窗口，即可添加开发工具选项卡；

3、单击“开发工具”菜单-“visual

basic”图标；

4、excel2007打开代码编辑器窗口，单击“插入”菜单-“模块”菜单项，即可插入默认的模块“模块1”，即可在右侧的vba代码编辑器窗口输入vba代码；

5、代码编辑完成后，点击工具栏运行按钮即可运行。

Excel代码怎么写？

如果k3的值只有这几个字，那么可以直接替换就行

=SUBSTITUTE(K3,"转账","收入")

如果不止这些字，那么要根据实际情况，用if+find嵌套或连接来实现。具体情况要看表里数据的具体数值格式。

怎样在excel中运行代码

第一步、首先，打开Excel表格程序，进入到Excel表格程序主界面中。

第二步、然后，在Excel表格主界面下方右键选中“sheet”，在右键菜单中选择“查看代码”，点击打开。

第三步、最后，即可在Excel表格程序中运行和编辑代码，问题解决。