「マスター」ワークシートのデータを取得し、ワークブックの他のシートに配置する VBA コードがあります。私が抱えている問題は、新しいデータが自動的に更新されないことです。ワークシートを自動的に更新するコードを開発したいと考えています。これは私が今持っているコードです。
Sub test()
Dim LR As Long, i As Long
LR = Range("A" & Rows.Count).End(xlUp).Row
For i = 2 To LR
If Range("B" & i).Value = "AP" Then Rows(i).Copy Destination:=Sheets("AP").Range("A" & Rows.Count).End(xlUp).Offset(1)
If Range("B" & i).Value = "*AP" Then Rows(i).Copy Destination:=Sheets(" If Range("B" & i).Value = "CSW" Then Rows(i).Copy Destination:=Sheets("CSW").Range("A" & Rows.Count).End(xlUp).Offset(1)
If Range("B" & i).Value = "CO" Then Rows(i).Copy Destination:=Sheets("CO").Range("A" & Rows.Count).End(xlUp).Offset(1)
If Range("B" & i).Value = "PSR" Then Rows(i).Copy Destination:=Sheets("PSR").Range("A" & Rows.Count).End(xlUp).Offset(1)
Next i
End Sub
これにより、他のシートにデータが配置されますが、新しいデータを「マスター」ワークシートに入力すると、他のシートでデータが更新されません。自動フィルターを含めるために他の方法を試しましたが、うまくいきませんでした。