Access SQL   ›   ACCESS SORULARI VE ÖRNEK UYGULAMALARI   ›   ACCESS SORULARI   ›   [VBA] Not Alanı içinde içinde istediğim satıra kursörü taşıma ve kelime seçtirme

[VBA] Not Alanı içinde içinde istediğim satıra kursörü taşıma ve kelime seçtirme
Mehmet Eser
Access Takımı

*
Kayıt Tarihi: 17.05.2008
Toplam 368 konu açtı.
Toplam 1.571 yorum yaptı.
Toplam 7 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2010 TR,
Beğeniler: 0 / 2
#1
12-05-2012, 14:41
Merhaba,

Metin kutusu içindeki not alanın istediğim satır ve sütun konumuna ulaşıp boşluk akrakterini görene akdar karakterleri seçtirmek istiyorum.

Örneğin 30 satırlı bir not alanı var. Ben 10 satırın 23. karakterine gitmek istiyorum. Ve bu karakterden boşluk karakterine kadar seçili yapmak istiyorum.

Sırayla:
1- İStenilen n. satıra gitme
2- İStenilen n. sütuna gitmek
3- Satır ve sütun bilgileri verilmiş konuma gitmek ve boşluk karakterini görene kadar seçim yaptırmak

Bilgi ve tecrübesi olanların yardımını bekliyorum, çok teşekkürler.
Eek VT:Veri Tabanı, AVT: Access VT, MS:Microsoft, Kapaç: Kapa ve aç (rebot ve açkapa saçmalığına çözümüm)
Twitcy Yazan okuyan sağolsun, çözene saygılar. Kolaylaştırınız, zorlaştırmayınız.
? Cinnet geçirmemek için Access 2010'u SP2 ile kullanalım.
? Sürekli sebepsiz hatalar oluyor da AVT uçuyorsa siz de Ofis kurulmunu uçurun çözülüyor. Sorun kurulum dosyanızda! Farklısını bulun!
? VT dağıtıma çıkana kadar bölmek zaman kaybıdır!
{ Veri Tabanı Mantığı } {Access 2010 çökmelerine çözüm } { 60 Günlük Ofis 2010 Pro Türkçe } { Kayıtları Yan Yana Göstermek }
{ Forma Rapora Resim Fotoğraf Eklemek En kolay En Sağlam En Zengin Teknik }



  Website   Bul
  Alıntı
Bu mesajı beğenenler:
Taruz
Forum Yöneticisi

*
Kayıt Tarihi: 04.03.2008
Toplam 371 konu açtı.
Toplam 7.540 yorum yaptı.
Toplam 236 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2010, Office 2019,
Beğeniler: 55 / 56
#2
12-05-2012, 15:37
Merhaba..


1 )

Visual Basic
  1. metinkutusuadi.SetFocus
  2.  
  3. metinkutusuadi.SelStart = 0
  4. For i = 1 To 4 'Kaçıncı satır..
  5. SendKeys "{DOWN}"
  6. Next



2 )

Visual Basic
  1. metinkutusuadi.SetFocus
  2. metinkutusuadi.SelStart = 55



3 ) En güzel soru da buydu bence..

Visual Basic
  1. Dim a, b       As Long
  2. a = 10    'Kaçıncı satır..
  3. b = 4    'Kaçıncı karakter..
  4.  
  5.     With metinkutusuadi
  6.         .SetFocus
  7.         .SelStart = 0
  8.         For i = 1 To a - 1
  9.             SendKeys "{DOWN}"
  10.             DoEvents
  11.         Next
  12.         trz = .SelStart + b
  13.         trz = Mid(.Value, trz)
  14.         Debug.Print trz
  15.         trz = Mid(trz, 1, InStr(1, trz, " ") - 1)
  16.  
  17.         .SelStart = InStr(.Value, trz)
  18.         .SelLength = Len(trz)
  19.  
  20.     End With


Bulunamayan yerleri bulmak için önce kaybolmak gerekir.
Kaptan Hector Barbossa


SORU SORMA KILAVUZU
Giriş | Sormadan Önce | İlgili Forumu dikkatlice seçin | Anlamlı ve duruma uygun konu başlıkları kullanın | Anlamsız soru cümleleri kurmayın | Açık, dilbilgisi kurallarına uygun ve sözdizimlerine dikkate ederek yazın | Sorunuz sizin için çok acil olsa bile, çok acil diye yazmayın | Sorununuz hakkında tam ve aydınlatıcı iletiler yazın | Amacınızı belirtin | Problemin belirtilerini tanımlayın, kendi tahminlerinizi değil | Sorunuz hakkında açık olun | Nezaket asla yaralamaz ve bazen oldukça yararlıdır | Boyut her şey değildir! | Kabalıkla ilgilenmek | Cevabı E-Posta ile istemeyin | İnsanlardan özel mesajla cevap vermelerini istemeyin | Eğer cevabı anlamadıysanız | Şayet bir cevap alamazsanız | Sorununuz çözüldükten sonra küçük bir not ile bildirin | Sorulmaması gereken türde sorular | İyi ve kötü sorular

Sorulara nasıl doğru düzgün cevap verilir



  Website   Bul
  Alıntı
Bu mesajı beğenenler:
Mehmet Eser
Access Takımı

*
Kayıt Tarihi: 17.05.2008
Toplam 368 konu açtı.
Toplam 1.571 yorum yaptı.
Toplam 7 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2010 TR,
Beğeniler: 0 / 2
#3
12-05-2012, 16:49
Taruz Bey, sütuna 20 yazınca seçiyor boşluğa kadar ama 5,11 gibi değerlerde ilk sütunda bekliyor. Ekteki örnekte vaktiniz olursa memnun olurum.


Eklenti Dosyaları
.zip   ribbon değistir_ME.zip (Boyut: 59,12 KB / İndirilme: 67)
Eek VT:Veri Tabanı, AVT: Access VT, MS:Microsoft, Kapaç: Kapa ve aç (rebot ve açkapa saçmalığına çözümüm)
Twitcy Yazan okuyan sağolsun, çözene saygılar. Kolaylaştırınız, zorlaştırmayınız.
? Cinnet geçirmemek için Access 2010'u SP2 ile kullanalım.
? Sürekli sebepsiz hatalar oluyor da AVT uçuyorsa siz de Ofis kurulmunu uçurun çözülüyor. Sorun kurulum dosyanızda! Farklısını bulun!
? VT dağıtıma çıkana kadar bölmek zaman kaybıdır!
{ Veri Tabanı Mantığı } {Access 2010 çökmelerine çözüm } { 60 Günlük Ofis 2010 Pro Türkçe } { Kayıtları Yan Yana Göstermek }
{ Forma Rapora Resim Fotoğraf Eklemek En kolay En Sağlam En Zengin Teknik }



  Website   Bul
  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  [SORGU] Kelime Içinde Geçen 2 3 4 Harfe Göre Veri Doldurma toros333 1 203 16-02-2026, 02:12
Son Mesaj: dsezgin
  Tablodaki Alanı Alt Tablodan Alınan Değerle Güncelleme Sorgusu Lidervet 7 637 02-12-2024, 11:20
Son Mesaj: halily
access-sql-9 [SORGU] Tabloda Geçen Iki Alanda Ortak Kelime Var Ise Istenilen Alana Işaret Koymak sevincili 5 452 20-09-2024, 01:09
Son Mesaj: dsezgin
  [SORGU] Sütun Verisini Satıra çavirme gokselbilici 2 449 13-09-2024, 12:16
Son Mesaj: gokselbilici
  [SORGU] Sorgu Ifadesi Içindeki Fonksiyon Ifade Içinde Kullanılamaz Hatası Mecnun24 7 661 27-08-2024, 16:53
Son Mesaj: Mecnun24
  Bir Tabloda Bulunan 2 Alanı Birleştirme programmer67 10 752 25-06-2024, 11:49
Son Mesaj: halily
  Satıra Sığmayan Olursa Metni Kaydır sevvalkalay 3 512 13-03-2024, 18:09
Son Mesaj: dsezgin
  [FORM] form klasör içinde dosya kontrolü obaysal42 4 2.497 29-12-2023, 10:24
Son Mesaj: burhanb

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi