私は自分のマクロdo Microsoft Excelに問題があります。私は、ある行に、ユーザーがセルに入力した単語と同じ単語があり、他の情報を比較するために行全体をチェックする必要があるかどうかを確認するマクロを作成します。例:ユーザーはAdam Smith 12.05.2016を入力し、マクロはname列にAdamという名前を見つけ、Adamの名前がSmithで日付が12.05.2016であるかどうかを確認する必要があります。 「はい」の場合、行全体を印刷します。 マクロ全体を作成しましたが、error1004アプリケーション定義またはオブジェクト定義エラーが発生しました。Visual Basicマクロエラー
Sub Test()
Dim r As Integer
Dim c1 As Integer
Dim c2 As Integer
Dim i As Integer
r = 0
c1 = 0
c2 = 0
i = 0
' Iterates through name column
Do Until Cells(r, c1).Value = ""
' If program finds the name in name row equal to name in (6, G) returns true
If Cells(r, c1).Value = Cells(6, G).Value Then
' Iterates through surname row
Do Until Cells(r, c2).Value = ""
' If surname is the same and date is on the right of the surname Return tur
If Cells(r, c2).Value = Cells(6, H).Value And Cells(r, c2 + 1).Value = Cells(6, i) Then
Do Until i <= 0
' Output whole data from the row
Cells(10, H + i).Value = Cells(r, c1 + i).Value
i = i + 1
Loop
End If
c2 = c2 + 1
Loop
End If
r = r + 1
Loop
End Sub
行と列のゼロが存在しないため、変数は値0で開始できません。また、「セル(6、G)」列はAの数値1、Bの数値2などと呼ばれることはできません。 –
これを式で行うことができます.VBAは必要ですか? –
@Nathan_Sav Excelについて話しているなら、私は初心者です。 :( – Trefl