Enter ile Satır Başına geçme

[RaMeLoT]

Excel de hücrelere verileri girdiğimde...( Enter tuşunu yatay olarak ayarladım.)
Belirtiğim hücreye veri girdikten sonra alt satıra geçirebileceğim bir yöntem var mı?
E sutunu son sutun kabul edip;
E13 ü enterladığımda A14 e
E14 ü enterladığımda A15 e gitmesini sağlayabilir miyim???

Birde üstadlar... Bu dosya benim geçici dosyam...
tek sayfa şeklinde verileri girip anadosyaya yapıştırıyorum...
Anadosya da formuller ağır galiba her veri girdiğimde başlıyor hücreler hesaplanıyor %100 e kadar gitmeye....
Bunun bi çözümü yok mu???
Ana dosya : Seçil Sine - 2009-04 - Fatura.rar

 

[RaMeLoT]

Galiba cevap çıkmayacak...

 

[Ömer]

Excel de hücrelere verileri girdiğimde...( Enter tuşunu yatay olarak ayarladım.)
Belirtiğim hücreye veri girdikten sonra alt satıra geçirebileceğim bir yöntem var mı?
E sutunu son sutun kabul edip;
E13 ü enterladığımda A14 e
E14 ü enterladığımda A15 e gitmesini sağlayabilir miyim???

Merhaba,

Sayfanın kod bölümüne aşağıdaki kodları kopyalayınız..

Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
For i = 1 To 1000
If Target.Cells = Cells(i, 5) And Target <> "" Then Cells(i + 1, 1).Select
Next i
End Sub

.

 

[uzmanamele]

merhaba

E sütununa veri girişi yapınca A sütununa geri dönmek için aşağıdaki kodu dener misiniz

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Columns(5)) Is Nothing Then Exit Sub
   Dim satır As Long
   satır = Application.WorksheetFunction.Max(Cells(Rows.Count, 5).End(xlUp).Row)
   Cells(satır + 1, 1).Select
End Sub

 

[zipir123]

enter tuşu ile bir alt satıra geçmek

Excel de hücrelere verileri girdiğimde...( Enter tuşunu yatay olarak ayarladım.)
Belirtiğim hücreye veri girdikten sonra alt satıra geçirebileceğim bir yöntem var mı?
E sutunu son sutun kabul edip;
E13 ü enterladığımda A14 e
E14 ü enterladığımda A15 e gitmesini sağlayabilir miyim???

Sn. Ramelot istediğiniz böyle birşeymi ?

 

[RaMeLoT]

uzmanamele ve espiyonajl ( hocam 2 de 2sin, bunun yanıtında da yetiştin)
kod girmeyi bilmiyodum ama biraz karıştırınca her ikinizin de kodları biyerlere girdim. İstediğim oldu teşekkür ederim...

Hala öğrenmem gereken çok şey var...
Bu forumu açana sonsuz teşekkürlerimi sunuyorum...

 

[damdandüşen1]

Uzun zaman önce açılmış bir konuyu hortlacağım galiba ama... bu örnekteki gibi kodu nasıl ve nereye gireceğimi yazabilir misiniz? Teşekkürler...

 

[Korhan Ayhan]

Sayfa adı üzerinde sağ klik yapın.
Açılan menüden kod görüntüle seçeneğini seçin.
Açılan pencereye kodu uygulayın.

 

[damdandüşen1]

İlginize çok teşekkür ederim... dediğinizi yaptım... şimdi; örneğin " D 5 hücresine " veri girdikten sonra enter'a bastığımda bir alt satırdan " A 6 " başlaması için ne yapmam gerekiyor? Teşekkürler...

 

[kenevir47]

Merhaba,
Bu kod bana da lazımdı sayenizde kodu bulabildim.
Kodu Kod sayfasına yapıştırdım fakat Şöyle bir Hata ile karşılaştım.
Hata : Compile error:
Ambiguous name detected Worksheet_Change diye bir uyarı
veriyor ve daha sonra kod sayfasına yapıştırdığım kodun ilk satırını sarı renkle işaretliyor ( Private Sub Worksheet_Change(ByVal Target As Range))

 

[Ömer BARAN]

Merhaba,
Bu kod bana da lazımdı sayenizde kodu bulabildim.
Kodu Kod sayfasına yapıştırdım fakat Şöyle bir Hata ile karşılaştım.
Hata : Compile error:
Ambiguous name detected Worksheet_Change diye bir uyarı
veriyor ve daha sonra kod sayfasına yapıştırdığım kodun ilk satırını sarı renkle işaretliyor ( Private Sub Worksheet_Change(ByVal Target As Range))

Merhaba.

Bahse konu kod, Worksheet_Change kod'u yani sayfa olaylarından biri olan Change olayıyla çalışır.
Dolayısıyla kod'u, Modül'e DEĞİL, alt taraftan uygulama istediğiniz sayfanın adına fareyle sağ tıklayıp
KOD GÖRÜNTÜLEyi seçtiğinizde karşınıza gelecek ekranın sağ tarafına (yani ilgili sayfanın kod bölümü) uygulayarak deneyiniz.
.

 

[kenevir47]

Teşekkür ederim,
Açıklamada da belirtiğiniz gibi Modül'e değil istediğim Sayfa'nın kod bölümüne yapıştırdım söz konusu hata ile karşılaştım. Söylemekte fayda var aynı sayfa da başka kodlarda mevcuttur mevcut kodlar mükerrer kayıt kontrolü için kod mevcut tır bilginize.

 

[Ömer BARAN]

Makrolar çalışır durumda olacak şekilde örnek belge eklerseniz, daha hızlı ve kesin sonuca ulaşırsınız diyebdüşünüyorum.
Örnek belge özellikleri ve yükleme yöntemine ilişkin açıklamalar, cevabımın altındaki İMZA bölümünde var.
.

 

[kenevir47]

Ek Dosya Linki
http://s3.dosya.tc/server10/y6jqwr/YENI_ALIS_SATIS_STOK_.rar.html

 

[Ömer BARAN]

Tekrar merhaba.

B stununda zaten veri doğrulama ile mükerrer veri girişine ilişkin engelleme var.
Bu nedenle, bu duruma ilişkin kod'un kullanılmasına gerek olmadığını düşündüm.

E sütununa veri yazıldığında bir sonraki satır A sütunu hücresine gidilir.

Sanırım istediğiniz böyle bir şey.

Belgeye buradan da erişebilirsiniz.
.

 

[kenevir47]

Söz konusu kodu ALIŞ Sayfasına uygulamak istiyorum "O" Sütununa sonra Enter tuşuna bastığımda bir sonraki satırın A Sütununa gelecek şekilde olmasını istiyorum.
STOK DURUM sayfasında çalışıyor bir sıkıntı yok. Teşekkür ederim.

 

[kenevir47]

Sayın Ömer Bey uygulamanın olmasını istediğim Sayfa ALIŞ Sayfası dir. Makroyu ona göre nasıl yaparız.