返回列表 上一主題 發帖

[發問] (已解決)如何用公式填滿未知欄位

freeffly

帖子
586 
主題
123 
精華
0 
積分
763 
點名
0  
作業系統
WINDOW7 
軟體版本
Office 2003 
閱讀權限
50 
性別
男 
註冊時間
2010-5-16 
最後登錄
2017-3-14 

熱烈參與勳章好學求知勳章
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2011-5-8 19:23 | 顯示全部帖子

[發問] (已解決)如何用公式填滿未知欄位

本帖最後由 freeffly 於 2012-2-22 17:03 編輯

如果是要填滿未知列數 形式如右   
  Range("D2").AutoFill Destination:=Range("D2:D"& range("A65536").end(xlup).rows)
   選取未知欄位我知道是下面的方式
    Range("IV1").End(xlToLeft).Columns.Select
   可是要用銅像方式套到填滿公式裡面 要如何寫?
收藏 分享
字典兩各字 還真難理解

freeffly

帖子
586 
主題
123 
精華
0 
積分
763 
點名
0  
作業系統
WINDOW7 
軟體版本
Office 2003 
閱讀權限
50 
性別
男 
註冊時間
2010-5-16 
最後登錄
2017-3-14 

熱烈參與勳章好學求知勳章
2#
發表於 2011-5-8 19:31 | 顯示全部帖子
如果是要填滿未知列數 形式如右   
  Range("D2").AutoFill Destination:=Range("D2" range("A65536").end(xlup).rows)
   選取未知欄位我知道是下面的方式
    Range("IV1").End(xlToLeft).Columns.Select
   可是要用同樣方式套到填滿公式裡面 要如何寫?

打錯字了 抱歉
字典兩各字 還真難理解

TOP

freeffly

帖子
586 
主題
123 
精華
0 
積分
763 
點名
0  
作業系統
WINDOW7 
軟體版本
Office 2003 
閱讀權限
50 
性別
男 
註冊時間
2010-5-16 
最後登錄
2017-3-14 

熱烈參與勳章好學求知勳章
3#
發表於 2011-5-8 19:43 | 顯示全部帖子
抱歉我的問題應該是另外一個
Range("D2").AutoFill Destination:=Range("D2:" & Range("IV1").End(xlToLeft).Columns)
如果我已經做到上面這各式子
我要再將整列資料在往下填滿時要如何寫?
    Range("D2").AutoFill Destination:=Range("D2:AG2"), Type:=xlFillDefault
    Range("D2:AG2").AutoFill Destination:=Range("D2:AG1381")
   上面錄製的情況下 如果欄位是未知的要如何完成?
字典兩各字 還真難理解

TOP

freeffly

帖子
586 
主題
123 
精華
0 
積分
763 
點名
0  
作業系統
WINDOW7 
軟體版本
Office 2003 
閱讀權限
50 
性別
男 
註冊時間
2010-5-16 
最後登錄
2017-3-14 

熱烈參與勳章好學求知勳章
4#
發表於 2011-5-9 12:33 | 顯示全部帖子
回復 5# oobird


    應該說公式複製的欄位以第一行作判斷
     可是第一行會每天增加
     第一欄的數量基本上是固定的
      目前看Hsieh大的方式應該是我要的
      晚點試試
      很抱歉沒有說的很清楚
新增Microsoft Excel 工作表.rar (1.73 KB)
字典兩各字 還真難理解

TOP

        靜思自在 : 不要隨心所欲，要隨心教育自己。
返回列表 上一主題