Excel ile ilgili kod, fonksiyon, örnek dosya, örnek videolar ve dokümanlar. Hepsi Excelvba Kütüphane uygulamasında.


[Resim: https://lh3.googleusercontent.com/pw/ACt...9-h625-no?]

Uygulamayı İndir

Eklemiş olduğum Excel dosyasındaki T1 sayfasında bulunan verileri Y1 sayfasına(daha önce kod oluşturulmuştu) T1 deki tarihten önce olursa 2020'deki veriyi, sonra olursa 2021'deki veriyi kod ile nasıl alırım.

aşağıdaki kod ile siparişlerime sipariş no verilmektedir. kod oluşumu yıl ay ve sıra no ile oluşuyor şimdi 2 sıra önceki kodu oluşturup  hata verip işlem yaptırmıyor sarı numaralarında sayı kayması da yok tüm çabalarıma rağmen hatayı bulamadım başka nerelerde arama gerek yardımlarınız bekliyorum. formun resmini yükledim

1) sıra numarası oluşturma kodu

If NewRecord Then Sirano = DMax("Sirano", "Tbl_Siparisler") + 1


2)sipariş numarası oluşturma kodu

Dim yil, ay As Integer
Dim Sirano

Herkese Merhabalar.
Türk Ulusunun kayıtsız şartsız egemenliğini perçinleyen Türkiye Büyük Millet Meclisinin açılışının yıldönümü ve Cumhuriyetimizin kurucusu Ulu Önder Gazi Mustafa Kemal Atatürk'ün çocuklarımıza ve ruhunda her zaman biraz da olsa çocukluğunu koruyanlara armağan ettiği, dünyada eşi benzeri bulunmayan 23 Nisan Ulusal Egemenlik ve Çocuk Bayramımız kutlu olsun.

Ekte gönderdiğim ve uzun bir süre önce yaptığım kod üretme uygulamasını başka bir uygulamamda kullanmak istiyorum. mevc

Merhaba arkadaşlar. Alt foruma veri düzenleme ekranı var benim isteğim şu eğer Durumu statüsü "Red" olursa muhakkak Red Nedeni girmesi gerekiyor bunu nasıl yapabiliriz yardımcı olabilir misiniz? 

Merhaba,
Ekli örneğimde tablodaki değerlerin rapordaki ole nesnesinde QR kod olarak görünmesini istiyorum. Ancak şundan emin değilim, dikkat edilirse tablodaki verilerimde tire işareti var. Bu işaretler QR kod oluşumunu engeller mi? Engellerse tireleri çıkartacağım. Teşekkürler.

Herkese sağlıklı günler dilerim. Formum açıldığında aşağıdaki kod ile cephe ölçüsüne sabitlediğim değer seçili geliyordu. Fakat userformun mınımıze maxımıze edilmesi ile ilgili kodları uyguladıktan sonra bu kod parçacığı çalışmaz oldu. Bu durumu nasıl düzeltebilirm. Teşekkürler.

[code]

With Me.TextBox_CepheOlcusu
    .SetFocus
    .Value = 4000
    .SelStart = 0
    .SelLength = Len(.Text)
  End With

'InitMaxMin Me.Caption    " bu yoruma çevirdiğim kod Büyült küçült adlı modüldeki kodlarla bi

iyi günler arkadaşlar,
arşivinde Access kodları olan varsa paylaşabilir mi acaba?

Merhaba arkadaşlar,  benim excelde metinbirlestir fonksiyonu yok, bunun kod ile yapılmış örnekleri var midir, ben bulamadım da, cok lazim , isimi bayağı bir görecek, yardımcı olur musunuz? teşekkürler

arkadaşlar, değerli uzmanlar ben böyle üst üste soru gönderiyorum inanın mecburiyetten, işim gereği, kusura bakmazsınız insallah, neyse.. dosyam ekte,defalarca kontrol ettim sayı aynı , ne yaptıysam hatayı bulamadım, rica etsem bakabilir misiniz, bunu bugün bitirmeye çok ihtiyacım var