シート数は「Worksheets.Count」で、シート名は「Worksheets(インデクス番号).Name」です。 これを元にシート名を求める関数を組んでみました。 ちなみに、インデクス番号は１オリジン（１から始まる）です。 また、シートを削除してもインデクス番号が歯抜…