...b(2, z.Item(aranan)) * 1 + a(i, 5) * 1 ' E sütununu işaret edecek şekilde güncellendi
End If
End If
Next i
sh.Range("H1").Value = "STOK ADI"
sh.Range("I1").Value = "SATIŞ KG"
sh.Range("H2:I" & sh.Rows.Count).ClearContents
sh.Range("H2:I" & sh.Rows.Count).Borders.LineStyle =...
...= IkinciArray(i, j)
Next i
Next j
arrbirlestir2d = arrbirlestir
End Function
Değerli hocaalarım iki array birleştirdiğim bir kod mevcut benim yapmak istediğim şu stok numarası aynı ve seri numarası olmayan yani (-) olan değerleri (Miktarını ) birleştirilmiş bir array...
Merhaba, Bir haftadır video izliyorum ancak bulamadım cevabımı.
Excel dosyamda ürünlerin bulunduğu Stok adında bir sayfam var ve proje1, proje2,... adlarında projelerim var.
Projeler sayfasına düşeyara ile ürünlerin bulunduğu sayfadan verilerimi getiriyorum eğer o ürün projeme giriş yaptıysa c...
Selamlar,
Bir stok listesine ait A sütununda ürün kodu, B sütununda adet, C sütununda birim fiyat belirtildi. F1 hücresinde belirtilen toplam adet ve G1 hücresinde belirtilen toplam tutara göre listeden en uygun sipariş listesini oluşturulmasını istiyorum.
Yani istediği üründen istediği...
...+ F11) basarak açın üzerinde bulunan yeni bir modül içerisine yapıştırarak save edip çalıştırabilirsiniz. Kod, "urunler" tablosundaki verileri "urunler2" tablosuna aktaracaktır. Altında aynı stok koduna sahip olan satırların verileri eşleştirilecektir.
Bir dosya yüklemediğinizden deneme...
iyi çalışmalar atmış olduğum ana listede eğerki eşleşmeyen tarih stok numarası varsa ondan bir önceki(en yakın tarih)tarihih ve eşleşen stok numarasının birim fiyatını alsın yardımcı olursanız sevinirim..
17.11.2011
8415-27-000-8499
1
17.11.2012
8415-27-000-8499
2
17.11.2013...
vba => dediğinizi yükledim ama
Power Query =>dediğiniz kod parçasını nereye yazacağımı bilemedi.
size kolay bana zor , cahilliğimi mazur görün lütfen
yüklediğiniz dosyaları altın üye değilim indiremedim.
mümkünse dosya.tc ye yükleyebilirmisiniz.
teşekkür ederim elinize sağlık..
deneyiniz
https://s6.dosya.tc/server20/8vff24/STOK.xlsm.html
Bu arada uyuşmama sebebi :
ALAMA BUFE
ALAMA BÜFE
Bu şekilde farklı büfe olarak algılanabilir, tablonuzda gerekli elle duzeltmeleri yapmalısınız
Sn. cems
makro toplamlarında hatalar var , manuel topladıklarımda uyuşmadı,
ek olarak stok kodunu ilave edebilirmisiniz teşekkür ederim.
altta sonuçları karşılaştırdım, gerçi biraz karışık oldu :(
https://s6.dosya.tc/server20/7cw8fa/frm.png.html
https://s6.dosya.tc/server20/bowc8f/STOK.xlsm.html Dosyanız makro kod kabul etmesi için .xlsm ye dönüştürüldü ve bir çalıştır düğmesi elendi
Sub ToplamVeBenzersizIsimleriHesapla()
Dim ws As Worksheet
Dim lastRow As Long
Dim i As Long
Dim dict As Object
Dim key As...
selamlar arkadaşlar ,
excelde örnek dosyada ekledim.
https://s6.dosya.tc/server20/133wmt/STOK.xlsx.html
tabloda
A sutununda sayısal , B ve C de string , D de sayısal değerlerim var,
D sutunu 23 ise B sutunundaki isimleri baz alarak , A sutunundaki toplamlarını J sutununa , aynıi şekilde I...
Merhaba bir excel dosyası var
stok kodu ve fiyatı yazıyor sayfa1'de
sayfa 2'de karışık stok kodları ve yeni fiyatları yazıyor karşılaştırmak için
şu düşe yara formülünü kullanmayı deniyorum ama sonuca ulaşamıyorum
Nerede hata yapıyor olabilirim
=DÜŞEYARA(A2:B2;Sayfa2!A2:B2;2;YANLIŞ)
BAŞLANGIÇ AYI
BİTİŞ AYI
1
3
-1.781,50
GURUP
KODU
Stok Kodu
DÖNEM BAŞI
DÖNEM BAŞI
TUTAR
DÖNEM İÇİ
ALIŞ MİKTAR
DÖNEM İÇİ
ALIŞ TUTAR
TOPLAM MİKTAR
TOPLAM TUTAR
ORTALAMA
MALİYET
GURUP
satış...
Merhaba,
Verilerinizden çıkan sonuç bu. Geçmişten gelen bakiye yok ise, 153.01.001 kodlu ürün için Ocak ayında 75.000 alış, 83.823 satış görünüyor. Dolayısıyla Şubat ayı başındaki stok -8.823 olarak çıkıyor.
...tutarlara istinaden vermiş olduğum parametreye göre değişmesi gerekiyor. ÇOKETOPLA ile yapmaya çalıştım fakat yapamadım. Ekte bulunan dosyamda yeşil alan ile renklendirdiğim yere parametreleri girip.sarı alana ise parametrelere göre dönem başı stok miktarını getirmek istiyorum iyi çalışmalar
...Makro12()
On Error Resume Next
Set s1 = Sheets("ÜRÜNLER")
s1.Select
s1.[F2:F10000].ClearContents 'giren
Son = Cells(Rows.Count, "A").End(3).Row 'STOK KODU
With s1.Range("F2:F" & Son) 'GİREN
.FormulaLocal =...
Sizlere daha iyi bir deneyim sunabilmek icin sitemizde çerez konumlandırmaktayız, web sitemizi kullanmaya devam ettiğinizde çerezler ile toplanan kişisel verileriniz Veri Politikamız / Bilgilendirmelerimizde belirtilen amaçlar ve yöntemlerle mevzuatına uygun olarak kullanılacaktır.