Merhaba, Anlatımlarınız için tşk ederim. Örnekleri kendimde uyguladığımda F5 ile VBA'da açık iken excell'degösteriyor. Bunu VBA'yı açmadan excellde bu kodların çalışmasını nasıl sağlayabilirim? 1 Not: Dosya makro olarak kayıtlı. Selamlar.
üstat eyvallah allah razı olsun .b3 hücresinde hiç bir değer olmasaydı sonuç ne olurdu? if komutunu vlookup fonksiyonu ile kullanıyorum ancak aranacak değer hücresi boş olduğunda hata veriyor...bunu nasıl önleyebilirim.
Private Sub Hesapla_Click() Dim x As Double x = (TextBox3.Value) * 0.05 If CDbl(TextBox4.Value) < CDbl(TextBox3.Value) + x And CDbl(TextBox4.Value) > CDbl(TextBox3.Value) - x Then TextBox5.Value = "OK" Else TextBox5.Value = "NOK" End If End Sub Hocam merhaba, bu döngüyü çalıştırdığımda sürekli NOK Else e giriyor, ıf condition dogru olsa bile else basıyor.
hocam örnek olsun diye tuşlu hesap makinesi yapmaya çalışıyorum. 0 dan 9 akadar tuşları commonbutton ile oluşturdum ve üst tarafa textbox açtım. her tuşa bastığımda o tuşa atadığım numarayı textboxa yazdırıyorum. örneğin cmd1 butonuna bastığımda 1 yazıyor, cmd2 butonuna bastığımda 2 yazıyor. ancak 12 yazmak istediğimde bunu yapamadım. yani önce cmd1 butonuna basında 1, cmd2 butonuna basınca hemen yanına 2 yazmıyor. 1 i silip 2 yi yazıyor. bir öneriniz varmıdır, 12 yi nasıl yazdırırım
Mükemmel anlatım ve aşırı yardımcı oldu, teşekkürler
gayet net ifadelerle güzel bir anlatım yapmışsınız...
emeğinize sağlık...
Çok iyi anlatıyorsun ağzına sağlık, projemi senin sayende yapacağımç
Süper anlatım tşkr ederim
bu adadm bomba ya helal
Meraba.Vbada mesela S=2/1ah programi nasil yazilir? onuda anlatirmisiniz
Merhaba, Anlatımlarınız için tşk ederim. Örnekleri kendimde uyguladığımda F5 ile VBA'da açık iken excell'degösteriyor. Bunu VBA'yı açmadan excellde bu kodların çalışmasını nasıl sağlayabilirim? 1 Not: Dosya makro olarak kayıtlı. Selamlar.
üstat eyvallah allah razı olsun .b3 hücresinde hiç bir değer olmasaydı sonuç ne olurdu? if komutunu vlookup fonksiyonu ile kullanıyorum ancak aranacak değer hücresi boş olduğunda hata veriyor...bunu nasıl önleyebilirim.
Private Sub Hesapla_Click()
Dim x As Double
x = (TextBox3.Value) * 0.05
If CDbl(TextBox4.Value) < CDbl(TextBox3.Value) + x And CDbl(TextBox4.Value) > CDbl(TextBox3.Value) - x Then
TextBox5.Value = "OK"
Else
TextBox5.Value = "NOK"
End If
End Sub
Hocam merhaba, bu döngüyü çalıştırdığımda sürekli NOK Else e giriyor, ıf condition dogru olsa bile else basıyor.
Çok başarılı
Tuncay Özeren teşekkürler 🙌 (Hakan Erdeş)
6. DERSE KADAR GAYET BASARILI GELDIK. UMARIM 39. DERSTE BİR VBA UZMANI OLARAK ÇIKARIZ :)
hocam örnek olsun diye tuşlu hesap makinesi yapmaya çalışıyorum. 0 dan 9 akadar tuşları commonbutton ile oluşturdum ve üst tarafa textbox açtım. her tuşa bastığımda o tuşa atadığım numarayı textboxa yazdırıyorum. örneğin cmd1 butonuna bastığımda 1 yazıyor, cmd2 butonuna bastığımda 2 yazıyor. ancak 12 yazmak istediğimde bunu yapamadım. yani önce cmd1 butonuna basında 1, cmd2 butonuna basınca hemen yanına 2 yazmıyor. 1 i silip 2 yi yazıyor. bir öneriniz varmıdır, 12 yi nasıl yazdırırım
if komutu sağlanırsa else if sorgulanmayacak. doğal olarak 90 dan kucuk demek nedir anlayamadım :D
gerek yok evet