返回列表 上一主題 發帖

[發問] 儲存格的值由巨集來給予

pitera88

帖子
59 
主題
15 
精華
0 
積分
108 
點名
0  
作業系統
winXp 
軟體版本
office2003 
閱讀權限
20 
性別
男 
來自
屏東 
註冊時間
2011-12-16 
最後登錄
2018-8-10 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2012-10-2 08:57 | 顯示全部帖子

[發問] 儲存格的值由巨集來給予

a1儲存格 =(巨集內的變數)

  a2=if(a1=5(假設值),"可以顯示","")

請問這樣可以作到嗎?? 也就是a1的值要由巨集來給，不執行巨集時 a1 的值是空的

這樣就不怕另存新檔時，a1 的值就被存起來了

以上的想法不知有大大們可以參詳一下嗎，可以作到嗎??  還是有另外更好的方法呢??

感恩~~~~
收藏 分享
仁兄

pitera88

帖子
59 
主題
15 
精華
0 
積分
108 
點名
0  
作業系統
winXp 
軟體版本
office2003 
閱讀權限
20 
性別
男 
來自
屏東 
註冊時間
2011-12-16 
最後登錄
2018-8-10 
2#
發表於 2012-10-2 15:00 | 顯示全部帖子
回復 2# mark15jill


       Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If [a1] <> "" Then [b1] = [a1] Else [a1] = ""  
End Sub

不好意思，這個是要放在輸入頁那個sheet 的巨集嗎??

如果[a1]是在「輸入頁」這個sheet  但[b1] 是在「列印頁」 這個  If [a1] <> "" Then [b1] = [a1] Else [a1] = ""  地方要怎麼改!

謝謝大大
仁兄

TOP

pitera88

帖子
59 
主題
15 
精華
0 
積分
108 
點名
0  
作業系統
winXp 
軟體版本
office2003 
閱讀權限
20 
性別
男 
來自
屏東 
註冊時間
2011-12-16 
最後登錄
2018-8-10 
3#
發表於 2012-10-2 22:15 | 顯示全部帖子
回復 4# luhpro


    感謝大大的指教，原來存檔前還可以作這個動作，受教了~~

正在實作中，感謝您~~~
仁兄

TOP

pitera88

帖子
59 
主題
15 
精華
0 
積分
108 
點名
0  
作業系統
winXp 
軟體版本
office2003 
閱讀權限
20 
性別
男 
來自
屏東 
註冊時間
2011-12-16 
最後登錄
2018-8-10 
4#
發表於 2012-10-3 10:41 | 顯示全部帖子
回復 4# luhpro


    謝謝大大，可以用了

另外請教一下，存檔之前，可以讓畫面保持不變嗎? 因為把 a1 清空後，畫面會不同，雖然只有一下下(可以讓人看不出來嗎)

感恩!!!
仁兄

TOP

        靜思自在 : 閒人無樂趣，忙人無是非。
返回列表 上一主題