buongiorno
da un elenco vorrei eliminare quelle celle che contengono un determinato valore
ho provato ma purtroppo non riesco a venirne a capo.
allego file
http://www.filedropper.com/prova_2
grazie
Moderatori: Anthony47, Flash30005
Sub Nettoy()
Dim lFor As String, I As Long, DelCnt As Long, LastG As Long
'
lFor = "Rinvia"
LastG = Cells(Rows.Count, "G").End(xlUp).Row
For I = LastG To 5 Step -1
If InStr(1, Cells(I, "L"), lFor, vbTextCompare) > 0 Then
Cells(I, "F").Resize(1, 7).Delete Shift:=xlUp
DelCnt = DelCnt + 1
End If
Next I
MsgBox ("Completato, eliminate n° " & DelCnt & " righe")
End Sub
=SE(L4="";"";SE(CONTA.SE(G5:G25;G4)=1;SE(SINISTRA(L4;6)="Rinvia";L4;"");""))
Torna a Applicazioni Office Windows
formula che conta erroneamente celle "vuote" Autore: raimea |
Forum: Applicazioni Office Windows Risposte: 4 |
excel vba eliminare celle apparentemente vuote Autore: ANTONIO1105 |
Forum: Applicazioni Office Windows Risposte: 3 |
Visitano il forum: Nessuno e 46 ospiti