EXCEL VBA高手请进，如何让一段代码执行一遍？

1、

如图所示，我EXCEL里有一段代码是计算计算K列里面的计算式，结果返回到对应的B列，现在复制数据过来，我鼠标双击K列的计算式两下，B列就会有结果出来，一个一个的双击过去很累，有没有简便的办法啊？

举报该问题

第1个回答 2013-12-27

我猜原因如下：
你这个excel有VBA代码，是用worksheet_change事件写的。只要你把数据贴进k列，vba就帮你计算结果输出到B列。可是，由于你粘贴到K列的数据格式与该VBA不匹配。所以计算错误了。
当你双击k列单元格的时候，等于重新对单元格做一次输入，格式变化了，vba计算正常运行，所以能出正确结果。
要看到你的excel代码，还有粘贴的数据，才能进一步改正。发来油箱吧。chenjiawei50到163

第2个回答 2013-12-27

说的有点含糊，最好能把你的代码贴上来。如果你是想在B列中算出K列里的算式的话可以用以下代码（由于不知道你表的具体格式，所以代码可能需要根据你表的格式进行修改）

For i = 1 To [K65536].End(xlUp).Row
Cells(i, 2) = "=" & Cells(i, 11)
Next i

如有问题可继续追问

第3个回答 2013-12-27

你把B列拉宽一点就没事了追问

拉宽是#VALUE！

追答

#Value说明错误值，这说明你代码里有问题，没有进行错误处理，另外每一行都需要双击，这谁编的代码，自找麻烦呀，把代码发上来，我帮你看看，另我QQ：314088595，不明白的地方QQ里详谈

本回答被提问者采纳

第4个回答 2013-12-27

最好是把文件附上来

相似回答

excle问题 高手请进答：1、打开你的Excel表格，假如工作表的名字为“Sheet1”。2、右键点击左下角标签“Sheet1”，点击“查看代码(V)”。3、把下面一段代码拷贝到代码窗口。Sub guanlian()Dim i, j As Integer For i = 1 To 9 For j = 1 To 9 If Cells(i, 1) = Cells(j, 2) And Cells(i, 2) = Cell...

Excel中,如何用VBA来执行以下功能,高手请进,若能完美运行,我将增加100...答：首先是K列值变动就会拷贝上一行数据，当然ID号是递增的。K列一次粘贴多个数据也OK 之后客户名改变即改变C列改变时，这时会自动增加订单号。订单号格式可以任意，我用的是自动增加序列号，其他地方请手动更改。Private Sub worksheet_change(ByVal Target As Range)If Target.Column = 11 Then '如果K...

请教excel vba高手,如何按行循环一段代码直到某内容则停止答：sub test()for i=1 to 10for j=1 to range("A:A").offset(,i-1).end(3).rowif cells(j,i)="停止" thengoto 停止elseif cells(j,i)<>"" then'复制end ifnext jnext iexit sub停止:'停止代码段end sub

EXCEL2007 VBA代码高手请进,我的一段代码,不自动计算,怎么办?答：再增加一个事件代码即可，目的是有公式计算时运行代码，将所以D列有公式引用的都运行一次你的代码，增加的代码如下（详见附件）：Private Sub Worksheet_Calculate()Call Worksheet_Change(Columns("D").SpecialCells(xlCellTypeFormulas))End Sub

EXCEL VB 高手请进,有问题请教答：方法/步骤打开一个Excel文件，鼠标右击下面的工作表（如sheet1）。选择“查看代码”，就可以打开VBA编辑界面。选择如下图所示的下拉菜单，选择“worksheet”。选择如下图所示的下拉菜单，选择对应的触发模式。这里我们选择BeforeDoubleClick，意思就是说：在本工作表鼠标双击（之前），将触发下面的代码程序。...

excel vba如何用条件运行宏(高手请进)答：你希望用户点数值调节键，宏二就自动运行，是吗？使用worksheet_change事件，然后调用“宏二”就可以了。现在数值调节键不是宏来的,也可以用宏来控制——宏xx可以控制B1单元格的值宏xx可以调用宏二中的代码。这个宏xx就是你要的连续自动运行200次，也就是B1的数字连续变化200次，宏二也运行200次。

EXCEL VBA高手请进!答：直接用range range是代表你所选的区域可以用一列的首单元格开头比如 A1 就是代表第一列也可以用矩形框的左上和右下单元格表示比如 A1:E12 你最好自己先录制一个宏记录一下你选定的区域然后再去查看代码

excel VBA高手请进,关于让表格自动刷新的问题~答：可以用worksheet_change事件，把代码复制到你要操作的sheet，不是放在单独模块里面重点是要注意先屏蔽worksheet_change对宏内事件的相应你试试看，可以追问 Private Sub Worksheet_Change()Application.EnableEvents = False '屏蔽事件响应 '此处加入你的代码 Application.EnableEvents = True '恢复事件响应 E...

高分求助 excel高手请进答：1、打开“开发工具”选项卡，excel2007的操作如下：左上角office按钮=》excel选项=》常用=》在“在功能区显示“开发工具”选项卡”打钩。然后确定 2、进入VBA编辑界面：在excel窗口中，菜单=》开发工具=》visual basic 3、在VBA界面中按以下步骤贴代码：菜单=》插入=》模块（建议将模块放在personal.xlsb...

大家正在搜

让我来了一遍又一遍让所有一切重演一遍 VBA 表格的隐藏代码 VBA代码 accessVBA代码就让我再看你一遍让我再听一遍就让我再爱你一遍就让我多爱你一遍

excel vba 如何让代码执行多次

excel 宏能不能运行一遍就让他失效了。或者写一段代码让上...

excel vba实现一段代码对部分工作表执行？

精通EXCEL VBA编程的高手请进，求一段VBA代码，满足...

[VBA]怎样定义让一段完整的代码在多个工作表中运行？

Excel中，如何用VBA来执行以下功能，高手请进，若能完美...

EXCEL VBA中怎样用代码表示一段程序的运行的进度？

EXCEL高手请进，求VBA代码，解决难题~~~~