>>131 レスありがとうございます。短いコードだけどいろいろ分かった気がします。

Emacs Lisp の説明のサイトとかみながらいじってたらこんなのできました。
テスト,添削お願いします。

(defun my-navi2ch-change-article-max-buffers (numbers)
"navi2ch-article-max-buffers を変更し、越えていたら閉じる。"
(interactive "p")
(setq navi2ch-article-max-buffers numbers)
(navi2ch-article-expunge-buffers)
)