CN105183859A - 一种基于表格的线束公用线查找方法 - Google Patents
一种基于表格的线束公用线查找方法 Download PDFInfo
- Publication number
- CN105183859A CN105183859A CN201510572923.9A CN201510572923A CN105183859A CN 105183859 A CN105183859 A CN 105183859A CN 201510572923 A CN201510572923 A CN 201510572923A CN 105183859 A CN105183859 A CN 105183859A
- Authority
- CN
- China
- Prior art keywords
- common line
- wire harness
- different
- wire
- content
- Prior art date
- Legal status (The legal status is an assumption and is not a legal conclusion. Google has not performed a legal analysis and makes no representation as to the accuracy of the status listed.)
- Pending
Links
Classifications
-
- G—PHYSICS
- G06—COMPUTING; CALCULATING OR COUNTING
- G06F—ELECTRIC DIGITAL DATA PROCESSING
- G06F16/00—Information retrieval; Database structures therefor; File system structures therefor
- G06F16/90—Details of database functions independent of the retrieved data types
- G06F16/903—Querying
- G06F16/90335—Query processing
Landscapes
- Engineering & Computer Science (AREA)
- Databases & Information Systems (AREA)
- Theoretical Computer Science (AREA)
- Computational Linguistics (AREA)
- Data Mining & Analysis (AREA)
- Physics & Mathematics (AREA)
- General Engineering & Computer Science (AREA)
- General Physics & Mathematics (AREA)
- Package Frames And Binding Bands (AREA)
Abstract
本发明的一种基于表格的线束公用线查找方法将不同图号的线束按照同样的记录格式建立工作表格,并且将不同图号的线束的工作表格复制到同一个表格文档中,并建立公用线工作表格;将需要查找公用线的不同图号的线束的工作表格内容复制到公用线工作表格中并按照线号排序;对不同图号的线束的相同线号的内容进行比较,当所有比较内容完全相同的时候,则设定该线号为公用线,当比较内容不同的时候,则不能作为公用线并将不同的内容进行颜色标记。本发明通过表格辅助宏命令对线束的公用线进行查找,这样与传统的人工查找的方法相比,查找效率大大提高,并且查找的准确率为100%。
Description
技术领域
本发明涉及一种线束公用线查找方法,特别是一种基于表格的线束公用线查找方法。
背景技术
在现代汽车上,汽车线束特别多,电子控制系统与线束有着密切关系。有人曾经打了一个形象的比喻:如果把微机、传感器与执行元件的功能用人体来比喻,可以说微机相当于人脑,传感器相当于感觉器官,执行元件相当于运动器官,那么线束就是神经和血管了。汽车线束是汽车电路的网络主体,连接汽车的电气电子部件并使之发挥功能,没有线束也就不存在汽车电路。在目前,不管是高级豪华汽车还是经济型普通汽车,线束编成的形式基本上是一样的,都是由电线、联插件和包裹胶带组成,它既要确保传送电信号,也要保证连接电路的可靠性,向电子电气部件供应规定的电流值,防止对周围电路的电磁干扰,并要排除电器短路。
所谓公用线,就是不同图号的线束中相同线号记录内容完全相同的线,公用线的查找传统采用人工方式进行查找,通过人工在不同图号的线束图上进行查找,效率低下并且错误率较高,并且当图号很多,线束较为复杂的时候,人工查找很难完成。
发明内容
本发明所要解决的技术问题是提供一种查找快捷准确的基于表格的线束公用线查找方法。
为解决上述技术问题,本发明所采用的技术方案是:
一种基于表格的线束公用线查找方法,其特征在于包含以下步骤:
A、将不同图号的线束按照同样的记录格式建立工作表格,并且将不同图号的线束的工作表格复制到同一个表格文档中,并建立公用线工作表格;
B、将需要查找公用线的不同图号的线束的工作表格内容复制到公用线工作表格中并按照线号排序;
C、对不同图号的线束的相同线号的内容进行比较,当所有比较内容完全相同的时候,则设定该线号为公用线,当比较内容不同的时候,则不能作为公用线并将不同的内容进行颜色标记;
上述步骤均采用工作表格宏命令完成。
进一步地,所述同样的记录格式是按照顺序对线束的线种、规格、下料长度、A端端子、A端预装件、B端端子、B端预装件进行记录。
进一步地,所述不同图号的线束的相同线号的内容比较完成后,将设定的公用线的条数和占所有线号的百分比进行输出。
进一步地,所述对不同图号的线束的相同线号的内容进行比较,没有公用线的时候,在表格输出提示检查各图号的线束的数据。
本发明与现有技术相比,具有以下优点和效果:
1、基于表格的线束公用线查找方法操作方便,通过工作表格宏命令进行自动操作,效率很高;
2、通过宏命令进行自动对比查找公用线,准确率高;
3、基于表格自动查找,这样图号很多并且线束很多的情况下,也能够快速准确的查找出公用线。
附图说明
图1是本发明的实施例的表格图。
具体实施方式
下面结合附图并通过实施例对本发明作进一步的详细说明,以下实施例是对本发明的解释而本发明并不局限于以下实施例。
本发明的一种基于表格的线束公用线查找方法,包含以下步骤:
A、将不同图号的线束按照同样的记录格式建立工作表格,并且将不同图号的线束的工作表格复制到同一个表格文档中,并建立公用线工作表格;
B、将需要查找公用线的不同图号的线束的工作表格内容复制到公用线工作表格中并按照线号排序;
C、对不同图号的线束的相同线号的内容进行比较,当所有比较内容完全相同的时候,则设定该线号为公用线,当比较内容不同的时候,则不能作为公用线并将不同的内容进行颜色标记;
上述步骤均采用工作表格宏命令完成。
其中,同样的记录格式是按照顺序对线束的线种、规格、下料长度、A端端子、A端预装件、B端端子、B端预装件进行记录。不同图号的线束的相同线号的内容比较完成后,将设定的公用线的条数和占所有线号的百分比进行输出。对不同图号的线束的相同线号的内容进行比较,没有公用线的时候,在表格输出提示检查各图号的线束的数据。
其中建立公用线工作表宏命令为:
Sheets("公用线").Select
Range("A2").Select
Range("A1")="图号"
Range("B1")="线号"
Range("C1")="线种"
Range("D1")="规格"
Range("G1")="下料长度"
Range("H1")="A端端子"
Range("J1")="A端预装件"
Range("L1")="B端端子"
Range("N1")="B端预装件"
将不同图号的线束按照同样的记录格式建立工作表格,并且将不同图号的线束的工作表格复制到同一个表格文档中的宏命令为:
DimiAsInteger
DimshAsWorksheet
ForEachshInWorksheets
sh.Select
Cells.Select
Selection.Interior.ColorIndex=xlNone
Ifsh.Name<>"公用线"Then
IfRange("b2")=""AndRange("c2")=""Then
Application.DisplayAlerts=False
sh.Delete
Application.DisplayAlerts=True
Else
DimrAsInteger
Dimr1AsInteger
'sh.Select
'Cells.Select
'Selection.Interior.ColorIndex=xlNone
'r=Sheets("sheet"&i).Range("b65536").End(xlUp).Row
r=Range("b65536").End(xlUp).Row
'Sheets("sheet"&i).Select
Range("A2:O"&r).Select
Selection.Copy
Sheets("公用线").Select
r1=Sheets("公用线").Range("b65536").End(xlUp).Row
Range("A"&r1+1).Select
ActiveSheet.Paste
EndIf
EndIf
对不同图号的线束的相同线号的内容进行比较的宏命令为:
Sheets("公用线").Select
DimlAsInteger'定义公用线工作表的数据行数
l=Range("b65536").End(xlUp).Row
Range("A1:O"&l).SortKey1:=Range("B2"),Order1:=xlAscending,Key2:=Range(_
"D2"),Order2:=xlAscending,Key3:=Range("G2"),Order3:=xlAscending,Header:=xlGuess,OrderCustom:=1,MatchCase:=False,Orientation:=_
xlTopToBottom,SortMethod:=xlPinYin,DataOption1:=xlSortNormal,_
DataOption2:=xlSortNormal,DataOption3:=xlSortNormal
Range("A2").Select
DimmAsInteger
DimnAsInteger
'DimpAsInteger
'Stop
Form=2Tol
Forn=1ToSheets.Count-2
'Forp=2To15
IfCells(m,3)=Cells(m+n,3)AndCells(m,4)=Cells(m+n,4)And_
Cells(m,7)=Cells(m+n,7)AndCells(m,8)=Cells(m+n,8)And_
Cells(m,10)=Cells(m+n,10)AndCells(m,11)=Cells(m+n,11)And_
Cells(m,12)=Cells(m+n,12)AndCells(m,14)=Cells(m+n,14)And_
Cells(m,15)=Cells(m+n,15)Then
Else
'Rows(m).Deleteshift:=xlUp
Rows(m&":"&m).Select
Selection.ClearContents
EndIf
'Nextp
Nextn
Nextm
Range("A2:O"&l).SortKey1:=Range("C2"),Order1:=xlAscending,Key2:=Range(_
"D2"),Order2:=xlAscending,Key3:=Range("G2"),Order3:=xlAscending,_
Header:=xlGuess,OrderCustom:=1,MatchCase:=False,Orientation:=_
xlTopToBottom,SortMethod:=xlPinYin,DataOption1:=xlSortNormal,_
DataOption2:=xlSortNormal,DataOption3:=xlSortNormal
Range("A2").Select
DimqAsInteger
q=Sheets("公用线").Range("b65536").End(xlUp).Row
Rows(q+1&":"&q+5000).Select
Selection.DeleteShift:=xlUp
'MsgBox"公用线查找完成!共找出"&q-1&"条"&"约"&Round(((q-1)/(r-1)),3)*100&"%的公用线!"
ForEachshInWorksheets
Ifsh.Name<>"公用线"Then
DimwAsInteger
DimyAsInteger
DimzAsInteger
sh.Select
w=Range("b65536").End(xlUp).Row
Fory=2Toq
Forz=2Tow
IfSheets("公用线").Range("b"&y)=Range("b"&z)Then
sh.Select
Range("A"&z&":O"&z).Select
WithSelection.Interior
.ColorIndex=4
.Pattern=xlSolid
EndWith
EndIf
Nextz
Nexty
EndIf
Next
Worksheets("公用线").Select
Range("A2").Select
Ifr-1=0Then
MsgBox"没有公用线,请仔细检查各图号中的数据!!"
Else
DimaAsInteger
DimbAsInteger
r=Sheets("公用线").Range("b65536").End(xlUp).Row
Fora=2Tor
Range("a"&a)=""
Forb=2ToSheets.Count-1
Range("a"&a)=Range("a"&a)&Sheets(b).Name&"/"
'Range("a"&a)=Range("a"&a)&Sheets(Sheets.Count).Name
Nextb
Range("a"&a)=Range("a"&a)&Sheets(Sheets.Count).Name
Nexta
MsgBox"公用线查找完成!共找出"&q-1&"条"&"约"&Round(((q-1)/(r-1)),3)*100&"%的公用线!"_
&"等待查找各线号之间的不同点,用红色字体标出!"
EndIf
'查找各线号之间的不同点,用红色字体标出
DimxAsInteger
DimyyAsInteger
DimkAsInteger
DimryAsInteger
DimrrAsInteger
DimkkAsInteger
Forx=2ToSheets.Count-1
Foryy=x+1ToSheets.Count
ry=Sheets(yy).Range("b65536").End(xlUp).Row
Forrr=2Tory
OnErrorResumeNext
k=0
k=Sheets(x).Range("b:b").Find(Sheets(yy).Range("b"&rr),,,xlWhole).Row
Ifk=0Then
Sheets(yy).Range("b"&rr).Font.ColorIndex=3
Else
Forkk=3To15
IfSheets(x).Cells(k,kk)<>Sheets(yy).Cells(rr,kk)Then
Sheets(yy).Cells(rr,kk).Font.ColorIndex=3
Sheets(x).Cells(k,kk).Font.ColorIndex=3
EndIf
Nextkk
EndIf
'k=0
Nextrr
Nextyy
Nextx
MsgBox"各线号之间的不同点查找完毕,已用红色字体标出!"
EndSub
实施例,如图所示,3个图号,图号A、图号B和图号C,将三个图号的内容复制到公用线工作表中并按照线号排序,然后进行对比,其中线号100和线号101比较内容完全相同,设定为公用线并输出公用线2条,占比66.7%,而线号102有不同内容,将图号A、图号B和图号C的不同内容的下料长度和A端端子用红色字体标出。
本说明书中所描述的以上内容仅仅是对本发明所作的举例说明。本发明所属技术领域的技术人员可以对所描述的具体实施例做各种各样的修改或补充或采用类似的方式替代,只要不偏离本发明说明书的内容或者超越本权利要求书所定义的范围,均应属于本发明的保护范围。
Claims (4)
1.一种基于表格的线束公用线查找方法,其特征在于包含以下步骤:
A、将不同图号的线束按照同样的记录格式建立工作表格,并且将不同图号的线束的工作表格复制到同一个表格文档中,并建立公用线工作表格;
B、将需要查找公用线的不同图号的线束的工作表格内容复制到公用线工作表格中并按照线号排序;
C、对不同图号的线束的相同线号的内容进行比较,当所有比较内容完全相同的时候,则设定该线号为公用线,当比较内容不同的时候,则不能作为公用线并将不同的内容进行颜色标记;
上述步骤均采用工作表格宏命令完成。
2.按照权利要求1所述的一种基于表格的线束公用线查找方法,其特征在于:所述同样的记录格式是按照顺序对线束的线种、规格、下料长度、A端端子、A端预装件、B端端子、B端预装件进行记录。
3.按照权利要求1所述的一种基于表格的线束公用线查找方法,其特征在于:所述不同图号的线束的相同线号的内容比较完成后,将设定的公用线的条数和占所有线号的百分比进行输出。
4.按照权利要求1所述的一种基于表格的线束公用线查找方法,其特征在于:所述对不同图号的线束的相同线号的内容进行比较,没有公用线的时候,在表格输出提示检查各图号的线束的数据。
Priority Applications (1)
Application Number | Priority Date | Filing Date | Title |
---|---|---|---|
CN201510572923.9A CN105183859A (zh) | 2015-09-10 | 2015-09-10 | 一种基于表格的线束公用线查找方法 |
Applications Claiming Priority (1)
Application Number | Priority Date | Filing Date | Title |
---|---|---|---|
CN201510572923.9A CN105183859A (zh) | 2015-09-10 | 2015-09-10 | 一种基于表格的线束公用线查找方法 |
Publications (1)
Publication Number | Publication Date |
---|---|
CN105183859A true CN105183859A (zh) | 2015-12-23 |
Family
ID=54905940
Family Applications (1)
Application Number | Title | Priority Date | Filing Date |
---|---|---|---|
CN201510572923.9A Pending CN105183859A (zh) | 2015-09-10 | 2015-09-10 | 一种基于表格的线束公用线查找方法 |
Country Status (1)
Country | Link |
---|---|
CN (1) | CN105183859A (zh) |
Citations (5)
Publication number | Priority date | Publication date | Assignee | Title |
---|---|---|---|---|
US20030006779A1 (en) * | 2000-04-21 | 2003-01-09 | Krigel H. Youval | Apparatus and method for validating wiring diagrams and creating wirelists |
CN102004206A (zh) * | 2010-10-20 | 2011-04-06 | 天津豪风机电设备有限公司 | 汽车线束检测设备中线束数据的录入对比方法 |
CN102819627A (zh) * | 2012-04-09 | 2012-12-12 | 李锁 | 根据汽车线束图纸自动生成下料工艺卡的方法 |
CN103473383A (zh) * | 2013-05-27 | 2013-12-25 | 李晓波 | 根据汽车线束图纸自动提取物料清单的方法 |
CN104850715A (zh) * | 2015-05-28 | 2015-08-19 | 中国北车集团大连机车车辆有限公司 | 基于eplan平台的城轨车辆配线方法 |
-
2015
- 2015-09-10 CN CN201510572923.9A patent/CN105183859A/zh active Pending
Patent Citations (5)
Publication number | Priority date | Publication date | Assignee | Title |
---|---|---|---|---|
US20030006779A1 (en) * | 2000-04-21 | 2003-01-09 | Krigel H. Youval | Apparatus and method for validating wiring diagrams and creating wirelists |
CN102004206A (zh) * | 2010-10-20 | 2011-04-06 | 天津豪风机电设备有限公司 | 汽车线束检测设备中线束数据的录入对比方法 |
CN102819627A (zh) * | 2012-04-09 | 2012-12-12 | 李锁 | 根据汽车线束图纸自动生成下料工艺卡的方法 |
CN103473383A (zh) * | 2013-05-27 | 2013-12-25 | 李晓波 | 根据汽车线束图纸自动提取物料清单的方法 |
CN104850715A (zh) * | 2015-05-28 | 2015-08-19 | 中国北车集团大连机车车辆有限公司 | 基于eplan平台的城轨车辆配线方法 |
Similar Documents
Publication | Publication Date | Title |
---|---|---|
DE102014208643A1 (de) | Fahrzeug-Sensor und Fahrzeug-Sensorsystem | |
CN106656710A (zh) | 一种can总线终端电阻自动接入电路 | |
CN104779974B (zh) | 网络传输的电磁干扰抑制装置与方法 | |
CN105183859A (zh) | 一种基于表格的线束公用线查找方法 | |
CN205869948U (zh) | 一种pcb板插装机 | |
CN207560031U (zh) | Can通信电路终端电阻可控的控制器 | |
CN206892859U (zh) | Can接口电路 | |
CN207409768U (zh) | 一种基于接插件的机舱接线连接装置 | |
CN207869128U (zh) | 带can通信总线的多协议车载诊断盒 | |
CN206684224U (zh) | 车辆和用于车辆的电流传感器 | |
CN206075526U (zh) | 继电保护装置无线通信系统 | |
CN210866714U (zh) | 博世ecu车下诊断系统 | |
CN210806258U (zh) | 车辆电子控制单元车下诊断一转三接头 | |
CN105138792A (zh) | 一种基于表格的线束导线长度计算方法 | |
DE102017200687A1 (de) | Sender und Empfänger für ein differenzielles Niederspannungssignal | |
CN209017064U (zh) | 一种can通讯网路 | |
CN207038876U (zh) | 一种变速箱控制器连接线束 | |
CN206237257U (zh) | 电机及空调 | |
CN206819380U (zh) | 一种近场通信调制解调电路、安全芯片及动态令牌 | |
CN206743200U (zh) | 一种伺服驱动信号控制电路 | |
CN216248815U (zh) | 一种EtherCAT总线的开环脉冲方向模块 | |
CN205920159U (zh) | 用于电能表的通用接口 | |
CN204013476U (zh) | 一种读取can总线数据的装置 | |
CN205264938U (zh) | 一种can总线的连接接口 | |
CN205356376U (zh) | Can总线线束连接结构 |
Legal Events
Date | Code | Title | Description |
---|---|---|---|
C06 | Publication | ||
PB01 | Publication | ||
C10 | Entry into substantive examination | ||
SE01 | Entry into force of request for substantive examination | ||
RJ01 | Rejection of invention patent application after publication |
Application publication date: 20151223 |
|
RJ01 | Rejection of invention patent application after publication |