» 用excel的請(qǐng)進(jìn)來下，蠻煩幫我想想這個(gè)怎么做��？
樓主有張excel表格要設(shè)計(jì)……其中一個(gè)關(guān)鍵字段是金額……絕對(duì)不能輸錯(cuò)……有沒有什么辦法可以盡量避免某單元格輸入的值錯(cuò)誤�。�
樓主想了想因?yàn)槭禽斎虢痤~……數(shù)據(jù)有效性估計(jì)是用不了了
想了個(gè)辦法不知道能不能實(shí)現(xiàn)
例如我要在a1單元格輸入1000
能不能讓用戶在a1中輸入兩次 兩次結(jié)果一樣則在a1中顯示結(jié)果 否則不顯示或者報(bào)錯(cuò)啊
或者有沒有其他辦法防止輸錯(cuò)
網(wǎng)友評(píng)論2013-07-23 22:26
貌似不可以，只能a1輸入1000 然后b1輸入1000 c1設(shè)定等于a1-b1
網(wǎng)友評(píng)論2013-07-23 22:29
你輸入兩列，然后用if判斷兩個(gè)單元格是否相同或者相減就可以了
網(wǎng)友評(píng)論2013-07-23 22:29
某單元格重復(fù)輸入數(shù)據(jù)事件...
多蛋疼啊...
難道不能A列，B列，重復(fù)輸入兩次，不一樣的自動(dòng)C列提示么？
這樣的話就可以很簡(jiǎn)單，C列用公式=IF(A1=B1，A1，"輸入數(shù)據(jù)不一致！請(qǐng)檢查")
單元格數(shù)據(jù)變動(dòng)事件，可以用VBA，但是你會(huì)很蛋疼...將簡(jiǎn)單的事情復(fù)雜化了...
網(wǎng)友評(píng)論2013-07-23 22:44
可以考慮VBA
網(wǎng)友評(píng)論2013-07-23 22:47
Reply Post by 安安是惡魔 (2013-07-23 22:29):
某單元格重復(fù)輸入數(shù)據(jù)事件...<br/>多蛋疼啊...<br/>難道不能A列，B列，重復(fù)輸入兩次，不一樣的自動(dòng)C列提示么？<br/>這樣的話就可以很簡(jiǎn)單，C列用公式=IF(A1=B1，A1，"輸入數(shù)據(jù)不一致！請(qǐng)檢查")<br/><br/>單元格數(shù)據(jù)變動(dòng)事件，可以用VBA，但是你會(huì)很蛋疼...將簡(jiǎn)單的事情復(fù)雜化了...
表格設(shè)計(jì)不允許我做兩列金額字段哎……因?yàn)樯婕暗酱蛴〉膯栴}……
網(wǎng)友評(píng)論2013-07-23 22:49
Reply Post by 波爾多死機(jī) (2013-07-23 22:47):
表格設(shè)計(jì)不允許我做兩列金額字段哎……因?yàn)樯婕暗酱蛴〉膯栴}……
打印可以考慮打印區(qū)域。
網(wǎng)友評(píng)論2013-07-23 22:50
Reply Post by 波爾多死機(jī) (2013-07-23 22:47):
表格設(shè)計(jì)不允許我做兩列金額字段哎……因?yàn)樯婕暗酱蛴〉膯栴}……
隱藏
網(wǎng)友評(píng)論2013-07-23 22:51
多做一行然后隱藏就好了，不影響打印
網(wǎng)友評(píng)論2013-07-23 22:52
打印的時(shí)候刪除一列就行了唄，多大點(diǎn)事
網(wǎng)友評(píng)論2013-07-23 22:56
Reply Post by 波爾多死機(jī) (2013-07-23 22:47):
表格設(shè)計(jì)不允許我做兩列金額字段哎……因?yàn)樯婕暗酱蛴〉膯栴}……
1.先輸入一列，隱藏
2.再輸入一列，數(shù)據(jù)一模一樣，不要看第一次輸入的列數(shù)據(jù)
3.做一個(gè)輔助列，兩列相減，結(jié)果正確的話刪除2列，留一列數(shù)據(jù)就好
用數(shù)據(jù)有效性也可以做，也有輔助列，上面簡(jiǎn)單可行
網(wǎng)友評(píng)論2013-07-23 23:00
不知道怎么貼xls
直接上代碼...這里還是借用了inputbox，就是輸入框來第二次輸入值做比較...
'這段代碼，ALT+F11打開VBE后，直接貼在例如Sheet1名稱的那里，不懂的我也沒辦法繼續(xù)下去了,代碼從下一行開始
Private Sub Worksheet_Change(ByVal Target As Range) ’表格數(shù)據(jù)變動(dòng)事件，當(dāng)任一單元格數(shù)據(jù)發(fā)生變化時(shí)觸發(fā)
If Not Application.Intersect(Target, ) Is Nothing Then '如果選擇區(qū)域和A列有重疊，暫時(shí)沒加入?yún)^(qū)域選擇的判斷，所以推薦還是安全點(diǎn)選A列的一個(gè)單元格
If Target.Value <> "" Then '如果選擇的單元格內(nèi)容不為空
If Target.Value <> InputBox("", "請(qǐng)?jiān)俅屋斎?quot;, "") Then '選擇的單元格的值和再次輸入框輸入的值判斷，若兩次輸入的值不一致
Target.Value = "" '則選擇的單元格值為空
End If
End If
End If
End Sub
網(wǎng)友評(píng)論2013-07-23 23:02
樓上高能
網(wǎng)友評(píng)論2013-07-23 23:07
11VBA出現(xiàn) 速度膜拜
網(wǎng)友評(píng)論2013-07-23 23:15
