esta grilla es para 10 ingresos tengo una para dos y me funciona bien pero esta me lansa error ..
Private Sub enc_grilla()
msitem.Clear
msitem.Rows = 1
msitem.Rows = 2
msitem.Rows = 0
msitem.Col = 0
msitem.ColWidth(0) = 1200
msitem.ColAlignment(0) = 4
msitem.Text = "Numero DI"
msitem.Col = 1
msitem.ColWidth(1) = 2500
msitem.ColAlignment(1) = 4
msitem.Text = "Fecha"
msitem.Col = 2
msitem.ColWidth(0) = 1200
msitem.ColAlignment(0) = 4
msitem.Text = "Rut Empresa"---------------> aki
msitem.Col = 3
msitem.ColWidth(1) = 2500
msitem.ColAlignment(1) = 4
msitem.Text = "CRT"
msitem.Col = 4
msitem.ColWidth(0) = 1200
msitem.ColAlignment(0) = 4
msitem.Text = "Rut Transportista"
msitem.Col = 5
msitem.ColWidth(1) = 2500
msitem.ColAlignment(1) = 4
msitem.Text = "Empresa"
msitem.Col = 6
msitem.ColWidth(0) = 1200
msitem.ColAlignment(0) = 4
msitem.Text = "Estado DI"
msitem.Col = 7
msitem.ColWidth(1) = 2500
msitem.ColAlignment(1) = 4
msitem.Text = "Transportista"
msitem.Col = 8
msitem.ColWidth(0) = 1200
msitem.ColAlignment(0) = 4
msitem.Text = "Item"
msitem.Col = 9
msitem.ColWidth(1) = 2500
msitem.ColAlignment(1) = 4
msitem.Text = "Knetos"
End Sub
