abap當月最後一天函式怎麼寫

剛剛寫完，程式猿賺分不容易，求加分。

FORM gain_number_of_week USING p_datum TYPE sy-datum CHANGING p_num TYPE i.

DATA: p_date1 LIKE sy-datum,

p_date2 LIKE sy-datum,

current_week LIKE scal-week,

previous_week LIKE scal-week.

CALL FUNCTION 'GET_WEEK_INFO_BASED_ON_DATE'

EXPORTING

date = p_datum

IMPORTING

week = current_week

monday = p_date1

sunday = p_date2.

IF p_date1+4(2) p_date2+4(2).

p_num = 1.

ELSE.

WHILE p_date1+4(2) = p_date2+4(2).

p_datum = p_datum - 7.

CALL FUNCTION 'GET_WEEK_INFO_BASED_ON_DATE'

EXPORTING

date = p_datum

IMPORTING

week = previous_week

monday = p_date1

sunday = p_date2.

ENDWHILE.

p_num = current_week - previous_week + 1.

ENDIF.

ENDFORM.

=DAY(DATE(YEAR(NOW()),MONTH(NOW())+1,1)-1)

下月第一天的前一天，正是本月的最後一天。

或

=DATE(YEAR(NOW()),MONTH(NOW())+1,)

下月的0天，即下月第一天的前一天，正是本月的最後一天。

=EOMONTH(TODAY(),0)

返回當前日期之前或之後0月份的該月最後一天的序列號，正是本月最後一天的序列號，可將此單元格設定為日期格式，顯示本月最末一天的日期。

最後的公式，要載入分析工具，函式才能使用。

1、首先開啟excel程式，進入主程式介面，在一個單元格中輸入某個日期。

2、那麼在excel的B單元格中輸入，=DATE(YEAR(A1),MONTH(A1)+1,1)-1，這就是獲取下一個月的一號，然後減去1，計算出上一個月的最後一天。

3、如果要計算多個，那麼羅列出多個日期，都放在A列中，進行羅列。

4、那麼將B列的內容選中，然後向下拉拽，將日期進行自動轉化。