0

エクセルVBAの書式表示変換の構文を教えてください。 Ａ列には日付が入力されています。書式表示はユーザー設定でddです。（2012/9/10と入力→10と表示されています）
これをVBAで標準、もしくは文字列に変換することは可能でしょうか？

「A列の数字が1～31の場合にのみ、同じ行のD列に（B列+C列）という数式を組む」という設定をしたいのです。
A列の書式が標準のときは、下記のコードでうまく動作するのですが、日付書式のままだと計算が行われません。
「最初にA列の書式を日付→標準へ変換する」というコードが追加できればうまく動くのではないかと思います。
ちなみに、現状のコードは以下の通りです。初心者のため、追加すべきコードとそれを入れ込む場所まで教えていただけると助かります。

Sub test()

Dim Rg, R As Range

Set Rg = ActiveSheet.UsedRange.Resize(, 1)
For Each R In Rg
If IsNumeric(R.Value) = True Then
If R.Value > 0 And R.Value < 32 Then
R.Offset(0, 3).FormulaR1C1 = "=RC[-2]+RC[-1]"
End If
End If
Next

End Sub

質問者が選んだベストソリューション

Yahoo!知恵袋 4460日前