Excel VBAで日付を4ケタの数値に変換する方法

2005/01/17 01:10

このQ&Aのポイント

Excel VBAを使用して日付を4ケタの数値に変換する方法を知りたいです。現在、日付データを月と日付のみの4ケタの文字列で表示したいと考えていますが、どうすれば良いですか？
現在、VBAを使用せずに処理すると、日付をyyyy/mm/ddの形式で表示し、編集画面で「/」を全て「0」に変換し、RIGHT関数を使用して4ケタ（または5ケタ）の部分を抜き取っています。ただし、この方法では日付が2ケタになると表示がずれてしまったり、データを直接RIGHT関数で処理すると意図した値が返ってこないという問題があります。Excel VBAを使用してこれを効率的に行う方法はありますか？
Excel VBAを使用して、指定した日付を4ケタの数値に変換する方法を教えてください。日付データを4ケタの文字列に変換して表示させたい場合、現在は編集画面で「/」を「0」に変換し、RIGHT関数を使用して4ケタ（または5ケタ）の部分を抜き取る方法を取っていますが、この方法では2ケタの日付の場合に表示がずれてしまったり、データを直接RIGHT関数で処理すると意図した値が返ってこないという問題があります。Excel VBAを使用してこの処理を効率的に行う方法を教えてください。