VBAの構造体で
Type Book
  title As String
  author As String
  price As Long
End Type

桁数を予め指定しておくことてできないんですか?
こんなような感じで
Type Book
  title As String (10)
  author As String (10)
  price As Long (5)
End Type