Soru TextBox ta veri birleştirme

[Erdinç FIRTINA]

Değerli forum üyeleri,

Aşağıdaki kodlar ile userform üzerindeki Textbox lara ilgili sayfadan veri alıyorum. Sayfadaki birden fazla hücredeki verileri bir tane Textbox içinde birleştirmek istiyorum.
Örneğin; TextBox10 içine, 12 ile 20 arasını birleştirmek gibi)

Yardımlarınız için şimdiden çok teşekkürler…

TextBox10.Text = Cells(s, 12 den 20 ye kadar olan verilerin birleştirilmesi)

Private Sub ListBox1_Click()
Dim s
s = ListBox1.ListIndex + 1&
TextBox1.Text = Cells(s, 3)
TextBox2.Text = Cells(s, 4)
TextBox4.Text = Cells(s, 6)
TextBox5.Text = Cells(s, 7)
TextBox6.Text = Cells(s, 8)
TextBox7.Text = Cells(s, 9)
TextBox8.Text = Cells(s, 10)
TextBox9.Text = Cells(s, 11)
End Sub

 

[hımmmmmmmm]

Değerli forum üyeleri,

Aşağıdaki kodlar ile userform üzerindeki Textbox lara ilgili sayfadan veri alıyorum. Sayfadaki birden fazla hücredeki verileri bir tane Textbox içinde birleştirmek istiyorum.
Örneğin; TextBox10 içine, 12 ile 20 arasını birleştirmek gibi)

Yardımlarınız için şimdiden çok teşekkürler…

TextBox10.Text = Cells(s, 12 den 20 ye kadar olan verilerin birleştirilmesi)

Private Sub ListBox1_Click()
Dim s
s = ListBox1.ListIndex + 1&
TextBox1.Text = Cells(s, 3)
TextBox2.Text = Cells(s, 4)
TextBox4.Text = Cells(s, 6)
TextBox5.Text = Cells(s, 7)
TextBox6.Text = Cells(s, 8)
TextBox7.Text = Cells(s, 9)
TextBox8.Text = Cells(s, 10)
TextBox9.Text = Cells(s, 11)
End Sub

For I = 12 To 20
     TextBox10 = TextBox10 & Cells(S, I).Value
Next I

 

[Erdinç FIRTINA]

Sayın hımmmmmmmm,
Yardımlarınız için çok teşekkürler.
Aynı işlemi şu şekilde yapabilir miyiz?

Örneğin; TextBox10'a, 12 ile yirmi arasındaki verilerin birini alıp diğerini alma şeklinde olabilir mi?
Yani; 12'yi al 13'ü alma, 14'ü al 15'i alma şeklinde devam ederek almak. Yani, bir hücre verisini al bir alma şeklinde devam etmek.

Yardımlarınız için şimdiden çok teşekkürler!