Cuestión : Quitar la fila de datos

Hola los expertos, expertos de la necesidad del

I ayudan a escribir una escritura para quitar la fila adentro reconcilian la hoja si la célula de Column_D tiene palabra de la “señal”. Los expertos de la esperanza pueden ayudarme a crear esta característica. Ató el libro de trabajo para los expertos perusal.

 class= " lastRow del
>Attachments del " nombre " del class= del class= " valor " del
del >
class= " fileInfo " del
el title= " del " nombre de fichero del class= " del RemoveRow.xls el class= (135 KB)  Javascript del href= " de los " attachmentDetails del class= " del (tipo de archivo detalles)  
class= " descripción " del
xls
el class= de
del >
class= del

Respuesta : Quitar la fila de datos

Si están todos en la D.
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:

X secundario ()
  
rFind dévil como gama

Application.ScreenUpdating = falso

Con las hojas (“reconciliar”). Columnas (4)
    Fijar el rFind =. Encontrar (qué: = " señal ", LookAt: =xlWhole, MatchCase: =False, SearchFormat: =False)
    Si no el rFind entonces no es nada
        Hacer
            rFind.EntireRow.Delete
            Fijar el rFind =. Encontrar (qué: = " señal ", LookAt: =xlWhole, MatchCase: =False, SearchFormat: =False)
        Colocar hasta que el rFind no sea nada
    Terminar si
Terminar con
     
Application.ScreenUpdating = verdad
     
Submarino del extremo
Otras soluciones  
 
programming4us programming4us