• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Aktif hücreye ve yanındaki hücreleri veri girişi

Boş olarak gördüğünüz hücrede boşluk karakteri olabilir (alandaki hücrelerde olan formüllerin sonucu "" mı yoksa " " mı buna bakın isterseniz.
Ya da en iyisi örnek belge yükleyin (cevabımın altında örnek belge yüklemeye ilişkin açıklama var), onun üzerinden bakılır elbette.
 
sorunu hallettim yalnız boş hücreleri aradığım bölgelerde birleştirilmiş satırlar var onları da boş satır olarak görüyor bunu nasıl engelleyebiliriz
 
Afaki sorulara verilecek afaki cevap, yanıltıcı/yanlış olabilir veya yeni soru/sorunlar ortaya çıkar ve konu uzayıp gider.
En iyisi gerçek belgenizle aynı yapıda bir örnek belge yüklemeniz diyebilirim.
.
 
Önce açıklama : örneğin A1:A10 hücrelerini ya da A1:F1 hücrelerini birleştirip bu hücreye bir değer yazarsanız,
bu değerin adresi her iki durumda da A1'dir.
Yani; birleştirilmiş bir hücreye atıf yapan bir formül oluştururken kullanacağınız adres, birleştirilmiş hücrelerin
SOL-ÜST hücresinin adresidir.

Örnek belgenize göre birleştirilmiş D13:D14 hücresine bir değer yazın, başka bir hücreye =D14 formülünü uygularsanız sonuç 0 olur.
Bu hücreleri içeren =BOŞLUKSAY(D13:D14) veya =EĞERSAY(D13:D14;"") formülünün sonucu ise 1 olur.

D14 hücresinin dolu sayılmasını sağlayacak bir formül bilmiyorum malesef.

Önerim; birleştirme nedeniyle kullanılamayacak hücre adeti olan (D14 gibi) 1 sayısını EĞERSAY formülünün
sonucundan çıkartmak şeklinde olacak (D13:D14 yerine D13:D20 aralığını birleştirirseniz çıkartılacak hücre adeti 7 olur) .
 
cevabınız için teşşekürler hocam ama birleştirme olan böle çok sütun var başka bir yol deniycem artık saolun
 

Ekli dosyalar

mesajınızı yeni gördüm gerçekten bilginize hayran kaldım çok işime yaradı saolun..
 
Ömer hocam 3. mesajımda örnek doya mevcut. normalde aktif satıra kayıt yapıyor userform açıldıktan sonra Userformdan tarihi seçtiğimizde kaydı 1. satırdaki tarihleri algılayarak ona göre kayıt yapabilir mi? örn: aktif hücredeki tarif 03.08.2016 ama rezervasyon yapmak istediğimiz tarih 15.08.2016 . bu konuda yardımlarınızı bekliyorum iyi çalışmalar.
 
Merhaba.

Daha evvel de söylemiştim, Userformda kullandığınız DtPitcher'i bilgisayarımda çalıştıramıyorum.
Bu nedenle deneme şansım yok.

Yanlış anlamadıysam; UserForm2'deki KAYDET düğmesi kodlarında (Private Sub CommandButton1_Click() )

For satırından önceki aşağıdaki kırmızı satırı silip yerine mavi satırı ekleyerek deneyin.

NOT: TextBox4 anladığım kadarıyla geceleme sayısını gösteriyor ve tarihi DTPitcher nesnesinden alacaksınız,
o nedenle mavi satırdaki siyah kısmı düzenlemek size kalıyor.
Kod: 
[COLOR="Red"][FONT="Arial Narrow"]ilk = ActiveCell.Column: yazılan = 0[/COLOR]
[COLOR="blue"]ilk = WorksheetFunction.Match([COLOR="Black"][B]tarih nesnesinin değeri[/B][/COLOR], Range("1:1"), 0): yazılan = 0[/FONT][/COLOR]
 
hocam worksheetfunction sınıfının match ozelliği alınamıyor hatası veriyor.

ilk = WorksheetFunction.Match(DTPicker1.Value, Range("1:1"), 0): yazılan = 0
 
İşte benim onu deneme şansım olmadığını söylemiştim.

DTPitcher nesnesinden alınan değerin biçimiyle ilgili bir sorun olabilir,
nesne değerini Format(....,"dd/mm/yyyy") ya da CDate(......) gibi hücredeki tarihle
aynı biçime (tarih hücrelerini GENEL olarak ayarlayıp onunla karşılaştırmanızda yarar var)
getirmek gerekecek sanırım (DTPitcher1.Value olarak veya sadece DTPitcher1 olarak deneyin).

Başka bir kod oluşturup DTPitcher1'deki değeri excel sayfasında, GENEL olarak biçimlendirilmiş
bir hücreye yazdırın bakalım, hücreye yazılan değer tam olarak nedir?
Ya da yukarıda belirttiğiniz satırdan önce,
MsgBox DTpitcher1.Value
şeklinde bir satır ekleyin, ekrana gelen mesajda tam olarak ne görüyorsunuz, onu kontrol edin.
Neticede 1'inci satırda aranacak şey DTPitcher değeri.

Cümlelerim biraz bozuk oldu galiba ama anlaşılıyordur umarım.
.
 
Son düzenleme:
08.08.2016 dtpicker valuesi bu şekilde hocam hücresinin değerinide bu şekilde düzenledim ama gene sonuç aynı siz başka takvim uygulaması kullanarak deneyebilir misiniz ?
 
Hücrede değil de MsgBox mesajı olarak denediniz mi acaba?
Bir de 0+ DTPitcher1.Value olarak bakın.

08.08.2016 tarihi olan hücreyi GENEL olarak biçimlediğinizde 42590 değerini görmeniz lazım.
 
denedim hocam maalesef olmadı. dtpicker değerini label a aktarıp"08.08.2016" şeklindede denedim gene aynı hatayı veriyor
 
Kusura bakmayın deneme şansım da olmadığından hayalen ancak bu kadar fikrimi söyleyebildim.

Google arama motorunda userform DatePitcher format excel vba şeklinde arama yapmanızı önerebilirim.
Bu konu bir yerlerde mutlaka sorulmuş ve çözümü bulunmuştur diye düşünüyorum.
 
anladım hocam saolun uğraştığınız için
 
Cevap yazmak için giriş yap yada kayıt ol.
Geri
Üst