| |
▼Hirofumi さん:
返事が送れて申し訳ありません。
>★印の様に、()を削除して下さい
ご指摘のとおり修正したところ、思った通りのことができました。
()を削除しただけで、できるとは低レベルの私には全く?????なのですが、
本当に感謝、感謝です。ありがとうございました。
>>の部分でデバッグとなり、「コンパイルエラー 配列には割り当てられません」とのメーセージがでてうまくいきません。
>
>此れは、Excel97のVBAがVer5.Xで、Excel2000以降がVer6.Xなので其の違いで動きません
>2案共に、以下の様に変更して下さい
>尚、この変更を行っても、そのままExcel2003でも使えます
>
> Dim i As Long
> Dim j As Long
> Dim lngRows As Long
> Dim rngList As Range
> Dim rngResult As Range
> Dim vntPost As Variant
>' Dim vntData() As Variant
> Dim vntData As Variant '★変更
> Dim vntResult() As Variant
> Dim lngWrite As Long
> Dim strProm As String
>
>★印の様に、()を削除して下さい
|
|