Yeni yıl Microsoft Office Eğitim planlarınız için bütçenizi oluşturmadan önce ESTE eğitim kalitesi ile tanışın. 🙌
Kullanıcıların ihtiyacı olan yazılı materyal, dosya ve video kaynağı desteğimiz ile tüm ofis çalışanlarının iş süreçlerini rahatlatacak eğitimler planlayın. 🎯
Microsoft Office eğitimlerimiz hakkında detaylı bilgi için bize ulaşın.
Çok eski bir web tarayıcısı kullanıyorsunuz. Bu veya diğer siteleri görüntülemekte sorunlar yaşayabilirsiniz.. Tarayıcınızı güncellemeli veya alternatif bir tarayıcı kullanmalısınız.
İçerisinde tamam geçen kelimelerin olduğu bütün satırları silmek istiyorum. Kendi data aldığım SAP yazılımından gelen verilerde satır aralıkları oluyor. Bu aralıkları da silmek istiyorum.
1 Numaralı resimde gördüğünüz 2/1.5 tamam satırına gidecek (Bu satır tamam yazan en son satır) sonra 2 satır altına gidip yukarıda kalan bütün satırları silecek.
Option Compare Text
Sub ExcelTurkey()
Dim i&
For i = Cells(Rows.Count, "B").End(3).Row To 1 Step -1
If Cells(i, "B").Value Like "*tamam*" Then
Rows(1 & ":" & i + 1).Delete
End If
Next i
i = Empty
End Sub