Questione : Rimuovere la fila di dati

Ciao gli esperti, esperti in bisogno del

I contribuiscono a scrivere uno scritto per rimuovere la fila dentro riconciliano lo strato se la cellula di Column_D ha parola “di indicazione„. Gli esperti in speranza possono aiutarli a generare questa caratteristica. Ha attaccato il libro di esercizi per gli esperti perusal.

 class= " lastRow del
>Attachments " di nome " del class= del class= " valore " del
il

class= " fileInfo " del
il title= " " di nome di schedario del class= " di RemoveRow.xls il class= (135 KB)  Javascript " del href= " " dei attachmentDetails del class= di (tipo di lima particolari)  
class= " descrizione " del
xls
il class= di
del >
class= del

Risposta : Rimuovere la fila di dati

Se sono tutti nel D.
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:

X secondaria ()
  
rFind fioco come gamma

Application.ScreenUpdating = falso

Con gli strati (“riconciliare„). Colonne (4)
    Regolare il rFind =. Trovare (che cosa: = " indicazione ", LookAt: =xlWhole, MatchCase: =False, SearchFormat: =False)
    Se non il rFind allora è niente
        Fare
            rFind.EntireRow.Delete
            Regolare il rFind =. Trovare (che cosa: = " indicazione ", LookAt: =xlWhole, MatchCase: =False, SearchFormat: =False)
        Collegare fino a che il rFind non sia niente
    Concluder se
Concluder con
     
Application.ScreenUpdating = allineano
     
Sommergibile dell'estremità
Altre soluzioni  
 
programming4us programming4us