一日一ファイルという使い方もありますね。
もともとファイルを開くためのメッソドを使用しているので、
すでにファイルが存在すればそのファイルを開きます。

前回のマクロではすべてのメモを一つのディレクトリに作成するので、
メモが増えてくると検索に不便かもしれません。
次のように変更すると月ごとにサブディレクトリを作成します。
下はおまけですが、常駐リストのファイル一覧に今月のメモを表示します。

const memo_dir$ = "D:\home\memo"  '※メモディレクトリ

proc main
	dim d$,f$,new
	if dir$(memo_dir$,&h10) = "" then exit proc
	d$ = memo_dir$+"\"+left$(date0$,4)
	if dir$(d$,&h10) = "" then mkdir d$
	d$ = d$+"\"+mid$(date0$,6,2)
	if dir$(d$,&h10) = "" then mkdir d$
	f$ = d$+"\"+cformat$("%s.txt",date0$)
	new = @@QOpenNew:@@QOpenNew = FALSE
	call @@OpenFile(f$)
	@@QOpenNew = new
end proc

proc open_dir
	dim d$
	if dir$(memo_dir$,&h10) = "" then exit proc
	d$ = memo_dir$+"\"+left$(date0$,4)+"\"+mid$(date0$,6,2)
	if dir$(d$,&h10) = "" then d$ = memo_dir$
	@@PrintToolList = TRUE
	@@ToolListType = 3
	@@ToolListFile$ = d$+"\*.*"
end proc