Herkese sağlıklı günler dilerim.
Netteki bir videoda uygulanan şekliyle günlük döviz kurlarını Excel sayfasına çekmeye çalışıyorum.
bu kod satırında hata veriyordu. Şu anda hata göstermiyor ama düğmeye bastığınızda makro çalışıyormuş gibi bir süre buton pasif halde kalıyor sonra aktif hale geliyor fakat sonuçta sayfaya bilgiler gelmiyor. Hatanın ne olduğu konusunda bilgi vermenizi rica ederim.

[img]https://resim.accesstr.net/do.php?img=113

Herkese sağlıklı günler dilerim.
Uygulamada Döviz cinsi seçildiği anda Toplam tutarın (Proje bedeli) Mevcut döviz kurundan karşılığının Döviz Karşılığı Textboxına yazılmasını yapmaya çalıştım. Formülde tutarı döviz kuruna böldüm fakat sonuç resimde görüldüğü gibi 0.6535... şeklinde çıkıyor. Normalde 6.535 usd göstermesi gerekiyor. Sorun nedir.



[code]Private Sub ComboBox_DovizCinsi_Exit(ByVal Cancel As MSForms.ReturnBoolean)

If KeyCode = 13 Then KeyCode = 9

If ComboBox_DovizCinsi.Va

vba koduyla form üzerindeyken raporun kayıt kaynağı değiştirilebilirmi acaba?

bu kodu raporun kayıt kaynağı yapmak istiyorum.
srg_tarih = "SELECT TRAS_SEVK_LISTESI.* From TRAS_SEVK_LISTESI WHERE (((TRAS_SEVK_LISTESI.KAYIT_TARIHI)=[Formlar]![RAPOR]![TARIH]))"


[img][Resim: https://resim.accesstr.net/do.php?img=11346][/img]

Merhaba
mix isimli sayfa da V2 hücresinden itibaren V sütünuna =DÜŞEYARA(h2;$AA$1:$AB$15;2;YANLIŞ) formülünü Vba ile yazmak istiyorum.
Yaptıklarım çalışmadı. Nasıl bir kod yazmalıyım?

Öncelikle kolay gelsin çalışmada belli bir kısma kadar geldim ama sıkıntı yaşadığım durum yıllık izinlerde bayram tatilleri ve hafta tatillerini düşerek hesaplatmaya çalışıyorum yapamadım. Ayrıca saatlik izin kısmında ise Saat olarak giriş yaptığımda gün olarak hesaplıyor iki saat arasındaki farkı alıp toplamda 8 saati bulduğunda kesilecek gün kısmına bir gün yazdıramadım yardımcı olursanız sevinirim. Vba şifresi 1234

Merhabalar,
Çok sayıda farklı klasörlerde word dosyam var. Bazı dosya ve word belgelerinin adı kolay,anlaşılır ve sade şekilde yazılmamış. Arama yapmak istediğimde çok uzun sürüyor ve çoğunda sonuca ulaşamıyorum. Bu sebeple elimde olan word belgelerini excel'de kod yardımı ile her word belgesini bir hücreye gelecek şekilde yapıştırmak ve yan satırına bu word belgesinin dosya yolunu ekletmek istiyorum. Dosya sayısı çok olduğu için el ile uzun sürmekte haliyle. Burda amacım bu belgeleri istediği

Merhaba
    Resim1 deki kodları kullanarak Access ile düzenlediğim programımdan ms word olarak bulunan dosyamdaki belirli yerlere  textboxumdaki yazıları buton ile aktarmaktayım kod düzgün olarak çalışmakta fakat şöyle bir problemim var.

      Textbox u zengin metin ve tablodan not olarak oluşturdum. 255 karakterden fazla karakter girebiliyorum. Ama ms word de oluşturduğum form field e 255 karakterden fazlasını atmıyor 255 karakterden fazla karakter girersem hiçbirini atmıyor.  Bana acilen y

ya arkadaşlar, benim mantığım almıyor mu nedir, ya çok basit bi problem, çözümü basit, uyguluyorum bütün öğrendiklerimi ama olmuyor, kafayı yedirtecek bu vba' ya çok ayar oluyorum, ya kodun sonuna bir boşluk ve kesme işareti koyuyorum tamam sorun yok ama alt taraftan devam edemiyorum, bütün öğrendiklerimi uyguluyorum nafile, acaba bunun bir ayarı falan mı var, yardımcı olursanız çok sevinirim, benimkinde olmuyor.

Merhaba Arkadaşlar,
Uzun süredir CDO ile Vba üzerinden gmail kullanarak mail gönderebiliyorduk. Google bey amca daha az güvenli uygulamaların erişimini kapattığı için artık mail gönderimi yapamıyorum. Çözüm için araştırdım fakat somut bir çözüm bulamadım. Yardımcı olabilir misiniz acaba?? 


[vb]
Function SendMail()
    On Error Resume Next
    Dim iMsg, iConf, Flds, schema, rapor
    Set iMsg = CreateObject("CDO.Message")
    Set iConf = CreateObject("CDO.Configuration")
    Set

iyi günler kolay gelsin
vba kodlarını kullanarak
Sayfa1 de 1. sütunda bulunan kelimeleri
Sayfa2 de 1. sütunda aratmak istiyorum
bulduğunda Sayfa2 de 2. sütun boş ise
Sayfa2 de 2. sütuna Sayfa1 deki 2. sütunundaki değeri yazdırmak istiyorum
bu konuda yardımcı olursanız memnun olurum