首先把Visual Basic和 控件工具箱调出来,再在表格上加一个按钮,双击,输入如下代码:
for i=1 to 200 ' 从1行到200行
if cells(i,1)="方便面" then '这一句是说如果单元格1行1列中是商品方便面 什么商品可以自己写,在哪一列可以自己写,我这里假设是1列
cells(i,2)=105 '那么单元格1行2列中的价格修改为105,我这里假设价格在第2列.
end if
next
保存后关闭代码编辑窗口,回到表格,退出设计模式,点击这个按钮运行.我要大量修改数据都是这样的.这是简单的代码,字VBA就知道了
for i=1 to 200 ' 从1行到200行
if cells(i,1)="方便面" then '这一句是说如果单元格1行1列中是商品方便面 什么商品可以自己写,在哪一列可以自己写,我这里假设是1列
cells(i,2)=105 '那么单元格1行2列中的价格修改为105,我这里假设价格在第2列.
end if
next
保存后关闭代码编辑窗口,回到表格,退出设计模式,点击这个按钮运行.我要大量修改数据都是这样的.这是简单的代码,字VBA就知道了
温馨提示：内容为网友见解，仅供参考
第1个回答 2010-05-15
把价格相同的排在一起，比如a1到a10相同，在a2输入=a1，然后下拉到a10，这样只要改a1其他几个就全变了
第2个回答 2010-05-15
我看没有什么好方法,不过用以下方法,你可以试试:
设A列为商品名称,B列为价格,新增一辅助列(设插入一列C,用完再删除),在C1输入如下公式:
=IF(A1=某商品,105,B1)
然后下拉复制到最后.就把商品价格修改完了.然后,选中C列,点复制,再选中B列,右键--选择性粘贴,选数值.这样就把C列修改了商品价格的复制到了原先价格列里了.最后,选中C列,删除这列新插入的新增列.还原了表格.
设A列为商品名称,B列为价格,新增一辅助列(设插入一列C,用完再删除),在C1输入如下公式:
=IF(A1=某商品,105,B1)
然后下拉复制到最后.就把商品价格修改完了.然后,选中C列,点复制,再选中B列,右键--选择性粘贴,选数值.这样就把C列修改了商品价格的复制到了原先价格列里了.最后,选中C列,删除这列新插入的新增列.还原了表格.
第3个回答 2010-05-15
要是需要变成了样的数值的话就改变一个，然后选中按住ALT往下拽了
第4个回答 2010-05-15
编辑---查找----替换
把100替换为105
把100替换为105
相似回答
