Çözüldü Sütundaki İfadeye Göre Sayfalara Aktarmak

imPRObable · 30 Haz 2018

Merhabalar Arkadaşlar,

Bir planlama formulu yapmak istiyorum Bu konuyla alakalıda söyle bir formule ihtiyacım var.

Örneğin;

ISIN ISMI

BASKI

KIRIM

PAKETLEME

Sayfa1 de oluşturduğum listeye göre sayfa2'de
Eğer Kırım varsa "ISIN ISMI" Sutununu buraya yaz gibi bi formule ihtiyacım var.
kafamda oluşturdum bu konuda bana yardımcı olabilcek var mı?

Murat OSMA · 30 Haz 2018

Merhaba hoş geldiniz..

Tabii ki yardımcı olmak isteriz.
Düşeyara ile yapılabilecek basit bir işlem gibi anlıyoruz fakat yine de örnek bir dosya eklerseniz onun üzerinden bir çözüm sunalım.

imPRObable · 30 Haz 2018

Teşekkür ederim.
EK'te kabaca taslak halinde belirtmeye çalıştım.
"IS LISTESI" çalışma sayfasında işin niteliklerin yazdıktan sonra "VAR" yazan nitelikleri kendi çalışma sayfasında sayfalarında sarı ile belirttiğim kısmın otomatik yazılmasını istiyorum. İnşallah anlatabilmişimdir.

Murat OSMA · 30 Haz 2018

Dosyanıza baktığımda Matbaa sektöründe çalıştığınızı düşünüyorum.
Şahsen ben de 10 yıl boyunca Fiyatlandırma Uzmanı ve Üretim Plânlama sorumlusu olarak çalıştım.
Her ne kadar 8 sene önce mesleği bıraksam da matbaa ile ilgili birçok konuya hâkimim.
Zamanında matbaa ile hazırladığım birçok program da mevcut.
Hatta bu destek almak istediğiniz konu ile ilgili aynı mantığı da bir Üretim Takip programımda hazırlamıştım..

Excel Arşivi Arama - Excel Arşivi buradaki arama kutucuğuna matbaa yazıp bakabilirsiniz.
Özellikle de bu program sizin istediğinizden çok daha fazlasını verecektir. Matbaa Üretim Takip Stok Programı - Excel Arşivi

Burada Sayfa2'de şu sütunları göreceksiniz.

Burada sizde de olduğu gibi Var yazıyor.
Hangi iş sürecinde Var yazıyorsa o iş süreci ile ilgili sayfada da o işe ait özellikler yer almakta.

imPRObable · 30 Haz 2018

Siteye üye olup programı indirmiştim.Gerçekten cok kapsamlı bir program
Fakat şuan kendi yazılımı yazdırıyor şirket geçiş sürecinde geçici olarak takip işini yapacağım benimde çok detaylandırmadan söylediğim şekilde yapsam işimi görüyor..
Kabaca bahsettiğim şekilde formulize etmeniz mümkün mü

Murat OSMA · 30 Haz 2018

Peki

Gün içinde hazırlayıp gönderirim.

imPRObable · 30 Haz 2018

Teşekkürler

Admin' Alıntı:
Peki
Gün içinde hazırlayıp gönderirim.

Murat OSMA · 30 Haz 2018

Bu kodları kullanabilirsiniz.

PHP:

Sub ExcelTurkey()
    Dim i&, a&, son&, sayfa$
    For i = 3 To Sayfa1.Range("A65536").End(3).Row
        For a = 5 To Sayfa1.Cells(i, Columns.Count).End(1).Column
            If Sayfa1.Cells(i, a).Value = "VAR" Then
                sayfa = Sayfa1.Cells(2, a).Value
                son = Sheets(sayfa).Range("A65536").End(3).Row + 1
                Sheets(sayfa).Range("A" & son).Resize(, 4).Value = Sayfa1.Range("A" & i & ":D" & i).Value
                Sheets(sayfa).Columns.AutoFit
            End If
        Next a
    Next i
    sayfa = vbNullString: son = Empty: a = Empty: i = Empty
End Sub

Dosyayı da ek'ten indirebilirsiniz.

imPRObable · 30 Haz 2018

Ellerinize sağlık teşekkürler

Murat OSMA · 30 Haz 2018

Rica ederim, iyi günler. ?

Çözüldü Sütundaki İfadeye Göre Sayfalara Aktarmak

Daha fazla seçenek

imPRObable

Murat OSMA

imPRObable

Ekli dosyalar

Murat OSMA

imPRObable

Murat OSMA

imPRObable

Murat OSMA

Ekli dosyalar

imPRObable

Murat OSMA