pivot table değişken sorunu

[van_65166]

Merhaba

Aşağıdaki vba kodunda tarih kısmını değişken yapma imkanımız varmı yardımlarınızı rica ederim

ActiveSheet.PivotTables("PivotTable1").PivotFields("Yaratma tarihi"). _
PivotFilters.Add2 Type:=xlBefore, Value1:="20.01.2025"


ÖRNEK DOSYA

TEST KİTAP.xlsm

drive.google.com

 

[muhasebeciyiz]

Sub FilterPivotByDate()
Dim tarih As Date
On Error Resume Next

tarih = CDate(Range("A1").Value)
On Error GoTo 0

If IsDate(tarih) Then
With ActiveSheet.PivotTables("PivotTable1").PivotFields("Yaratma tarihi")
.ClearAllFilters
.PivotFilters.Add2 Type:=xlBefore, Value1:=tarih
End With
Else
MsgBox "Hata: Geçerli bir tarih değil.", vbCritical
End If
End Sub

Eğer sorun devam ederse, Pivot Table adı veya pivot alan adıyla ilgili başka sorunlar olabilir. Kontrol etmek için farklı bir alanla veya tablo adıyla denebilirsiniz.

 

[van_65166]

Dim tarih As Date
tarih = Range("A1").Value

ActiveSheet.PivotTables("PivotTable1").PivotFields("Yaratma tarihi"). _
PivotFilters.Add2 Type:=xlBefore, Value1:=tarih

tarih değerini bir hücreden almayı planlıyorsanız, örneğin A1 hücresinden, şu şekilde yapabilirsiniz:

run-time eror 1004
bu tarih geçerli değil

ActiveSheet.PivotTables("PivotTable1").PivotFields("Yaratma tarihi"). _
PivotFilters.Add2 Type:=xlBefore, Value1:=tarih

hata verdi

 

[muhasebeciyiz]

2 nolu mesajı tekrar düzenledim Kontrol ediniz

Runtime Error 1004 hatası genellikle hücrenin doğru tarih formatında olup olmamasından kaynaklanır.

A1 hücresindeki değerin geçerli bir tarih olup olmadığını kontrol eder ve bu değeri bir tarih olarak ayarlamaya çalışır. Eğer geçerli bir tarih değilse, bir hata mesajı gösterir. Bu şekilde hataları önleyebiliriz.

Ayrıca DateValue fonksiyonu, hücredeki değeri geçerli bir tarih olarak dönüştürmeye çalışır ve hücredeki değerin doğru bir tarih formatında girildiğinden emin olur.

Bu yöntemle, pivot tablo filtrelemeyi geçerli bir tarihle gerçekleştirebilmelisiniz

 

[van_65166]

2 nolu mesajı tekrar düzenledim Kontrol ediniz

Runtime Error 1004 hatası genellikle hücrenin doğru tarih formatında olup olmamasından kaynaklanır.

A1 hücresindeki değerin geçerli bir tarih olup olmadığını kontrol eder ve bu değeri bir tarih olarak ayarlamaya çalışır. Eğer geçerli bir tarih değilse, bir hata mesajı gösterir. Bu şekilde hataları önleyebiliriz.

Ayrıca DateValue fonksiyonu, hücredeki değeri geçerli bir tarih olarak dönüştürmeye çalışır ve hücredeki değerin doğru bir tarih formatında girildiğinden emin olur.

Bu yöntemle, pivot tablo filtrelemeyi geçerli bir tarihle gerçekleştirebilmelisiniz

Merhaba

öncelikle yardımlarınız için teşekkürler
değişken veriyi tarih biçiminde alıyor fakat aynı hatayı sürekli veriyor
sorun çözülmedi

 

[muhasebeciyiz]

2 nolu mesajı tekrar düzenledim Kontrol ediniz

Hücre 'A1'deki tarih biçiminin doğru olduğundan emin olun ve biçimi açık bir tarih formatında tutun (örneğin, "dd/mm/yyyy").
tarih değişkeni, Pivot Tablosu için doğru bir tür olarak algılanmazsa sorun yaşanabilir. tarih formatını manuel olarak ayarlamayı deneyelim.

CDate fonksiyonu, tarih değerini manuel olarak tarih formatına çevirmek için kullanılır. Bu değişiklikler, değerlerin daha doğru bir biçimde çevrilmesine ve hataların önlenmesine yardımcı olabilir.Şimdi kodunuzu tekrar çalıştırmayı deneyebilirsiniz. Sorun devam ederse, Pivot Table adı veya alan adı ile ilgili başka bir yanlışlık olabilir. Pivot Table ve tarih alanı adlarının doğru olduğundan emin olun.

 

[van_65166]

2 nolu mesajı tekrar düzenledim Kontrol ediniz

Hücre 'A1'deki tarih biçiminin doğru olduğundan emin olun ve biçimi açık bir tarih formatında tutun (örneğin, "dd/mm/yyyy").
tarih değişkeni, Pivot Tablosu için doğru bir tür olarak algılanmazsa sorun yaşanabilir. tarih formatını manuel olarak ayarlamayı deneyelim.

CDate fonksiyonu, tarih değerini manuel olarak tarih formatına çevirmek için kullanılır. Bu değişiklikler, değerlerin daha doğru bir biçimde çevrilmesine ve hataların önlenmesine yardımcı olabilir.Şimdi kodunuzu tekrar çalıştırmayı deneyebilirsiniz. Sorun devam ederse, Pivot Table adı veya alan adı ile ilgili başka bir yanlışlık olabilir. Pivot Table ve tarih alanı adlarının doğru olduğundan emin olun.

merhaba

sizi çok yordum kusura bakmayın ama olmuyor

 

[muhasebeciyiz]

Pivot tablo ve Excel VBA'daki tarih işlemleri bazen beklenmedik sorunlara yol açabilir.

Tarih Biçim Kontrolü: Hücre 'A1'deki değerin gerçekten tarih formatında olduğundan emin olun. Örneğin, "28/01/2025" gibi olması lazım.

Bölge ve Dil Ayarları: Excel'in tarih formatlarının, bilgisayarınızın bölgesel ayarlarına uygun olup olmadığını kontrol edin. Türkiye'de bu genellikle "dd/mm/yyyy" formatında olur.

Hücre Formatı Değişimi: M-c++-e pivot alan adının Unicode karakterlere uygun olup olmadığını kontrol edin. Bunu bazen manuel olarak ayarlamak gerekebilir. Manual Date Parsing tekniğini denemek önemli olabilir. Ayrıca, tarihi manuel olarak ayarlamada kullanılan CDate fonksiyonu, belirtilen hücredeki verinin tarih olduğundan emin olmak için kullanılan uygun bir fonksiyondur.

 

[van_65166]

Tekrar denermisiniz

Hocam yine olmadı