vb ile hucredeki ismi silme

[mosmos2009]

merhabalar
vısual basıc ile bos olan satırları bir üsteki satırı kod yazarak boslukları doldurabiliyorum fakat ekteki soru boyalı olan Package isminde silinmesini istiyorum
kod icerisine nasıl yazabilirim simdiden tesekkürler,

 

[Murat OSMA]

Sadece Packages yazısını mı sildirmek istiyorsunuz ?

 

[Murat OSMA]

Eğer öyle ise bu kodu deneyiniz;

[SIZE="2"]Sub Emre()
Dim i As Integer
For i = 1 To Range("A65536").End(3).Row
If Cells(i, "AS") = "Packages" Then
Cells(i, "AS").ClearContents
End If: Next i: i = Empty
End Sub[/SIZE]

 

[mosmos2009]

denedim fakat silmedi

 

[asi_kral]

denedim fakat silmedi

Merhaba
Sayın Murat Bey'in kodunu

Sub Emre()
Dim i As Integer
For i = 1 To Range("A65536").End(3).Row
If Cells(i, "[COLOR="Red"]AR[/COLOR]") = "Packages" Then
Range("AR" & i & ":AX" & i).ClearContents
End If: Next i: i = Empty
End Sub

Olarak değiştirip dener misiniz_?

 

[mosmos2009]

Evet ustad simdi bu kodu deneyince silindi Tesekkürerimi sunarım

 

[Murat OSMA]

Teşekkürler Mehmet Bey,
Sütun genişlikleri dar olduğu için dikkat etmemiştim...

 

[asi_kral]

Teşekkürler Mehmet Bey,
Sütun genişlikleri dar olduğu için dikkat etmemiştim...

Rica ederim

Evet ustad simdi bu kodu deneyince silindi Tesekkürerimi sunarım

Kolay Gelsin.