¿AYUDAAA ME SALE NEXT SIN FOR¡¡¡ PARA HOY!!?

Private Sub commandbutton1_click()

UserForm1.Show

For i = 1 To 100 Step 1

If Cells(i + 2, 2).Value = i Then

Cells(i + 2, 2).Value = i

Cells(i + 2, 3).Value = TextBox1.Text

Cells(i + 2, 4).Value = TextBox2.Text

Cells(i + 2, 5).Value = ComboBox1.Text

Cells(i + 2, 6).Value = TextBox3.Text

Cells(i + 2, 7).Value = TextBox4.Text

Cells(i + 2, 8).Value = TextBox5.Text

If ComboBox2.Text = " " Then

Cells(i + 2, 9).Value = "dentro"

Else

End If

Next

Exit For

Please enter comments
Please enter your name.
Please enter the correct email address.
You must agree before submitting.

Answers & Comments


Helpful Social

Copyright © 2024 Q2A.ES - All rights reserved.