123
返回列表 上一主題 發帖

給小朋友練習加法的問題

dondon1495

帖子
15 
主題
4 
精華
0 
積分
104 
點名
0  
作業系統
XP 
軟體版本
2003 
閱讀權限
20 
註冊時間
2010-7-16 
最後登錄
2020-12-23 
7# 跳轉到 »
發表於 2012-3-5 23:20 | 只看該作者
回復 2# register313

謝謝 register313 大大

請問我如果有加法與減法2個工作表
VBA要怎麼設定呢
以前沒用過VBA
那個出題案扭還不知道怎麼做出來

TOP

Hsieh

帖子
4901 
主題
44 
精華
24 
積分
4916 
點名
142  
作業系統
Windows 7 
軟體版本
Office 20xx 
閱讀權限
150 
性別
男 
來自
台北 
註冊時間
2010-4-30 
最後登錄
2026-7-16 

2025年全勤獎章2024年全勤獎章2023年全勤獎章2022虎年全勤獎章2021牛年全勤獎章2020鼠年全勤獎章2019 豬年全勤獎章2018 狗年全勤獎章2017 雞年全勤獎章2016猴年全勤獎章2015羊年全勤獎章2014馬年全勤獎章2013蛇年全勤獎章2012龍年全勤獎章論壇貢獻勳章熱心公益勳章2011兔年全勤獎章
6#
發表於 2012-3-5 23:14 | 只看該作者
本帖最後由 Hsieh 於 2012-3-5 23:17 編輯

回復 5# dondon1495

題目已是亂數
答案輸入後就不會再變動
刪除答案後就重新出題
play.gif
學海無涯_不恥下問

TOP

dondon1495

帖子
15 
主題
4 
精華
0 
積分
104 
點名
0  
作業系統
XP 
軟體版本
2003 
閱讀權限
20 
註冊時間
2010-7-16 
最後登錄
2020-12-23 
5#
發表於 2012-3-5 23:09 | 只看該作者
回復 4# Hsieh

謝謝 Hsieh 大大
不用寫東西這是我希望的
遇到一個問題
我把答案區 Delete 掉之後
前面也全亂了
另外就是我就不知道怎麼再出題了:(

TOP

Hsieh

帖子
4901 
主題
44 
精華
24 
積分
4916 
點名
142  
作業系統
Windows 7 
軟體版本
Office 20xx 
閱讀權限
150 
性別
男 
來自
台北 
註冊時間
2010-4-30 
最後登錄
2026-7-16 

2025年全勤獎章2024年全勤獎章2023年全勤獎章2022虎年全勤獎章2021牛年全勤獎章2020鼠年全勤獎章2019 豬年全勤獎章2018 狗年全勤獎章2017 雞年全勤獎章2016猴年全勤獎章2015羊年全勤獎章2014馬年全勤獎章2013蛇年全勤獎章2012龍年全勤獎章論壇貢獻勳章熱心公益勳章2011兔年全勤獎章
4#
發表於 2012-3-5 22:40 | 只看該作者
回復 3# dondon1495
不須VBA
工具/選項/計算
勾選反覆運算，最高次數為1

請加載分析工具箱增益集
加法練習.rar (4.88 KB)
學海無涯_不恥下問

TOP

dondon1495

帖子
15 
主題
4 
精華
0 
積分
104 
點名
0  
作業系統
XP 
軟體版本
2003 
閱讀權限
20 
註冊時間
2010-7-16 
最後登錄
2020-12-23 
3#
發表於 2012-3-5 19:40 | 只看該作者
回復 2# register313

謝謝大大:D

TOP

register313
　頭銜: 麻辣 路人甲

大學生Rank: 4

帖子
967 
主題
0 
精華
0 
積分
1001 
點名
0  
作業系統
WIN XP 
軟體版本
OFFICE 2003 
閱讀權限
50 
性別
男 
來自
台北 
註冊時間
2010-11-29 
最後登錄
2022-5-17 

2012龍年全勤獎章熱烈參與勳章
2#
發表於 2012-3-5 19:33 | 只看該作者
本帖最後由 register313 於 2012-3-5 20:25 編輯

回復 1# dondon1495

問題1
用VBA解決出題之困擾
  1. Sub 出題()
  2. For Each R In Union([A3:A22], [C3:C22])
  3.   R.Value = Int(Rnd() * 50)
  4. Next
  5. [E3:E22] = ""
  6. End Sub
複製代碼
1.gif
加法練習.rar (7.11 KB)

問題2
F3=IF(COUNT($E$3:$E$22)=20,IF((A3+C3)=E3,"√","×"),"")

TOP

        靜思自在 : 受人點水之恩，須當湧泉以報。
123
返回列表 上一主題