Forma Takip

[hanmax]

Arkadaşlar ekteki dosyada;
Yapamadığım benim için zor belki sizin için kolay olan bazı problemler var yardımcı olabilirseniz çok sevinirim.

1- Anasayfada "siparişleri getir" butonuna bastığımda süzülen verilerin sayfa2 ye taşınıp yazdırmak için hazır hale gelmesi
2- Örn: sayfa3 deki şablonda d sütunundaki verilerden birisini (Beden) seçtiğimde şablonda bulunan G sütunundan yazdığım adet kadar çıkarması veya eklemesi

Bu mümkünmüdür ?

 

[hanmax]

Konu hakkında yardımcı olabiliecek varmı acaba ?

 

[hanmax]

Son kez güncell

 

[hanmax]

bu konuda yardımcı olabilecek bir kişi bir üstad yok mu acaba ?

 

[hanmax]

Başka öneri var ise onu da yapabiliriz arkadaşlar ?

 

[Mahir64]

Merhaba

Private Sub CommandButton1_Click()
Dim s1 As Worksheet

Set s1 = ThisWorkbook.Worksheets("ANA SAYFA")
Set s2 = ThisWorkbook.Worksheets("Sipariş YAZDIR")

s2.Range("A2:ı" & s2.Rows.Count).Clear

Z = s1.Range("A" & s1.Rows.Count).End(xlUp).Row

s1.Range("A2:A" & Z).SpecialCells(xlCellTypeVisible).Copy
s2.Paste s2.Range("a2")

s1.Range("c2:c" & Z).SpecialCells(xlCellTypeVisible).Copy
s2.Paste s2.Range("b2")

s1.Range("h2:h" & Z).SpecialCells(xlCellTypeVisible).Copy
s2.Paste s2.Range("c2")

Application.CutCopyMode = False
s2.Select

Z = s2.Range("B" & s1.Rows.Count).End(xlUp).Row
's2.Range("A2:A" & Z).FormulaLocal = "=ROW()-14"

End Sub

 

[hanmax]

Black Lord teşekkür ederim süper olmuş.
1 nci sorum halloldu.

Arkadaşlar 2 nci sorum için bir yanıtı olan veya önerisi olan varmıdır acaba?

Dosyayı güncelledim arkadaslar şimdi sadece 2 nci soru kaldı o da biterse süper olacak.

 

[Mahir64]

Black Lord teşekkür ederim süper olmuş.
1 nci sorum halloldu.

Arkadaşlar 2 nci sorum için bir yanıtı olan veya önerisi olan varmıdır acaba?

Dosyayı güncelledim arkadaslar şimdi sadece 2 nci soru kaldı o da biterse süper olacak.

Kolay gelsin

 

[Mahir64]

Merhaba
2.sorunuz için dosya üzerinde açıklama yapsanız.Sayfa3 demişsiniz grünürse sayfa3 yok

 

[hanmax]

Sayfa3 derken "GİRİŞİMSEL ALANLAR BAYAN" oradaki sayfayı kastetmiştim.Kusura bakmayın

İlgili dosyaya yazıp ekleme yaptım
Teşekkürler
Eğer sizin başka öneriniz var ise yani başka yolla istediğim işlemi yapabilirsek onu da yapabilirsiniz

 

[Mahir64]

Sayfa3 derken "GİRİŞİMSEL ALANLAR BAYAN" oradaki sayfayı kastetmiştim.Kusura bakmayın

İlgili dosyaya yazıp ekleme yaptım
Teşekkürler
Eğer sizin başka öneriniz var ise yani başka yolla istediğim işlemi yapabilirsek onu da yapabilirsiniz

Açıklamadan hiç bir şey anlamadım. Neyi neye bağlayacaksınız ne olacak?
Karışmış biraz.
Siz yapılacak işi biliyorsunuz ona göre açıklama yapmışsınız. Sorunu çözmeye çalışan arkadaşlar konuya hakim değil. Onun için sade açıklama yaparsanız anlaşılır olacaktır.

 

[hanmax]

Haklısınız.
Kusura bakmayın.
Ekteki dosyayı tekrar güncelledim.

 

[Mahir64]

Haklısınız.
Kusura bakmayın.
Ekteki dosyayı tekrar güncelledim.

Merhaba
Eki İnceleyin.Anlaığım bu.

 

[hanmax]

BlackLord siz süpersiniz ne kadar teşekkür etsem azdır.
Yani tam anlattığım gibi.
Şimdi birkaç şey daha sorucam sadece formulüde yazsanız olur. Sanırım ben yapabilirim.

1. Girişimsel Alanlar Bayan sayfasında Çıkışın yaptığımız sistemi Girişe de yapabilir miyiz? Yani girişe sayı yazdığımda çıkışın tam tersini yapacak stok daki sayıyı artı yapacak sadece fark bu.

2. Diğer sayfaları silmişsiniz ben diğer gruplarıda sayfa açıcam excelde kaydetde bir problem yaşarmıyım.

3. Bu dosya bende çok yavaş açılıyor bunun bir sebebi var mıdır?

Yani inanın birçok depoda bu örnek dosyanın işine yarayacağına inanıyorum.

Şimdiden teşekkürler

 

[Mahir64]

BlackLord siz süpersiniz ne kadar teşekkür etsem azdır.
Yani tam anlattığım gibi.
Şimdi birkaç şey daha sorucam sadece formulüde yazsanız olur. Sanırım ben yapabilirim.

1. Girişimsel Alanlar Bayan sayfasında Çıkışın yaptığımız sistemi Girişe de yapabilir miyiz? Yani girişe sayı yazdığımda çıkışın tam tersini yapacak stok daki sayıyı artı yapacak sadece fark bu.

2. Diğer sayfaları silmişsiniz ben diğer gruplarıda sayfa açıcam excelde kaydetde bir problem yaşarmıyım.

3. Bu dosya bende çok yavaş açılıyor bunun bir sebebi var mıdır?

Yani inanın birçok depoda bu örnek dosyanın işine yarayacağına inanıyorum.

Şimdiden teşekkürler

Merhaba
İğer sayfaları silme nedenim dosya boyutunu düşürmekti.
Bu dosya örnek geliştirmesi size kalıyor

#Burdan indirin

 

[hanmax]

BlacLord herşey için teşekkür ederim.
Geri kalan ufak tefek ayarları ben yaparım.
Tekrar teşekkürler size,yöneticelere forumda yardım edenlere .....

 

[Mahir64]

BlacLord herşey için teşekkür ederim.
Geri kalan ufak tefek ayarları ben yaparım.
Tekrar teşekkürler size,yöneticelere forumda yardım edenlere .....

Rica ederim
Kolay gelsin.