ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

[µo°Ý] (¤w¸Ñ¨M)¼Ï¯Ã¤ÀªRªº¸ê®Æ¦Û°Ê§ó·s¦p¦ó³]

[µo°Ý] (¤w¸Ñ¨M)¼Ï¯Ã¤ÀªRªº¸ê®Æ¦Û°Ê§ó·s¦p¦ó³]

¥»©«³Ì«á¥Ñ freeffly ©ó 2012-2-22 17:07 ½s¿è

"¹ê»Ú»P¹wºâ¸ê®Æ!R1C1:R8213C19").CreatePivotTable TableDestination:= _
        "'[¹ê»Ú»P¹wºâ¤ñ-·~°È¥Î9906.xls]¹ê»Ú»P¹wºâ¸ê®Æ'!R8220C22", TableName:="¼Ï¯Ã¤ÀªRªí1", _
        DefaultVersion:=xlPivotTableVersion10


        R1C1:R8213C19 ½Ð°Ý³o¤@­Ó¦pªG­nÅývba¦Û°Ê§ì¸ê®Æªº¥þ³¡­n«ç»ò³]
¦r¨å¨â¦U¦r ÁÙ¯uÃø²z¸Ñ

¦^´_ 1# freeffly
¥Î°ÊºA©w¸q¦WºÙ
¨Ò¦p¸ê®Æ½d³ò¦WºÙ©w¸q¬°X
SourceData:="X"
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

¥»©«³Ì«á¥Ñ kimbal ©ó 2010-8-4 21:47 ½s¿è
  1. ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
  2.         "¹ê»Ú»P¹wºâ¸ê®Æ!R1C1:R"& Worksheets("¹ê»Ú»P¹wºâ¸ê®Æ").Range("A1").CurrentRegion.Rows.Count & "C19").CreatePivotTable _
  3.         TableDestination:="'[¹ê»Ú»P¹wºâ¤ñ-·~°È¥Î9906.xls]¹ê»Ú»P¹wºâ¸ê®Æ'!R8220C22",  _
  4.         TableName:="PivotTable1", DefaultVersion:=xlPivotTableVersion10
½Æ»s¥N½X
À´±oµo°Ý,µª®×´N·|¦b¨ä¤¤

¤µ¤éの¤@¬íは  ©ú¤éにない
http://kimbalko-chi.blogspot.com
http://kimbalko.blogspot.com

TOP

ÁÂÁÂ KIMBAL¤j¤j
¥ý¦¬¤U¬ã¨s¤@¤U

¤]ÁÂÁÂHsieh ¤j¤jªº¦^ÂÐ
§Aªº°ÊºA©w¸q¦WºÙ
¥i¥H¥Î¤ñ¸û¥Õ¸Üªº¤è¦¡»¡¶Ü?
§Ú¥uª¾¹D¦bÀx¦s®æ©w¸q¦WºÙ
³oºâ°ÊºA©w¸q¦WºÙªº¤@ºØ¶Ü?
¦r¨å¨â¦U¦r ÁÙ¯uÃø²z¸Ñ

TOP

¦^´_ 4# freeffly


    http://office.microsoft.com/zh-tw/excel-help/HA010147120.aspx

TOP

        ÀR«ä¦Û¦b : ¤@¥y·Å·xªº¸Ü¡A´N¹³©¹§O¤H¨­¤WÅx­»¤ô¡A¦Û¤v·|ªg¨ì¨â¤Tºw¡C
ªð¦^¦Cªí ¤W¤@¥DÃD