| ![Date Prev [Date Prev]](style/prev.png)  ![Date Index [Date Index]](style/up.png)  ![Date Next [Date Next]](style/next.png)  | ![Thread Prev [Thread Prev]](style/prev.png)  ![Thread Index [Thread Index]](style/up.png)  ![Thread Next [Thread Next]](style/next.png)  | 
 逸見さん、こんにちは。
> (defun insert-my-date()
>   (interactive)
>   (insert (format-date-string "%y年%#m月%#d日(%v)")))
 さっそく使わせてもらうことにします。ありがとうございます。
フォーマットは "%g%#e年%#m月%#d日(%v曜日) %P%#I時%#M分" に
してみました。
_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
    工藤 満 < Kudo Mituru >
    E-mail : mitur@xxxxxxxxxxxxxxx
_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/