caption buton sıkıntısı

[soner39]

merhaba arkadaşlar hızlı satış programı yapmak istiyorum.butona bastıkça başka bir sayfadan ürün adı-- ücret-- miktar fiyat kısmını alıp hesaplayıp hücreye toplam olarak yazacak
dim ws as worksheet
set ws=sheets("urun")
dim ara as string
dim urunTablo=ws.Range("A:B")
ara=btnBoya.caption
sayfa1.Range("B22")=urunTablo=uruntablo.find(ara, , ,xlwhole).offset(,0)
sayfa1.Range("C22")=urunTablo=uruntablo.find(ara, , ,xlwhole).offset(,1)
sayfa1.Range("D22")=1
sayfa1.range("E22")=urunTablo.find(ara, , ,xlwhole).offset(,1)
toplam
rows(22).ınsert
set ws=nothing
set urunTablo=nothing

CAPTİON BUTONUN içine yazılan kodlar bu şekilde 52 adet butonum olacak butonlara bastıkça diğer sayfalardan bilgileri alıp hesaplamasını yapacak butonları çoğaltıp içindeki kodları kopyala yapıştır yaparak butonların içine atıyorum ilk iki buton çalışıyor fakat 3. butondan sonra (RUN TİME ERROR 91--OBJECT VARİABLE OR WİTH BLOCK VARİABLE NOT SET) HATASI ALIYORUM yardımcı olur musunuz arkadaşlar....

 

[Necdet]

Mernhaba,
Paylaşım sitelerinden (dosya.tc, dosya.co vs) birine örnek dosyanızı eklerseniz, çözüme daha hızlı ulaşırsınız.

sayfa1.Range("B22")=urunTablo=uruntablo.find(ara, , ,xlwhole).offset(,0)

böyle bir kullanım hiç görmedim, duymadım.

 

[Muzaffer Ali]

Dosyanızı paylaşıp ne yapmak istediğinizi tam olarak dosya üzerinde açıklarsanız bir sürü buton eklemek yerine daha basit bir yöntem bulunabilir.

 

[soner39]

Mernhaba,
Paylaşım sitelerinden (dosya.tc, dosya.co vs) birine örnek dosyanızı eklerseniz, çözüme daha hızlı ulaşırsınız.

sayfa1.Range("B22")=urunTablo=uruntablo.find(ara, , ,xlwhole).offset(,0)

böyle bir kullanım hiç görmedim, duymadım.

şöyle söyleyeyim hediyelik eşya mağazam olacak fiyatları gireceğim 1 seferlik butonlarla hızlı satış yaptıracağım..yaptırdıgım satışları günlük olarak kaydedecek ve ürünlrin stoğunu tutacak..ne satıyorsam hepsine özel butonum olacak.bastıkça kasayı arttıracak stoktan satılan ürünü düşecek ve kaydetme yapacak..

 

[soner39]

Dosyanızı paylaşıp ne yapmak istediğinizi tam olarak dosya üzerinde açıklarsanız bir sürü buton eklemek yerine daha basit bir yöntem bulunabilir.

fazla buton eklememin sebebi satışın hızlı olması yani zaman önemli sadece mouse la işlem yapmak
dosya.co da paylaştım
soner39 hesabı
sonercakar39@gmail.com

 

[soner39]

dosya.co da paylaştım
soner39 hesabım
sonercakar39@gmail.com
dediğim gibi hızlı satış yaptırmak istiyorum butonlarla
satış sayfasında butona basıldıgında basılan butonun fiyatını ayrı bir sayfadan alacak satış sayfasında gösterip kasaya ekleyecek ayrı bir sayfaya
günlük yapılan satışı ve kalan stok miktarını gösterecek

 

[Muzaffer Ali]

Paylaştığınız dosyanın indirme linkini burada paylaşmalısınız.

 

[soner39]

İndir hızlı satış

Dosyayı indir hızlı satış

dosya.co