Desired effect: click on the control, the parameter data update separately to the corresponding file folder name corresponding position work thin sheet2, strives for the great god help
!!!!!!!!! because I don't know how to upload attachments, I put the compressed file suffix to JPG, trouble after downloading to zip

CodePudding user response:

I can't see pictures,


If you upload the file correctly, then a red fork fork image placeholder also should be displayed,
Unfortunately, this also have no,

CodePudding user response:

Upload will not come up, there is always a circle where the block, can not leave a qq or something, I send you directly in the past, I'll come back later to take

CodePudding user response:

Upload will not come up, there is always a circle where the block, can not leave a qq or something, I send you directly in the past, I'll come back later to take

CodePudding user response:

My QQ number to 332989850

CodePudding user response:

Send mail I see: [email protected]

CodePudding user response:

You always like to use "SQL"?
Seem "tall", is it!
But I never like,

 Sub button 4 _click () 
Dim objWBK As Workbook 
Dim objSht As Worksheet 
Dim strPath As String 
Dim strText As String 
Dim As Long I 

The Set objSht=ThisWorkbook. Sheets (" Sheet1 ") 
StrPath=ThisWorkbook. Path & amp; "" 
I=1 & amp; 
Do 
I=I + 1 & amp; 
StrText=objSht. Cells (I, 1). The Text 
If (" "=strText) Then Exit the Do 
The Set objWBK=Workbooks. Open (strPath & amp; StrText & amp; ". XLSX ") 
ObjWBK. Sheets (" Sheet2 "). The Range (" F14 "). The Value=https://bbs.csdn.net/topics/objSht.Cells (I, 2). The Value 
ObjWBK. Sheets (" Sheet2 "). The Range (" the G14 "). The Value=https://bbs.csdn.net/topics/objSht.Cells (I, 3). The Value 
ObjWBK. Sheets (" Sheet2 "). The Range (" H14 "). The Value=https://bbs.csdn.net/topics/objSht.Cells (I, 4). The Value 
ObjWBK. Close vbTrue 
Loop 
End Sub 

CodePudding user response:

Thank you thank you, is I want, than SQL works!!!!!!

CodePudding user response:

The

reference 7 floor qq_21110999 response:

thank you thank you, is I want, than SQL works!!!!!!

Problem solved for you, please bear ah,