I have a excel sheet as below,
And now I want to get these data into my sql server as below,
When inserting data into my sql server I don't want to insert duplicates and null records.
How can I do this?
Thank you.
>Your current source data includes both 4 and 5 columns
I changed it into like this and now both of them have 5 columns. ("E12:I138"),("R12:V138")
For Each mycell In myrow.Cells
myVSFlexgrid.TextMatrix(i, l) = mycell.Text
l = l + 1
Next
By doing this code I got "Invalid property...
I want to match all columns.
Yes it is doing manually.
I got only this range values. I go this range Example oXLSheet.Range("E12:H138"), oXLSheet.Range("Q12:U138"), but I didn't get the values.
Thank you
And I used this also, but I got and error as subscript out of range error in the below highlighted line.
Dim vArray As Variant
vArray = oXLSheet.Range("E12:H138,Q12:U138").Value
With oXLSheet
For lp = 1 To UBound(vArray)...
This is my excel.
And I want to get my output as below,
In my final output I want to get all these data into a grid and also need to remove duplicates also.
Thank you.
i=50 and l=0.
Is there have any other way to get my output?
With oXLSheet
Excel.Application.ScreenUpdating = False
Example oXLSheet.Range("E12:H138"), oXLSheet.Range("Q12:U138")
Excel.Application.ScreenUpdating = True
End With
This is what I did in my code. By doing this I...
This is how I declared Array1.
Dim Array1(12 To 138, 12 To 138, 12 To 138) As Variant
I want to get my output as I mentioned above. How can I do that using this Array1?
And I don't want to use X=X+1 in my loop.
Thank you.
I did something like this,
With oXLSheet
Job = oXLSheet.Range("D12 : D138").Value
Des = oXLSheet.Range("D12 : D138").Value
SMV = oXLSheet.Range("D12 : D138").Value
For lngRow1 = LBound(Job, 1) To UBound(Job, 1)
For lngRow2 =...
I got this error in this highlighted line and I want to read these ranges and get data into my array.
Private Sub VSFlexGrid2_DblClick()
Dim oXLBook As Excel.Workbook
Dim oXLSheet As Excel.Worksheet
Dim Style_no As String
Dim Line_no As String
Dim vArray As Variant
Dim Array1(D12 To H138...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.