返回列表 上一主題 發帖

在固定範圍操作

baa168

帖子
119 
主題
14 
精華
0 
積分
138 
點名
0  
作業系統
XP 
軟體版本
SP3 
閱讀權限
20 
性別
男 
來自
Taiwan 
註冊時間
2010-11-6 
最後登錄
2019-5-4 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2011-8-15 14:47 | 只看該作者

在固定範圍操作

請教各位大大:
      小弟製作一EXCEL表格，希望使用者只能於一定範圍內操作，且每KEY IN 一儲存格後即向右一格，至G欄時自動換行至下一列第一欄
           例如:
             1.希望使用者於B1~G65536範圍內記錄資料。
                      2.當使用者由B2輸入資料完成後即跳至C2(向右一欄)。
             3.當輸入至G2完成後跳至B3。

請各位大大賜教
收藏 分享

jsleee

帖子
151 
主題
25 
精華
0 
積分
194 
點名
1  
作業系統
WINDOWS 10 
軟體版本
Office 2010 或 2021 
閱讀權限
20 
性別
男 
註冊時間
2011-9-6 
最後登錄
2024-11-8 
2#
發表於 2011-9-13 22:21 | 只看該作者
回復 1# baa168

可以試著這樣做看看：
1. 選擇要保護的工作表，右擊工作表標籤選擇“檢視程式碼”，出現VBA編輯器視窗
2. 將游標定位到屬性視窗中的“ScrollArea”屬性（首次使用時要按F4鍵才能看到屬性視窗）
3. 在屬性值框中輸入 B1:B65536
4. 關閉VBA編輯器返回工作表中
5. 在 工具/選項/編輯  中，設定 "按Enter鍵後，移動選取範圍，方向為 右"

不知道這樣有無符合您的要求.......
請參考看看

TOP

baa168

帖子
119 
主題
14 
精華
0 
積分
138 
點名
0  
作業系統
XP 
軟體版本
SP3 
閱讀權限
20 
性別
男 
來自
Taiwan 
註冊時間
2010-11-6 
最後登錄
2019-5-4 
3#
發表於 2011-10-18 19:10 | 只看該作者
小弟是這樣子做的不道合不合宜   
    Worksheets("Sheet1").ScrollArea = "D2:H50" '控制輸入範圍
       Worksheets("Sheet1").Application.MoveAfterReturnDirection = xlToRight '往右移動
       Worksheets("Sheet1").Range("D2").Select

TOP

        靜思自在 : 【時日莫空過】一個人在世間做了多少事，就等於壽命有多長。因此必須與時間競爭，切莫使時日空過。
返回列表 上一主題