Board logo

標題: Address(1, 1, , 1)代表是什麼? [打印本頁]

作者: rouber590324    時間: 2017-10-16 09:54     標題: Address(1, 1, , 1)代表是什麼?

DEAR ALL 大大
1.料號 = .Range(.[A2], .[A2].End(xlDown)).Address(1, 1, , 1) => 此處Address(1, 1, , 1)代表是什麼?
2.煩不吝賜教  THANKS*10000   

Sub AAAAAA()

     Dim E, Rng As Range, 料號 As String, 數量 As String, 日期 As String

     With Sheets("fndvfile")

        料號 = .Range(.[A2], .[A2].End(xlDown)).Address(1, 1, , 1)

        數量 = .Range(.[D2], .[D2].End(xlDown)).Address(1, 1, , 1)

        日期 = .Range(.[E2], .[E2].End(xlDown)).Address(1, 1, , 1)

    End With

    With Sheet1

            Cells(2, 15).Value = Application.Evaluate("=SUMPRODUCT((" & 料號 & "=" & .Cells(2, 2).Address & ")*(" & 日期 & "=" & .Cells(2, 3).Address & "))")

    End With

End Sub
作者: Hsieh    時間: 2017-10-16 10:42

回復 1# rouber590324

Address(RowAbsolute, ColumnAbsolute, ReferenceStyle, External, RelativeTo)
RowAbsolute列參照   
ColumnAbsolute,欄參照
ReferenceStyle位址字串樣式
External外部參照
RelativeTo當以R1C1樣式且為欄列均是相對參照時,此引數為參照原點
所以Address(1,1,,1)
欄列為絕對參照的A1樣式,且包含外部參照字樣
以Range("A1")為例
Range("A1").Address(1,1)結果為"$A$1"
Range("A1").Address(1,1,,1)結果為"[活頁簿1]工作表1!$A$1"
作者: rouber590324    時間: 2017-10-16 13:54

Hsieh 大大
感謝您詳細之說明 THANKS*10000




歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)