|
Post by pathfiner on Apr 30, 2021 8:59:35 GMT
Hello All
First Question:
After receiving my 2nd Gen Pro OBDEleven I have taken the advice of many and done a complete Backup and emailed myself the .txt file and imported this into Excel.
I was expecting the output to be sensibly delimited so that rather than getting the following in Excel
Column A Column B ASAM/ODX file identification:
---:
EV_ECM20TFS0208V0906259N
I could get this..
Column A Column B ASAM/ODX file identification: EV_ECM20TFS0208V0906259N
I have tried varies delimiters but without success. Am I missing something?
However the above isn't absolutely necessary for comparison as I can simply import the two files along side each other in Excel and have a compare function to identify changes.
So the first full backup I have done the Modules are all in order....however when i run a second backup the order in which the Modules appear seemed to be reversed.
What am I doing wrong..... I need to maintain a constant order of items in a back up.....otherwise a comparison will become very difficult.
|
|
Deleted
Deleted Member
Posts: 0
|
Post by Deleted on Apr 30, 2021 11:05:02 GMT
Not seen the backups doing stuff in different order, will give it a try later to see if I get the same.
It works fine for me but not for Don (DV52) so give it a try and let me know if it works for you.
However in terms of the format as has been raised few times its very nice to look at but it is not a clean file layout.
|
|
|
Post by pathfiner on Apr 30, 2021 16:54:12 GMT
Ok so out of the box the macro didn't work for me. I had a look at the coding and made two small changes and it works a treat now. ( Please forgive my brutal coding skills but it works.)
The changes
1. At the beginning
' The purpose of this macro is to produce a single flat file extract so that it can easily be imported into SQL or Access database.
'Ensures that the macro starts on the right Sheet.
Sheets("OBD11 Data Import").Select
Columns("A:A").Select
'Creates a blank row to put in first bit of coding.
Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove
2. At the end.
Dim rng As Range
Set rng = ActiveSheet.UsedRange
' For i = rng.Cells.Count To 1 Step -1 ' If rng.Item(i).Value = "UnWanted" Then
' rng.Item(i).EntireRow.Delete
'
' End If
' Next i
j = 1
For i = 2 To rng.Cells.Count
If Cells(i, 2) <> "UnWanted" Then
Cells(j, 4) = Cells(i, 1)
j = j + 1
End If
Next i
Columns("A:C").Delete
Sheets("OBD11 Data Import").Select
Columns("A:K").Delete
Range("A1").Select
Sheets("OBD11 CSV Extract").Select
Range("A1").Select
Now all I need to do is understand why OBDeleven is outputting my backups in reverse module order and I will be away....
|
|
|
Post by dv52 (Australia) on Apr 30, 2021 21:06:14 GMT
@pathfinder: Hi.
I have no problems with the brutality of your coding changes - by any measure, your parsing skills are heaps more sophisticated than mine!!
I've been trying to get OBD11 to provide a flat file option for the Backup facility for some time now -without success. Like you, I find it incomprehensible to understand why anyone would opt for the format that is currently used by OBD11. Other than looking pretty in the most simple of cases, transforming what is ostensibly a relational database into a document structure and expecting the output to be usable for even the most modest of today's vehicle is just sheer madness (IMO, of course)!
Anyhow, I have given-up pleading for a more sensible arrangement (like a simple .CSV format option) and I'm not even sure if VOLTAS IT agrees that a change should be made - which is the reason for this response.
As I understand, with your programming changes - you have managed to get @testeronline macro to work. If so, can you post-up a copy of the macro with the changes made for others (read "for me") to use- please
Don
PS: I assume from your coding changes that nothing has altered to the cell address for the copy-and-paste exercise
|
|
Deleted
Deleted Member
Posts: 0
|
Post by Deleted on Apr 30, 2021 22:56:18 GMT
I have updated with the changes and saved it over the original file. Its not deleting all the detritus but I will have a look at that over the weekend if i get a chance.
I just pasted my test extract to A1 as before and a reminder it only fully works for English and Spanish labeled files
|
|
|
Post by dv52 (Australia) on May 1, 2021 2:31:22 GMT
@testeronline : Again thanks - but alas same result - this time a series of #NAME? entries in column A!! Guess it's just not meant to be!!
Don
|
|