AccessTr.neT
Excele Gönderilen Takvimin Hafta Sonu Kısımlarını Renkli Yapmak - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Excele Gönderilen Takvimin Hafta Sonu Kısımlarını Renkli Yapmak (/konu-excele-gonderilen-takvimin-hafta-sonu-kisimlarini-renkli-yapmak.html)

Sayfalar: 1 2 3 4 5


RE: Excele Gönderilen Takvimin Hafta Sonu Kısımlarını Renkli Yapmak - SeferŞANLI - 27/11/2021

Burda sorun sadece A hücresine göre son satırı buluyor. Müdür onay kısmını bulduramadım. Birleştirilmiş hücre olduğu için.


RE: Excele Gönderilen Takvimin Hafta Sonu Kısımlarını Renkli Yapmak - SeferŞANLI - 27/11/2021

son = Cells.Find("*", Range("A1"), , , xlByRows, xlPrevious).Address
Range("a9", son).Select
Range("a9", son).EntireRow.Delete

hocam bu kot excelde çalışıyor ama aceess ten evele gönderme butonunda hata veriyor.


RE: Excele Gönderilen Takvimin Hafta Sonu Kısımlarını Renkli Yapmak - berduş - 27/11/2021

sefer bey amacınız ne?
bu Excel dosyası ne işe yarayacak sadece yazıcı cıktısı almak için se neden rapor olarak hazırlamıyorsunuz?
bu Excel dosyasına verilerinizi aktardıktan sonra bu dosya ne olacak? eklenen sayfa bu dosyaya mı kaydedilecek yoksa bu dosya farklı bir adla mı kaydedilecek?
toplunbt dosyasında her zaman tek sayfa mı olacak?


Re: Excele Gönderilen Takvimin Hafta Sonu Kısımlarını Renkli Yapmak - SeferŞANLI - 27/11/2021

Sayın Berduş. Biz bu çalışmayı daha önce sizlerin desteğiyle yapmıştım. Bir takım eksiklikleri var. Excele göndermemdeki kasıt rapora müdahele edilecek husularda, düzenlemelerde kolaylık olması. Aslında neticeye nerdeyse ulaştım. Sadece aşağıdaki kodda önceki verilerin silinerek yeniden yazılmasını sağlamak istedim. Excelde çalışan kod buton olayında hata verdi.  Buna çözüm arıyorum.
son = Cells.Find("*", Range("A1"), , , xlByRows, xlPrevious).Address
Range("a9", son).Select
Range("a9", son).EntireRow.Delete

* Birşeyleri öğrenmek için çalışıyorum.
* Evet raporunu Access de yaptım
* Raporun onayla birlikte bir sayfaya sığması yerinde olur. Zaten maksimum 20 personel nöbet tutuyor. Bu kapsamda başlık, liste,onay ve açıklamaların bir sayfaya sığması fadalı olur.

Çalışmamım son halinide ekliyorum. İnşallah formda bilgi kirliliğine yol açmamışımdır.


RE: Excele Gönderilen Takvimin Hafta Sonu Kısımlarını Renkli Yapmak - berduş - 28/11/2021

aşağıdaki çalışmayı inceler misiniz?

bu çalışma sadece excele aktarmayla ilgili
eklediğiniz rapor kısmını inceleme imkanım olmadı


RE: Excele Gönderilen Takvimin Hafta Sonu Kısımlarını Renkli Yapmak - lemoncher2 - 28/11/2021

Acaba yapmak istediğiniz bu mu emin olamadım. Bu kodu denermisin.

Kod:
Excl.Range("A2:I3000").ClearContents