vba 'da değiştir ve sil komutları

Katılım
29 Aralık 2006
Mesajlar
80
Excel Vers. ve Dili
visualbasic
Bu kayıt komutuna göre değiştir ve sil komutu nasıl yapabilirim.Üstadlarım bu konuda bana yardım edermisiniz.kayıt komutum şu şekilde
Private Sub CommandButton1_Click()
Dim i As Integer
For i = 2 To 32000
If (Sayfa13.Cells(i, 1) = "") Then
Sayfa13.Cells(i, 1) = ComboBox1.Text
Sayfa13.Cells(i, 1) = ComboBox1.Text
Sayfa13.Cells(i, 26) = TextBox15.Value
Sayfa13.Cells(i, 16) = TextBox18.Value
Sayfa13.Cells(i, 2) = ComboBox3.Text
Sayfa13.Cells(i, 3) = Textbox2.Text
Sayfa13.Cells(i, 4) = TextBox8.Text
Sayfa13.Cells(i, 5) = TextBox9.Text
Sayfa13.Cells(i, 6) = TextBox16.Text
Sayfa13.Cells(i, 7) = TextBox10.Text
Sayfa13.Cells(i, 8) = TextBox13.Text
Sayfa13.Cells(i, 9) = TextBox14.Text
Sayfa13.Cells(i, 18) = TextBox6.Text
Sayfa13.Cells(i, 19) = TextBox7.Text
Sayfa13.Cells(i, 21) = TextBox11.Text
Sayfa13.Cells(i, 23) = TextBox12.Text
Sayfa13.Cells(i, 15) = TextBox5.Text
Sayfa13.Cells(i, 11) = ComboBox2.Text
Sayfa13.Cells(i, 28) = ComboBox4.Text
Sayfa13.Cells(i, 27) = TextBox19.Text


MsgBox "Bilgi Eklendi !...", vbOKOnly + vbInformation, "Bilgi Ekleme"

Exit Sub
End If
Next i
End Sub
 
Üst