excel-字符串转换为算术表达式怎么做？各位帮忙啊

在单元格A1输完了一个表达式，比如25*4，点到B1就得到这个表达式的值100，如果B1里写“=A1”的话得到的还是25*4，我想大概是要把字符串25*4转换为算术表达式，有什么函数可以实现的，或者如果要写宏的话应该怎么写？ 问题点数：100、回复次数：8Top

1 楼liulinhai（刘林海）回复于 2002-10-23 15:19:27 得分 90

Private   Sub   Worksheet_SelectionChange(ByVal   Target   As   Excel.Range)  
        Cells(1,   2).FormulaR1C1   =   "="   &   Cells(1,   1)  
   
  End   SubTop

2 楼icedancing（小鬼）回复于 2002-10-23 17:09:55 得分 0

比方说我输了60行，要用上面的方法计算，怎么样得到这个行数60？？Top

3 楼icedancing（小鬼）回复于 2002-10-23 17:39:12 得分 0

还有，怎么触发这个宏，比如我在A1写了表达式，光标点到B1的时候想得到计算的值，该怎么写Top

4 楼maoqingfeng（千里孤坟）回复于 2002-10-23 17:50:05 得分 10

A1=25*4Top

5 楼icedancing（小鬼）回复于 2002-10-24 09:17:16 得分 0

Cells(1,   2).FormulaR1C1   =   "="   &   Cells(1,   1)用这个可以得到值了，但是怎么触发这个宏，比如我在A1写了表达式，光标点到B1的时候想得到计算的值，该怎么写Top

6 楼icedancing（小鬼）回复于 2002-10-24 09:18:30 得分 0

Cells(1,   2).FormulaR1C1   =   "="   &   Cells(1,   1)用这个可以得到值了，但是怎么触发这个宏，比如我在A1写了表达式，光标点到B1的时候想得到计算的值（这里用到这个宏），该怎么写Top

7 楼icedancing（小鬼）回复于 2002-10-24 09:18:40 得分 0

Cells(1,   2).FormulaR1C1   =   "="   &   Cells(1,   1)用这个可以得到值了，但是怎么触发这个宏，比如我在A1写了表达式，光标点到B1的时候想得到计算的值（这里用到这个宏），该怎么写Top

8 楼liulinhai（刘林海）回复于 2002-10-25 12:28:07 得分 0

Excel自动触发，只要在Worksheet_SelectionChange事件中写程序即可。  
  如果想多行计算，可以循环一下。  
  Private   Sub   Worksheet_SelectionChange(ByVal   Target   As   Excel.Range)  
  Dim   i   As   Integer  
  For   i=1   to   Activesheet.UsedRange.Rows.Count  
        Cells(i,   2).FormulaR1C1   =   "="   &   Cells(i,   1)  
  next   i  
  End   Sub  
   
   
  Top

相关问题

• excel
• formular1c
• 表达式
• 触发
• 宏
• selectionchange
• cells
• 光标点到b1的时候
• 比如
• 得到

• 帖主：icedancing
• liulinhai
• maoqingfeng

• Visual Basic类图书
• Visual Basic类源码下载