dondon1495

中學生 Rank: 2

帖子: 15
主題: 4
精華: 0
積分: 104
點名: 0
作業系統: XP
軟體版本: 2003
閱讀權限: 20
註冊時間: 2010-7-16
最後登錄: 2020-12-23

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2012-3-5 19:14 | 只看該作者

給小朋友練習加法的問題

請教

問題1
我用 F9 產生隨機數值然後用選擇性貼上 "值"
不知道有沒有辦法不要這麼麻煩

問題2
每一題昨作答後立即顯示結果與分數
有什麼方式可以全部題目做完後才顯示結果與分數

感謝大大協助解惑:)

加法練習.rar (3.23 KB)

樓主熱帖

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解決出題之困擾

Sub 出題()
For Each R In Union([A3:A22], [C3:C22])
R.Value = Int(Rnd() * 50)
Next
[E3:E22] = ""
End Sub

複製代碼

加法練習.rar (7.11 KB)

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

TOP

dondon1495

中學生 Rank: 2

帖子: 15
主題: 4
精華: 0
積分: 104
點名: 0
作業系統: XP
軟體版本: 2003
閱讀權限: 20
註冊時間: 2010-7-16
最後登錄: 2020-12-23

3^#

發表於 2012-3-5 19:40 | 只看該作者

回復 2# register313

謝謝大大:D

TOP

Hsieh

超級版主 Rank: 8 Rank: 8

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

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

中學生 Rank: 2

帖子: 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

超級版主 Rank: 8 Rank: 8

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

2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱心公益勳章 2011兔年全勤獎章

6^#

發表於 2012-3-5 23:14 | 只看該作者