將EXCEL數(shù)據(jù)導入內表中

方法可以將excel的數(shù)據(jù)導入至內表,但要求excel字段和內表字段一致。

  • 方法一
DATA: lt_filename TYPE rlgrap-filename,   
        lt_data TYPE truxs_t_text_data.```

DATA:GT_DATA TYPE STANDARD TABLE OF ZSEXCEL WITH HEADER LINE .
FIELD-SYMBOLS: <FS>.

 ``` lt_filename = p_path.   "路徑
  CALL FUNCTION 'TEXT_CONVERT_XLS_TO_SAP'
    EXPORTING```
      ```I_LINE_HEADER              = 'X'
      I_TAB_RAW_DATA             = lt_data
      I_FILENAME                 = lt_filename
    TABLES
      I_TAB_CONVERTED_DATA       = GT_VBRK
    EXCEPTIONS
      CONVERSION_FAILED          = 1
      OTHERS                     = 2
            .```
```  IF SY-SUBRC <> 0.
** MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
**         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
  ENDIF.```

* 方法二
``` DATA: lt_filename TYPE rlgrap-filename ,   "路徑
   lt_excel TYPE TABLE OF  alsmex_tabline ,
   ls_excel TYPE alsmex_tabline.```

```lt_filename = p_path.   "路徑```

```call function 'ALSM_EXCEL_TO_INTERNAL_TABLE'
    exporting
      filename                = lt_filename
      i_begin_col             = 1
      i_begin_row             = 2
      i_end_col               = 128
      i_end_row               = 9999
    tables
      intern                  = lt_excel
    exceptions
      inconsistent_parameters = 1
      upload_ole              = 2
      others                  = 3.```

```sort lt_excel by row col.```

loop at lt_excel into ls_excel.
    case ls_excel-col.
      when 1. "讀取第一列
        gs_tab-vbeln        = ls_excel-value.```
*        translate gs_vbak-vbeln to upper case.
      when 2. "讀取第二列
        gs_tab-POSNR        = ls_excel-value.
 endcase .

 at end of row. "到新行將數(shù)據(jù)插入gt_tab
    APPEND gs_tab to gt_tab .
    CLEAR gs_tab .
    ENDAT.
endloop.
LOOP一列一列的賦值可以归敬,但不適用字段超多的上載,字段多用如下代碼:
 IF lt_excel[] IS INITIAL.
    MESSAGE E361(ZFIN01)."  '清單中無數(shù)據(jù)'.
  ENDIF.

  LOOP AT lt_excel .                    "添加至內表

    AT NEW ROW.
      CLEAR GS_TAB.
    ENDAT .

    ASSIGN COMPONENT lt_excel-COL OF STRUCTURE  GS_TAB TO <FS>."分配
    <FS> =  lt_excel-VALUE."賦值

    AT END OF ROW.
      APPEND GS_TAB TO GT_TAB.
    ENDAT.

  ENDLOOP.
最后編輯于
?著作權歸作者所有,轉載或內容合作請聯(lián)系作者
  • 序言:七十年代末,一起剝皮案震驚了整個濱河市巩梢,隨后出現(xiàn)的幾起案子袍睡,更是在濱河造成了極大的恐慌知染,老刑警劉巖,帶你破解...
    沈念sama閱讀 206,968評論 6 482
  • 序言:濱河連續(xù)發(fā)生了三起死亡事件斑胜,死亡現(xiàn)場離奇詭異控淡,居然都是意外死亡,警方通過查閱死者的電腦和手機止潘,發(fā)現(xiàn)死者居然都...
    沈念sama閱讀 88,601評論 2 382
  • 文/潘曉璐 我一進店門掺炭,熙熙樓的掌柜王于貴愁眉苦臉地迎上來,“玉大人凭戴,你說我怎么就攤上這事涧狮。” “怎么了么夫?”我有些...
    開封第一講書人閱讀 153,220評論 0 344
  • 文/不壞的土叔 我叫張陵者冤,是天一觀的道長。 經(jīng)常有香客問我档痪,道長涉枫,這世上最難降的妖魔是什么? 我笑而不...
    開封第一講書人閱讀 55,416評論 1 279
  • 正文 為了忘掉前任腐螟,我火速辦了婚禮愿汰,結果婚禮上,老公的妹妹穿的比我還像新娘乐纸。我一直安慰自己衬廷,他們只是感情好,可當我...
    茶點故事閱讀 64,425評論 5 374
  • 文/花漫 我一把揭開白布锯仪。 她就那樣靜靜地躺著泵督,像睡著了一般。 火紅的嫁衣襯著肌膚如雪庶喜。 梳的紋絲不亂的頭發(fā)上小腊,一...
    開封第一講書人閱讀 49,144評論 1 285
  • 那天,我揣著相機與錄音久窟,去河邊找鬼秩冈。 笑死,一個胖子當著我的面吹牛斥扛,可吹牛的內容都是我干的入问。 我是一名探鬼主播丹锹,決...
    沈念sama閱讀 38,432評論 3 401
  • 文/蒼蘭香墨 我猛地睜開眼,長吁一口氣:“原來是場噩夢啊……” “哼芬失!你這毒婦竟也來了楣黍?” 一聲冷哼從身側響起,我...
    開封第一講書人閱讀 37,088評論 0 261
  • 序言:老撾萬榮一對情侶失蹤棱烂,失蹤者是張志新(化名)和其女友劉穎租漂,沒想到半個月后,有當?shù)厝嗽跇淞掷锇l(fā)現(xiàn)了一具尸體颊糜,經(jīng)...
    沈念sama閱讀 43,586評論 1 300
  • 正文 獨居荒郊野嶺守林人離奇死亡哩治,尸身上長有42處帶血的膿包…… 初始之章·張勛 以下內容為張勛視角 年9月15日...
    茶點故事閱讀 36,028評論 2 325
  • 正文 我和宋清朗相戀三年,在試婚紗的時候發(fā)現(xiàn)自己被綠了衬鱼。 大學時的朋友給我發(fā)了我未婚夫和他白月光在一起吃飯的照片业筏。...
    茶點故事閱讀 38,137評論 1 334
  • 序言:一個原本活蹦亂跳的男人離奇死亡,死狀恐怖鸟赫,靈堂內的尸體忽然破棺而出蒜胖,到底是詐尸還是另有隱情,我是刑警寧澤抛蚤,帶...
    沈念sama閱讀 33,783評論 4 324
  • 正文 年R本政府宣布翠勉,位于F島的核電站,受9級特大地震影響霉颠,放射性物質發(fā)生泄漏。R本人自食惡果不足惜荆虱,卻給世界環(huán)境...
    茶點故事閱讀 39,343評論 3 307
  • 文/蒙蒙 一蒿偎、第九天 我趴在偏房一處隱蔽的房頂上張望。 院中可真熱鬧怀读,春花似錦诉位、人聲如沸。這莊子的主人今日做“春日...
    開封第一講書人閱讀 30,333評論 0 19
  • 文/蒼蘭香墨 我抬頭看了看天上的太陽。三九已至啤誊,卻和暖如春岳瞭,著一層夾襖步出監(jiān)牢的瞬間,已是汗流浹背蚊锹。 一陣腳步聲響...
    開封第一講書人閱讀 31,559評論 1 262
  • 我被黑心中介騙來泰國打工瞳筏, 沒想到剛下飛機就差點兒被人妖公主榨干…… 1. 我叫王不留,地道東北人牡昆。 一個月前我還...
    沈念sama閱讀 45,595評論 2 355
  • 正文 我出身青樓姚炕,卻偏偏與公主長得像,于是被迫代替她去往敵國和親。 傳聞我的和親對象是個殘疾皇子柱宦,可洞房花燭夜當晚...
    茶點故事閱讀 42,901評論 2 345

推薦閱讀更多精彩內容