返回列表 上一主題 發帖

請問撰寫判斷式，之後跳出警告視窗。

tku0216

帖子
209 
主題
43 
精華
0 
積分
262 
點名
0  
作業系統
win 7 
軟體版本
office 20** 
閱讀權限
20 
性別
男 
註冊時間
2011-11-3 
最後登錄
2017-4-16 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2011-11-17 09:51 | 顯示全部帖子

請問撰寫判斷式，之後跳出警告視窗。

各位大大好，
    我有一個3*4的表格，每格都是數字，這些數字會依照使用者的填寫而累加，我要在VBA裡寫程式讓他在大於某個數字的時候，跳出樹窗說已經達到預定數字。
我有想過用if then來寫，但這樣我要寫12次，以下請教兩個問題：
1.我發現當我某一格到達預定數字時，警告視窗會跳出，但之後他就一直跳出了。
2.是否可以用迴圈來簡化寫12次的過程？

謝謝。
收藏 分享

tku0216

帖子
209 
主題
43 
精華
0 
積分
262 
點名
0  
作業系統
win 7 
軟體版本
office 20** 
閱讀權限
20 
性別
男 
註冊時間
2011-11-3 
最後登錄
2017-4-16 
2#
發表於 2011-11-17 11:22 | 顯示全部帖子
多謝版主回覆，
想附帶詢問一個問題：就是我看各位的程式寫法，都是以“Private Sub Worksheet_Change(ByVal Target As Range)”開頭，這是不是一個固定用法？因為我目前只有用到添加一個按鈕，所以我都是用“Private Sub CommandButton1_Click()”當開頭。

還有請問這段程式碼“If Not Intersect(Target, [j18:l18]) Is Nothing Then”所代表的意義，謝謝。

TOP

tku0216

帖子
209 
主題
43 
精華
0 
積分
262 
點名
0  
作業系統
win 7 
軟體版本
office 20** 
閱讀權限
20 
性別
男 
註冊時間
2011-11-3 
最後登錄
2017-4-16 
3#
發表於 2011-11-18 09:20 | 顯示全部帖子
感謝版主們的回覆，一次比一次清楚了。

TOP

        靜思自在 : 虛空有盡．我願無窮，發願容易行願難。
返回列表 上一主題