昱得資訊工作室
麻辣學園
歡迎光臨, 訪客. 請先 登入註冊一個帳號.
您忘了 啟用您的帳號嗎?
2008-10-16, 12:43:59
世界展望會助學計劃
首頁 說明 登入 註冊 贊助論壇 想當作者?
新聞: 會員注意!!麻辣家族討論區[通用版規],請詳閱!!


+  麻辣家族討論區
|-+  MS Office 系列
| |-+  EXCEL
| | |-+  Excelㄧ般區 (版主: gong, bosco_yip)
| | | |-+  如何在固定的存儲格內輸入資料?
0 會員 以及 1 訪客 正在閱讀本篇主題. « 上一篇主題 下一篇主題 »
頁: [1] 2 向下 列印
作者 主題: 如何在固定的存儲格內輸入資料?  (閱讀 3077 次)
jshs
中學生
*
離線 離線

文章: 35


如何在固定的存儲格內輸入資料?
« 於: 2005-04-25, 21:33:33 »

請教各位先進:

如果要固定在 C3 存儲格內輸入資料,餘 A5,B5,C5,D5,E5,.....的值均隨 C3 而異動;但每次在輸入資料後,作用存儲格就會隨 Enter 鍵移動到下一個作用存儲格,必須要重回 C3 後再作輸入的動作。

請問有沒方法將輸入的位置固定在 C3 ,而不會隨 Enter 或 上、下、左、右 鍵移動。
已記錄
wang
高中生
*
離線 離線

文章: 101


Re: 如何在固定的存儲格內輸入資料?
« 回覆文章 #1 於: 2005-04-25, 21:55:10 »

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Sheets("sheet1").ScrollArea = "c3"
End Sub
已記錄
jshs
中學生
*
離線 離線

文章: 35


Re: 如何在固定的存儲格內輸入資料?
« 回覆文章 #2 於: 2005-04-25, 22:18:38 »

以上是巨集或 VB 的指令嗎?很慚愧,我還沒有進入那個階段。
可否請 wang 大大稍微說明一下,我試著作作看。感謝!
已記錄
oobird
凸槌的木工
論壇維護群
*
離線 離線

文章: 4429


Re: 如何在固定的存儲格內輸入資料?
« 回覆文章 #3 於: 2005-04-25, 22:26:02 »

你先copy上面的程式,在你的工作表按alt+f11,跳出vba編輯視窗,在右邊空白處貼上,再按alt+q回到工作表即可使用,但先要把其他隨c3內容改變的儲存格設好,否則無法點擊那些儲存格作修改。
已記錄

結廬待慧君
jshs
中學生
*
離線 離線

文章: 35


Re: 如何在固定的存儲格內輸入資料?
« 回覆文章 #4 於: 2005-04-25, 23:02:15 »

成功了,真的太神奇了。函數、巨集、VB 讓我覺得 Excel 真的神通廣大,看來我還有得摸索了。
再次感謝 wang
已記錄
jshs
中學生
*
離線 離線

文章: 35


Re: 如何在固定的存儲格內輸入資料?
« 回覆文章 #5 於: 2005-04-25, 23:04:59 »

漏了一位 oobird ,你們真是惠我良多。謝謝、謝謝!
已記錄
leonchou
論壇維護群
*
離線 離線

文章: 1160


Re: 如何在固定的存儲格內輸入資料?
« 回覆文章 #6 於: 2005-04-25, 23:10:20 »

不用巨集大致想到三個方式
1. 取消鎖定C3,保護工作表。輸入時以 TAB 取代 Enter。(亦適用多格情形)
2. 取消鎖定C3,保護工作表,勾選允選選取:僅非鎖定儲存格。
3. 控制工具箱 > 屬性,顯示目前工作表屬性,設定 ScrollArea 範圍。

第一個算是標準的方法,它可以解決許多Enter定位的困擾--只是習慣問題。
第二個方法適用Excel2002或2003,僅憑印象所以方法可能有出入。

提醒: ScrollArea屬性不會儲存。
已記錄

jshs
中學生
*
離線 離線

文章: 35


Re: 如何在固定的存儲格內輸入資料?
« 回覆文章 #7 於: 2005-04-26, 15:12:34 »

謝謝 leonchou 提供的方式,我在 Excel 2000 均一一試過了,真的可以用。謝謝大家的幫忙。
已記錄
BB
中學生
*
離線 離線

文章: 29


Re: 如何在固定的存儲格內輸入資料?
« 回覆文章 #8 於: 2005-05-29, 14:37:19 »

在工具/選項/編輯中將ENTER....之核取方塊取消勾選即可

不知是否適用?
已記錄
liau_sl
高中生
*
離線 離線

文章: 193


Re: 如何在固定的存儲格內輸入資料?
« 回覆文章 #9 於: 2005-07-07, 13:34:52 »

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Sheets("sheet1").ScrollArea = "c3"
End Sub

如果是跨欄,跨例的話或是多欄多例的話如何設呢..
只有F欄,H欄,F欄輸入的話.如何寫呢?
已記錄
頁: [1] 2 向上 列印 
« 上一篇主題 下一篇主題 »
自訂搜尋
跳到:  

本頁花了 4.569 秒, 以及 20 次的資料庫查詢.