ana sayfaya girilen isimlerin diğer sayfalara otomatik eklenmesi

[kayanedim1]

Merhaba arkadaşlar

istediğim şey mümkün müdür? bilmiyorum.
Müşterilerimizden gelen siparişleri müşteri adı ve poroje adı olarak alt alta liste halinde excele yazıyoruz.
Örnegin 3. sıradaki müşterim A firması olsun.
2gun sonra tekrar A firmasından sipariş geldiğinde, diğer firmalardanda arada sipariş geldiği için, bu sefer 15. sırada oluyor.
ben baska bir sayfada
sedace A firmasının siparişlerini görebilirmiyim.
yani karısık olan listeye ben firma adı A olarak girdiğimde bu sayfaya yazdıgım proje adını otomatık olarak A firması için acılan diger sayfaya ekleyebilir mi?

Biraz karışık oldu ama; umarım sorum anlaşılmıştır.

Cevaplarınız için şimdiden teşekkür ediyorum.

saygılarımla.
Nedim KAYA

 

[ssazman]

Merhaba arkadaşlar

istediğim şey mümkün müdür? bilmiyorum.
Müşterilerimizden gelen siparişleri müşteri adı ve poroje adı olarak alt alta liste halinde excele yazıyoruz.
Örnegin 3. sıradaki müşterim A firması olsun.
2gun sonra tekrar A firmasından sipariş geldiğinde, diğer firmalardanda arada sipariş geldiği için, bu sefer 15. sırada oluyor.
ben baska bir sayfada
sedace A firmasının siparişlerini görebilirmiyim.
yani karısık olan listeye ben firma adı A olarak girdiğimde bu sayfaya yazdıgım proje adını otomatık olarak A firması için acılan diger sayfaya ekleyebilir mi?

Biraz karışık oldu ama; umarım sorum anlaşılmıştır.

Cevaplarınız için şimdiden teşekkür ediyorum.

saygılarımla.
Nedim KAYA

Örnek bir dosya ile açıklama yaparsanız daha kolay yardım alabilirisiniz. Lütfen örnek bir dosya içeriisnde nasıl bir şey istediğinizi belirtin.

 

[kayanedim1]

Merhaba
öncelikle cevap yazdığınız için teşekkür ederim.
örnek bir sayfa göndericem.

İyi günler

 

[kayanedim1]

ana sayfadan diğer sayfalara otomatik yerleştirme

Merhaba
ekte örnek çalışma gönderdim.
tunclar firmasından gelen siparişleri ve diğer firmalardan gelen siparişleri ben ana sayfaya karışık olarak sipariş sırasına göre yazıyorum.
İstediğim ana sayfaya yazdıgım tunclar firmasının siparişlerini tunclar sayfasına otomatik geçmesi.
Ben ana sayfaya karısık yazıcam ama her firma için açtıgım sayfalara otomatik olarak eklenecek.

Bu konuda bilgisi olan varsa lütfen cevap yazsın.

İyi günler.

 

[İhsan Tank]

Merhaba
ekte örnek çalışma gönderdim.
tunclar firmasından gelen siparişleri ve diğer firmalardan gelen siparişleri ben ana sayfaya karışık olarak sipariş sırasına göre yazıyorum.
İstediğim ana sayfaya yazdıgım tunclar firmasının siparişlerini tunclar sayfasına otomatik geçmesi.
Ben ana sayfaya karısık yazıcam ama her firma için açtıgım sayfalara otomatik olarak eklenecek.

Bu konuda bilgisi olan varsa lütfen cevap yazsın.

İyi günler.

merhaba
kitabınızın kod bölümünde bulunan Thisworkbook bölümüne

Option Explicit
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
If ActiveSheet.Name <> "ana sayfa" Then
Dim ts, kaplan, trabzonspor
trabzonspor = MsgBox(ActiveSheet.Name & " Verilerini Aktarıyorum", vbYesNo, "Onay")
If trabzonspor = vbNo Then Exit Sub
kaplan = 4
Range("A4:G65536").ClearContents
For ts = 4 To Sheets("ana sayfa").Cells(65536, "B").End(xlUp).Row
If Sheets("ana sayfa").Cells(ts, "B") = ActiveSheet.Name Then
Cells(kaplan, "A") = Sheets("ana sayfa").Cells(ts, "A")
Cells(kaplan, "B") = Sheets("ana sayfa").Cells(ts, "B")
Cells(kaplan, "C") = Sheets("ana sayfa").Cells(ts, "C")
Cells(kaplan, "D") = Sheets("ana sayfa").Cells(ts, "D")
Cells(kaplan, "E") = Sheets("ana sayfa").Cells(ts, "E")
Cells(kaplan, "F") = Sheets("ana sayfa").Cells(ts, "F")
Cells(kaplan, "G") = Sheets("ana sayfa").Cells(ts, "G")
kaplan = kaplan + 1
End If
Next
MsgBox ActiveSheet.Name & " Verileri Aktardım", vbInformation, "Bitiş"
End If
End Sub

bu kod'u kopyalayın ve diğer sayfalara geçerek deneyiniz

 

[kayanedim1]

ana sayfadan diger sayfalara otomatik geçiş

Merhaba
Çok teşekkür ediyorum.
beni büyük bir zahmetten kurtardınız.
Tekrar teşekkürler İhsan Hocam.

 

[İhsan Tank]

Merhaba
Çok teşekkür ediyorum.
beni büyük bir zahmetten kurtardınız.
Tekrar teşekkürler İhsan Hocam.

rica ederim
:yazici:

 

[asdfwqrx]

verdiğiniz bilgiler için sağolun, bende böyle bişey arıyordum....

 

[kayanedim1]

Merhaba İhsan hocam

Merhaba

İhsan bey. bu yazdıgınız makroyu ben de yazabilmek istesem.
nasıl öğrenebilirim.
buna benzer işleri kendim yapabilmek için hangi kaynaklardan faydalanabilirim.

teşekkürler.

 

[İhsan Tank]

Merhaba

İhsan bey. bu yazdıgınız makroyu ben de yazabilmek istesem.
nasıl öğrenebilirim.
buna benzer işleri kendim yapabilmek için hangi kaynaklardan faydalanabilirim.

teşekkürler.

öncelikle verilen kodları dosyalarda deneyin ve adım adım izleyin. mesela bir kod'u denemek için kodu kopyalayın ve f8 tuşu ile kod'un ne işlem yaptığını çözersiniz.

verdiğiniz bilgiler için sağolun, bende böyle bişey arıyordum....

rica ederim
:yazici: