Dim a_strDay As String
a_strDay = 20041130
String型の変数に日付をセット
それをByte型配列変数にセットするコーディング技法を教えてください!!
動的配列を作って代入するだけで出来ます。
Dim a_strDay As String
Dim bytDay() As Byte
Dim i As Integer
a_strDay = "20041130"
bytDay = a_strDay 'UNICODE
bytDay = StrConv(a_strDay, vbFromUnicode) 'SHIFT-JIS
For i = 0 To UBound(bytDay)
Debug.Print bytDay(i)
Next i