Yemek Puantajını Ay Yılla İlgili Kitaba Aktarma

Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

sedat2161

Kullanıcı
Katkı: %1
Excel Versiyonu
Excel 2016
Excel Sürümü
64 Bit
Excel Dili
Türkçe
Ekli dosyamda bulunan Puantaj sayfasını AP4 te bulunan yıl ve AP5 te bulunan aya göre D sürücüsünde bulunan YEMEK adlı klasör içindeki ilgili yıla ait excel dosyasına aynı şekilde puantaj 1 sayfasını da aktarmak istiyorum yardımlarınızı bekliyorum.
 

Ekli dosyalar

Çözüm
ExcelDepo

ExcelDepo

Merhaba, aşağıdaki makroyu çalışma kitabında yeni bir modüle yapıştırıp bir düğmeye bağlayabilirsiniz. Puantaj ve Puantaj 1 sayfaları, AP4'teki yıla ait dosyaya AP5'teki ay adıyla aktarılır.

Kod:
Bu kodu görmek için giriş yapmanız gerekmektedir (11 satır). Giriş Yap
Tarihe göre sırala Oylamaya göre sırala
@sedat2161

Keşke bir adet de içerisine sayfanın kopyalanacağı belgenin örneğini ekleyip,
bu belge kapalıyken özelliklerini görüntüleyip TAM YOL ve DOSYA ADI (uzantı dahil) bilgisini paylaşsaydınız.
Dosyanın tam adı ve yol bilgisi önemli (örneğin ay isimleri nasıldır, metin mi sayı mı, büyük harf mi küçük harf mi gibi
net bilgiler olursa çözüm yolunda mesafe alınması kolaylaşır.
Aktarma işlemi için asıl belgeye eklenecek bir düğme mi kullanılacak?
Ayrıca diyelim aktarma yapıldı ve sonra aktarma düğmesine bilerek veya hataen tekrar tıklandı.
Bu durumda yapılacak işlem nedir? Yeni sayfa ismiyle tekrar aktarma mı yapılacak yoksa zaten aktarıldı denilip işlemden vaz mı geçilecek vs.

Biraz daha bilgiye ihtiyaç olduğunu düşünüyorum.

.
 
Oyla 0 Olumsuz oyla
Merhaba, aşağıdaki makroyu çalışma kitabında yeni bir modüle yapıştırıp bir düğmeye bağlayabilirsiniz. Puantaj ve Puantaj 1 sayfaları, AP4'teki yıla ait dosyaya AP5'teki ay adıyla aktarılır.

Kod:
Bu kodu görmek için giriş yapmanız gerekmektedir (78 satır). Giriş Yap

Makro nasıl çalışır?
  1. Yılı AP4'ten, ayı AP5'ten okur; biri boşsa veya D:\YEMEK klasörü yoksa uyarı verip durur.
  2. D:\YEMEK\2021.xlsx gibi yıla ait dosyayı açar; dosya yoksa oluşturur.
  3. Puantaj sayfasını AP5'teki ay adıyla, Puantaj 1 sayfasını ay adının sonuna 1 eklenerek bu dosyaya kopyalar; AP5'te TEMMUZ yazıyorsa sayfalar TEMMUZ ve TEMMUZ 1 olur.
  4. Kopyalardaki formülleri değere çevirir, düğme, açılır liste ve resim dahil tüm şekilleri siler, kaynak dosyaya kalan bağlantıları koparır.
  5. Dosyayı kaydedip kapatır ve sonucu mesajla bildirir.

Notlar
  • Aynı ay yeniden aktarılırsa o ayın eski sayfaları yenileriyle değiştirilir.
  • Yıllık dosyalarınızın adı "2021.xlsx" biçiminde değilse yol satırındaki adı ve uzantıyı kendi dosyanıza göre değiştirmeniz gerekir. Uzantı .xls ise SaveAs satırındaki xlOpenXMLWorkbook yerine xlExcel8 yazılmalıdır.
  • Makro, bulunduğu kitabın Puantaj sayfalarını kopyaladığı için bu kitaba yapıştırılmalıdır; kitabın da makroları saklayan .xls veya .xlsm biçiminde kaydedilmesi gerekir.
  • Aktarım sırasında hata oluşursa yıllık dosya kaydedilmeden kapatılır ve hata mesajı gösterilir.
 
Oyla 0 Olumsuz oyla
Çözüm
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

Benzer konular Benzer kaynaklar Benzer dosyalar

Geri
Üst