返回列表 上一主題 發帖

動態資料範圍 名稱定義

ciboybj

帖子
47 
主題
19 
精華
0 
積分
82 
點名
0  
作業系統
win  
軟體版本
xp 
閱讀權限
20 
註冊時間
2014-7-4 
最後登錄
2021-9-4 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2014-7-23 17:21 | 顯示全部帖子

動態資料範圍 名稱定義

大家好
想請問大家
我有一個excel 內有多個sheet
各個sheet 中的有資料範圍不固定
想請問要如何利用vba 快速地將各個sheet中有資料的範圍進行名稱定義

謝謝
收藏 分享

ciboybj

帖子
47 
主題
19 
精華
0 
積分
82 
點名
0  
作業系統
win  
軟體版本
xp 
閱讀權限
20 
註冊時間
2014-7-4 
最後登錄
2021-9-4 
2#
發表於 2014-7-23 23:24 | 顯示全部帖子
以下為我目前的解決方法

Dim i As Integer
  
  For i = 1 To ｎ 'n=sheet的總數
    Sheets("第" & i & "項").Select
   Sheets("第" & i & "項").UsedRange.Select
   
    ActiveWorkbook.Names.Add name:="第" & i & "項", RefersTo:=Selection
  
  Next

TOP

ciboybj

帖子
47 
主題
19 
精華
0 
積分
82 
點名
0  
作業系統
win  
軟體版本
xp 
閱讀權限
20 
註冊時間
2014-7-4 
最後登錄
2021-9-4 
3#
發表於 2014-7-24 12:45 | 顯示全部帖子
謝謝~
不過我有個問題想再向您請教
由於我的SHEET並非我自行建置的
所以有出現類似SHEET1(名稱為第一項)，SHEET3(名稱為第二項)
因此，如是使用您的CODE不知要怎麼改

TOP

ciboybj

帖子
47 
主題
19 
精華
0 
積分
82 
點名
0  
作業系統
win  
軟體版本
xp 
閱讀權限
20 
註冊時間
2014-7-4 
最後登錄
2021-9-4 
4#
發表於 2014-7-24 20:43 | 顯示全部帖子
謝謝大家
讓我學習了~~~

TOP

        靜思自在 : 一個人不怕錯，就怕不改過，改過並不難。
返回列表 上一主題