Merhaba arkadaşlar,
küçük bir problemim var yardımınıza ihtiyacım olacak..
benim 2 adet textboxum var texbox17 ve textbox143 , textbox17 stok sayfasından düşeyara ile stok adlarını veri olarak alıyor. textbox 143 e ise manuel metre miktarı giriyorum. yapmak istediğim:
bir command button1 aracılığı ile textbox143 e girilen veriyi bir katsayıya bölmek(bu katsayıyı da düşeyara ile sayfadan alıyor) , cıkan katsayıyı küsüratı ne olursa olsun yukarı yuvarlamak, yukarı yuvarlayark bulduğum rakamı da yine düşeyara ile bulduğu katsayı ile çarptırmak..
aşağıdaki kodu denedim ancak yukarı yuvarlama kodunu bilmediğim için textbox143 e girilen veriyi tekrar bana veriyor..
böldükten sonra çıkan sayıyı yukarı yuvarlatıp çarpım işlemini öyle yapmalıyım?
küçük bir problemim var yardımınıza ihtiyacım olacak..
benim 2 adet textboxum var texbox17 ve textbox143 , textbox17 stok sayfasından düşeyara ile stok adlarını veri olarak alıyor. textbox 143 e ise manuel metre miktarı giriyorum. yapmak istediğim:
bir command button1 aracılığı ile textbox143 e girilen veriyi bir katsayıya bölmek(bu katsayıyı da düşeyara ile sayfadan alıyor) , cıkan katsayıyı küsüratı ne olursa olsun yukarı yuvarlamak, yukarı yuvarlayark bulduğum rakamı da yine düşeyara ile bulduğu katsayı ile çarptırmak..
aşağıdaki kodu denedim ancak yukarı yuvarlama kodunu bilmediğim için textbox143 e girilen veriyi tekrar bana veriyor..
Kod:
Private Sub CommandButton1_Click()
TextBox143 = (TextBox143) / (Sheets("STOK").Cells(Sheets("STOK").[b2:b65536].Find(TextBox17.Value).Row, 6).Value) * (Sheets("STOK").Cells(Sheets("STOK").[b2:b65536].Find(TextBox17.Value).Row, 6).Value)