VBA - Táblázatban szűrt elemek törlése
2021-12-01T16:58:47+01:00
2021-12-02T09:04:24+01:00
2022-08-12T06:00:28+02:00
Nerich
Sziasztok!

Van egy táblázattál alakított listám, ahol az "igen"-el jelölt elemeket szeretném törölni de sajnos hibát jelez az EntireRow. Delete résznél.

Hol van a hiba?

Sub DelFilter() Dim wsSheet As Worksheet Dim stTable As String Dim iField As Integer Dim vCriteria As Variant Set wsSheet = Worksheets("export") stTable = "Táblázat3" iField = 19 vCriteria = "Igen" With wsSheet With .ListObjects(stTable).DataBodyRange .AutoFilter .AutoFilter Field:=iField, Criteria1:=vCriteria .EntireRow.Delete .AutoFilter End With End With End Sub

Segítségeteket előre is köszönöm szépen!

Nerich
Mutasd a teljes hozzászólást!
Szia!
Elképzelhető, hogy az adott sorokban van máshol is adat a táblázaton kívüli területen.
Üdv.
Mutasd a teljes hozzászólást!

Tetszett amit olvastál? Szeretnél a jövőben is értesülni a hasonló érdekességekről?
abcd