1

次のサブルーチンを実行しようとするとエラーが発生します

「ランタイムエラー：9、添え字が範囲外です」

最初の変数宣言を強調しています。最初はデータ型が間違っているためだと思いましたが、それを変更して試してみるとうまくいきませんでした。

セルと範囲の両方も試しました

Public vFolderPath As String
Public vCMFNewPath As String
Public vKBNewPath As String
Public vDPI As Integer

Private Sub SetGlobal()

Dim vGo As String
Dim vTemplateLocation As String
Dim vCMFFilename As String
Dim vKBFilename As String
Dim vDriver As String
Dim vPKG As String

    vDPI = Workbooks("tools.xlsm").Sheets("SETTINGS").Range("B2").Value

    vFolderPath = Workbooks("tools.xlsm").Sheets("SETTINGS").Range("B3").Value & "\"

何か案は？

4

2 に答える 2

3

Tools.xslm というファイルからコードを実行すると、問題なく動作します。Settings というタブがあり、セル B2 に整数、セル B3 に文字列値があります。

これは、Personal xlsb または Tools.xlsm 内のモジュールから実行する場合に機能します。変数を宣言しなくても機能します。

于 2013-03-22T12:05:28.423 に答える