Welcome to OGeek Q&A Community for programmer and developer-Open, Learning and Share
Welcome To Ask or Share your Answers For Others

Categories

0 votes
274 views
in Technique[技术] by (71.8m points)

excel - Can it be possible to make "SourceData:= _" variable

I have the code below came from a registered macro for creating a pivot table, my wich is to this code available for next row that will be present in the sheet "DONNEES", columns will not increment only, It's look like I can set it like "DONNEES!R1C1:R65500C16" but can it be more proper, with a variable that I can include,

`ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _
    "DONNEES!R1C1:R1553C16", Version:=xlPivotTableVersion10).CreatePivotTable _
    TableDestination:="Sheet2!R1C1", TableName:="PivotTable1", DefaultVersion _
    :=xlPivotTableVersion10`

Thank's in advance, Regards,

See Question&Answers more detail:os

与恶龙缠斗过久,自身亦成为恶龙;凝视深渊过久,深渊将回以凝视…
Welcome To Ask or Share your Answers For Others

1 Reply

0 votes
by (71.8m points)
Dim rng as Range

Set rng = ActiveWorkbook.Sheets("DONNEES").Range("A1:P1553")

ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= rng, _
    Version:=xlPivotTableVersion10).CreatePivotTable _
    TableDestination:="Sheet2!R1C1", TableName:="PivotTable1", _
    DefaultVersion:=xlPivotTableVersion10

与恶龙缠斗过久,自身亦成为恶龙;凝视深渊过久,深渊将回以凝视…
OGeek|极客中国-欢迎来到极客的世界,一个免费开放的程序员编程交流平台!开放,进步,分享!让技术改变生活,让极客改变未来! Welcome to OGeek Q&A Community for programmer and developer-Open, Learning and Share
Click Here to Ask a Question

1.4m articles

1.4m replys

5 comments

57.0k users

...