0

Excel 2010 で実行すると、型の不一致エラーをスローする Excel 2007 マクロ (Visual Basic 6.5) があります。 エラーは、Mid()や などの VB 関数を参照して発生しますInstr()。

誰でもこれらのエラーの原因を教えてもらえますか?

Excel 2010 システムに VB.NET がインストールされていない (または最新でない) 場合、エラーが発生する可能性はありますか?

このマクロは、さまざまなシステムで多くの人々によって使用されています。以前は、独自の関数を作成してこれらのエラーを回避していました。

関連するコードは次のとおりです。エラーは中央の行で発生します。

bdash = 0
bdash = InStr(Dfiles(ii, 1), "-")
bperiod = InStr(bdash, Mid(Dfiles(ii, 1), "."))
bname$ = Mid(Dfiles(ii, 1), 1 + bdash, bperiod - 2)
tprefix$ = Mid(TemplateFile$, 1, 12)
4

1 に答える 1

0

あなたのエラーが発生したように：

bperiod = InStr(bdash, Mid(Dfiles(ii, 1), "."))

あなたの問題はMid(Dfiles(ii, 1), ".")その一部です：

Public Shared Function Mid( _
   ByVal str As String, _
   ByVal Start As Integer, _
   Optional ByVal Length As Integer _
) As String

あなたのコードは次のようになるはずです：

bperiod = InStr(bdash, Mid(Dfiles(ii, 1), bdash), "."))
于 2015-04-14T15:31:39.433 に答える