PCZONE 討論區

PCZONE 討論區 (https://www.pczone.com.tw/vbb3/)
-   -- OFFICE 相 關 軟 體 討 論 版 (https://www.pczone.com.tw/vbb3/forum/5/)
-   -   【問題】Excel可以這樣做嗎? (https://www.pczone.com.tw/vbb3/thread/5/34138/)

陶陶 2002-02-20 02:17 PM

【問題】Excel可以這樣做嗎?
 
當儲存格a1輸入數字如下
a1=5
當按下輸入鍵時
儲存格a1會變成字串
a1=我愛你

不知道這要用什麼方法來做

沙拉油 2002-02-20 03:02 PM

按一下 Alt+F11
將底下程式碼貼於游標所在處
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" And Target = 5 Then Target = "我愛妳"
End Sub

陶陶 2002-02-20 05:08 PM

這是一個儲存格的話,如果我有四百個儲存格的話
文字字串有七十個我又因該如何做?
案例如下
a1=5
a1=我愛你

a3=7
a3=愛你呦

數字是1--70 對印到文字字串
1=中國
2=情愛
3=再次
4=心情
5=我愛你
.
.
.
.
.
.
68=人性
69=通知
70=是敵是友

不會要一個一個慢慢來吧:confused:

Oyazi 2002-02-20 11:34 PM

這麼嚴格喔~~~
可不可以這樣做
例如在A1輸入5
然後在B1出現"我愛你"
在A1輸入7
在B1出現"愛你呦"
如果可以這樣的話~~~那就非常簡單了...
可以的話再跟我說
我再把檔案上傳
以免浪費網路資源...:)

陶陶 2002-02-21 09:31 AM

在同一儲存格中數字為1--70的隨機變數(就是等待使用者輸入)
但是數字對印文字字串不能改變

如果這是單一儲存格可以這樣做嗎?

PS:Oyazi這就是如此嚴格(不要問我為什麼)

kankan 2002-02-21 09:44 AM

OYAZI兄想用VLOOKUP這函數嗎?
不過我想你的要求, 最快的方法都是用沙拉油兄之方法了

陶陶 2002-02-21 11:08 AM

沙拉油大大的方法我用不出來
:(

kankan 2002-02-21 11:57 AM

sheet1 ---> 右click ---> 檢視程式碼 ---> 將一般改成worksheet ---> 貼上以下

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" And Target = 1 Then Target = "我愛妳"
If Target.Address = "$A$1" And Target = 2 Then Target = "我唔愛妳"
If Target.Address = "$A$1" And Target = 3 Then Target = "我永遠愛妳"
If Target.Address = "$A$1" And Target = 4 Then Target = "我永遠唔愛妳"
If Target.Address = "$A$1" And Target = 5 Then Target = "我永遠永遠愛妳"
If Target.Address = "$A$1" And Target = 6 Then Target = "我永遠永遠唔愛妳"
....
..
.
(如此類推)

End Sub

陶陶 2002-02-21 12:48 PM

為什麼還要回去按一下才會變成字串

不能自動變換嗎?

ICLA 2002-02-21 05:55 PM

不能自動變化,因為是使用 Selection_Change 事件,因此要有移動才行。


所有時間均為 +8。現在的時間是 10:04 AM



 XML   RSS 2.0   RSS 
本站使用 vBulletin 合法版權程式
站務信箱 : [email protected]

本論壇所有文章僅代表留言者個人意見,並不代表本站之立場,討論區以「即時留言」方式運作,故無法完全監察所有即時留言,若您發現文章可能有異議,請 email :[email protected] 處理。