AccessTr.neT
Clearcontents Hatası - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Excel (https://accesstr.net/forum-microsoft-excel.html)
+--- Forum: Excel Cevaplanmış Soruları (https://accesstr.net/forum-excel-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Clearcontents Hatası (/konu-clearcontents-hatasi.html)

Sayfalar: 1 2


RE: Clearcontents Hatası - HORZUM - 19/04/2023

(18/04/2023, 17:35)berduş yazdı: aşağıdaki kodu denediğimde hata vermedi
tam olarak ne yapınca hata veriyor?
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Me.Range("B:B")) Is Nothing Then Exit Sub

If Target.Value <> "" Then
Target.Offset(0, -1) = Target.Row - 6
Me.Range("A7:A" & Cells(Rows.Count, "A").End(xlUp).Row).ClearContents
Else
Target.Offset(0, -1).ClearContents
End If
End Sub

B hücresine veri girişi yapılıp hücreden çıkış yapınca "Run time error 1004 Ne yazikki bu işlemi birleştirilmiş bir hücrede yapamıyoruz" hatase veriyor


RE: Clearcontents Hatası - berduş - 19/04/2023

hangi hücreler bitişik


Re: Clearcontents Hatası - HORZUM - 19/04/2023

(19/04/2023, 16:26)berduş yazdı: hangi hücreler bitişik

A ve E arası ama satır bazen azalıyor bazen çoğalıyor


RE: Clearcontents Hatası - berduş - 19/04/2023

clearcontents birleşik hücrelerde kullanılamıyormuş demek ki
o zaman boş değer vermeyi deneyin