-1

プログラムを 2 つのワークブックと 3 つのワークシートで実行しようとしています。私のためにいくつかの数字を検証します。

Sub Validate_Old_Data()

Dim DBLbrow As Double
Dim DBLAbrow As Double
Dim DBLBbrow As Double
Dim STRname As String
Dim INTcc As Integer
Dim CopyRange As Range

 DBLbrow = ActiveSheet.Cells(Rows.Count, "B").End(xlUp).Row

 Do While BDLbrow > 5

STRname = Range("B" & DBLbrow).Value
INTcc = Range("C" & DBLbrow).Value

Workbooks("Z:\Centralized Charges\Centralized Charges 2015\Forecast and Actuals\P3\Headcount Templates\P3 Centralized Charges Headcount Tracker (vs. 2015 Budget).xlsx").Activate

Worksheets(INTcc).Activate

DBLAbrow = ActiveSheet.Cells(Rows.Count, "B").End(xlUp).Row

    Do While DBLAbrow > 8

        If Range("B" & DBLAbrow).Value = STRname Then

            CopyRange = Range(DBLAbrow).Row.Copy

            Workbooks("Z:\Centralized Charges\Centralized Charges 2015\Forecast and Actuals\P3\Headcount Templates\Charges Headcount Tracker (vs. 2015 Budget).xlsm").activatae

            Worksheets(INTcc).activatae

            DBLBbrow = ActiveSheet.Cells(Rows.Count, "B").End(xlUp).Row

            If Range("B" & DBLBbrow).Value = STRname Then

                Range(DBLbrow).Value = CopyRange

            Else

                DBLBbrow = DBLBbrow - 1

            End If

            Loop

        Else
            DBLAbrow = DBLAbrow - 1


        End If

        Loop

BDLbrow = BDLbrow - 1

End Sub

それでも、無効な修飾子エラーが発生します。誰かが理由を説明できますか?

4

1 に答える 1

1

コンパイル エラーと実行時エラーには常に、問題の場所が強調表示されます。コードを実行してみて、コンパイラーが以下を選択することを確認するだけで十分ですincorrect qualifier。

ここに画像の説明を入力

RowsではありませんRow。

この貧弱な回答に役立つ「直感的な」情報を追加するだけで、将来同様の問題で役立つようになります。開発中に、通常は 2 つのタイプに分類される何千ものエラーが発生する可能性があります (この例を VBA に貼り付けます)。

  • コンパイル エラー:「Excel はあなたが言っていることを理解していません」という意味です。たとえばRow、存在しないプロパティを使用します。Excel が意味を理解できずRow、起動を拒否します。したがって、コードは実行を開始することさえできず、(可能な場合) 「Excel が認識しなかった単語」を強調表示する白いウィンドウが表示されるので、修正することができます。
  • 実行時エラー:「Excel はあなたの言っていることを理解していますが、ある時点でそれが気に入らない」という意味です。たとえば、次のように書きk = 2/0ます。エクセルで「わかりにくいもの」を使っているわけではありませんが、除算をしなければならないときにスタックがオーバーフローして実行時エラーが発生します。その場合、 Debugというラベルの付いた便利なボタンを備えた灰色のウィンドウが表示されます。これを押すと、コードの黄色の行が強調表示されます。これがエラーのある行です。

これを説明するために使用した「技術的に不十分な」言葉で申し訳ありませんが、要点をまっすぐに説明していただければ幸いです。この重要なトピックについて詳しく知りたい場合は、こちらをお読みください。

于 2015-04-30T15:27:59.973 に答える