ayuda con el vaSpread urgente!!
Publicado por yazmin (1 intervención) el 07/09/2013 20:24:09
Buenas Tardes necesito ayuda
de un combobox agrego al vaSpread el valor del combobox necesito que NO se repita el valor del combobox en el vaSpread dieron un pequeño codigo que es mas o menos asi:
De antemano muchisimas gracias!!
de un combobox agrego al vaSpread el valor del combobox necesito que NO se repita el valor del combobox en el vaSpread dieron un pequeño codigo que es mas o menos asi:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
Private Sub Cmd_agregar_Click()
Dim i As Integer
Dim N As Integer
For i = 1 To VsCarro.DataRowCnt
VsCarro.Row = i
If CDbl(VsCarro.Text) = Me.CboCarro.Text Then
MsgBox ("carro ya seleccionado")
Exit Sub
Else
End If
Next i
N = VsCarro.MaxRows
VsCarro.MaxRows = N + 1
VsCarro.Lock = True
VsCarro.Row = VsCarro.MaxRows
VsCarro.Col = 1
VsCarro.Text = Me.CboCarro.ItemData(CboCarro.ListIndex)
VsCarro.Col = 2
VsCarro.Text = Me.CboCarro.Te
End Sub
De antemano muchisimas gracias!!
Valora esta pregunta
0