以下のように作成したのですが、
年:XXXX 4桁 できました。
月:XX 2桁ができません、1桁になります。
5月なら05として取得したいのですが、修正方法がわかりません
A1には、2009/5/1と入力しています。
VBAに詳しい方で簡単に、どうぞお願いします。
Sub sample()
Dim myDate As Date
myDate = Range("A1").Value
Range("B7").Value = Year(myDate)
Range("C7").Value = Month(myDate)
Range("D7").Value = Day(myDate)
End Sub
A 回答 (1件)
- 最新から表示
- 回答順に表示
No.1
- 回答日時:
こんにちは
VBAの式を見ますとセルのデータとしては、数値で持つようなので、見映えをリーディング0付きにしたいと判断しまた。
◆手動で設定(事前作業とするとき)セルの表示形式をユーザ定義にして 00 を設定すればOk。
VBAマクロからなら、事前に1度だけ下記のコード実行する。
Range("C7").NumberFormatLocal = "00"
この回答への補足
説明不足でした。
05という文字列を抽出して、変数を修飾してから、2009年05月XXX.xlsというファイルを読みたいのです。
無理ですか
ありがとうございます。
できました。
Sub a()
Dim myDate As Date
Dim AAA As String
myDate = Range("A1").Value
AAA = "'" & Format(myDate, "mm")
Range("C7").Value = AAA '確認用です。
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) ExcelのVBAでシフト表を作っていますが、バグが出て困っています 2 2022/09/13 11:33
- Visual Basic(VBA) 【再投稿】VBAのシフト表でバグが出て困っています 3 2022/09/24 08:29
- Visual Basic(VBA) ①ExcelVBAでカレンダーを作り、別のユザーフォームで日付を入力したいのですがエラーになります。 1 2023/02/17 18:39
- Visual Basic(VBA) Sheet2の日付をキーにオートフィルターで2023年1月のデータを抽出し、Sheet3へ書き出すた 2 2023/03/06 23:57
- Visual Basic(VBA) 今日の日付が過ぎたらその行を削除したい 1 2023/04/01 20:06
- Visual Basic(VBA) まとめシートから集計シートへA列のコードが一致したら1行コピーするマクロをネット上で見つけました。こ 1 2022/08/30 14:11
- Visual Basic(VBA) VBAが止まります。 3 2022/08/31 14:09
- Visual Basic(VBA) 【VBA】先月分の取得ができない理由が分かりません。 2 2022/04/24 11:16
- Excel(エクセル) vba userformで漢字を全角カタカナに 2 2022/07/24 15:38
- Visual Basic(VBA) 別シートのデータを参照して値を入れたい。 まとめデータシートのC列D列の値を商品一覧シートのコードが 7 2022/08/17 13:20
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
同一セルに日時があるものを日...
-
1年分のデータから特定の月分...
-
EXCELでCSVファイル保存すると...
-
ドロップダウンリストで空白の...
-
Excelで指定した条件と一致する...
-
COUNTIFの反対の関数はあるので...
-
エクセルでセルを一括で右詰に...
-
エクセルVBAで、複数セルのデー...
-
エクセルで数字、文字列混在の...
-
Excelで連続データを行飛ばしで...
-
OFFSET関数を使用した印刷範囲...
-
【VBA】指定フォルダに格納中の...
-
複数のシートの日付データを、...
-
色なしセルの合計値の出し方に...
-
エクセルで数列を使う方法はあ...
-
エクセル Marlettフォントでレ...
-
【エクセル】一覧から指定デー...
-
excelで平均差を出したい
-
EXCELで年月日の表記から日付部...
-
Excel2010 vlookup 検索値が複...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
1年分のデータから特定の月分...
-
同一セルに日時があるものを日...
-
EXCELでCSVファイル保存すると...
-
Excelで指定した条件と一致する...
-
COUNTIFの反対の関数はあるので...
-
1つのセルにまとまっている情報...
-
ドロップダウンリストで空白の...
-
エクセルで数字、文字列混在の...
-
エクセルでセルを一括で右詰に...
-
エクセルVBAで、複数セルのデー...
-
excelで平均差を出したい
-
複数のシートの日付データを、...
-
EXCELで年月日の表記から日付部...
-
エクセル
-
【VBA】指定フォルダに格納中の...
-
セル内の改行された文字列を分割
-
表の外部結合を行いたい
-
Excel2010 vlookup 検索値が複...
-
Googleスプレッドシート横並び...
-
Excelで連続データを行飛ばしで...
おすすめ情報