我想问一下您，如何用VBA在EXCEL中将变量引入到引用路径中去？ EXCEL高手请进，在相对路径下，EXCEL里面vba中，V...
dim sPath$,sFilename$,sSheetname$
dim sTemp$,i%
sPath="H:\HRleader\DOCMENT\shift handover report\LINE\L18-DG DN" '可以自己修改
sFilename="L18-DN.xls" ‘同上
sSheetname="October" ’同上
sTemp="'"& sPath & "\[" & sFilename & "]" & sSheetname & "'!"
With Thisworkbook.Worksheets("Sheet1")
For i=5 to 80
With .Range("A"& i - 3 )
.FormulaR1C1="=" & Temp & "$C$" & i
.value=.value
End With
Next i
End With
End Sub
P.S. 如果要循环调用不同路径的不同文件的不同Sheet，
可以给sPath,sFilename,sSheetname赋数组，
如
dim i%,Sheetname(1 to 12)
For i = 1 to 12
Sheetname(i)=Array ("January","February","March","April","May","June", _
"July","August","September","October","November","December")(i)
Next i
则可以在后续的程序中调用Sheetname(1)到Sheetname(12)
如
.....
For k = 1 to 12
sTemp="'"& sPath(i) & "\[" & sFilename(j) & "]" & sSheetname(k) & "'!"
.......sTemp......
Next k
......
eǎycr谩eǎxw取g濮n∨z唰ⅷㄆ 不e需要，只要在同一k个cExcel中4的Module文4件，其中1变量可以2相当于q同一l文3件的变量的访问。
for i= 1 to 2 step 1
"H:\HRleader\DOCMENT\shift handover report\LINE\L18-DG DN\[L18-DN.xls]" & i & "'!I5"
next
Excel 如何将变量引入到引用路径中去？~
用VBA很容易实现。就是把这个单元格的值与你的路径动态的做成一个字符串再设置为某个单元格的公式就可以了。
'和当前打开的EXCEL文件放在同一个目录就可以Sub 更新() Sheet1.[b14] = "=VLOOKUP(D14,[原材料检验报告.xls]Cement!$A$2:$AE$1000,31,FALSE)"End Sub
Excel 在VBA中怎么调用公式
答：按说Excel函数应该只在工作表中应用,好像VBA不可以用的,但实际上许多Excel函数具有很高的效率,如果能把两者结合起来的话,肯定是事半功倍!但说实在话,开始时我总是想着如何从VBA的角度来解决问题,当初Excel函数这块掌握不较少,导致现在一想才发现自己真的很浅薄!不过回过头来想,如果可以掌握如何在VBA程序...
如何用vba实现在excel各工作表中插入一列
答：这种比较简单的操作，录制一个宏就可以了，你在第一个表格中，点工具－－宏－－录制新宏，然后在sheet1中第一列前插入一列，copy单元格c3中的内容到插入的空白列，从A5开始到最后一行，最后，删除前四行，点击结束录制宏。考虑到执行宏后数据无法恢复，所以你要先备份一遍。全选所有的sheet，点击运行...
如何用Excel VBA读取某一文件夹下批量TXT文本内的某行某列?
答：安装程序会指导你完成常规的安装对话框，其中你可以填入所有你想要记录的选项。当你完成后，安装程序在\WINNT文件夹下创建一个名为setup.iss的文件。 要启动一个无人值守安装，运行setupsql.exe程序，用-s作为执行安静安装的参数、-fl参数指定一个应答文件。例如，要启动一个安静的、无人值守的安装——...
各位高手,请教一下 用VBA设置单元格的格式为“自动换行”
答：第六：在对齐对话框中选择对齐方式下侧有一个文本控制复选框，可以根据自己的需求进行选择。还有就是文字的方向和旋转的度数。7 /7 第七：调整完成后，点击对话框右下角的确定按钮，然后点击完成就可以 扩展:开发速度快，客户的需求一般都是很着急要的，客户不会太看重过程，而是结果。所以VBA可以帮你...
在excel里插入一列,用哪个函数vba
答：Columns("E:E").Select Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove教你一个用VBA的技巧：以后你想知道类似于插入的vba编码怎么写，可以利用宏录制，宏录制后会自动在编辑器中生成一个模块，你所录制的宏 的相应编码就在里面，这样你就可以参考使用了。
使用Excel VBA,如何将某一个工作表保存到新建的Excel中?
答：其中Application.DisplayAlerts、 Application.ScreenUpdating 语句把过程中的无必要的警告都删除了，像在删除多余的工作表时会提示“数据可能在你要删除的工作表中，请问是否要删除”等等的警告，在写程序的过程中可以写不加人，有利于了解工程是怎么运作的，但是最后还是加上这两句比较好，否则用户使用时太多...
在excel里如何用vba实现选中一行的部分内容后,按enter后弹出inputbox...
答：Excel 本身只有 Worksheet.SelectionChange 事件稍微接近这个需求，但是选中连续区域后你按 Enter 你的选区是不会改变的，因此这个时候要捕捉键盘事件绝非易事。下面代码也只是在检测到选区仅为单个单元格时并且是按下 Enter 触发的才弹出 InputBox：Code in Sheet1:Option Explicit#If VBA7 Then Privat...
请问如何利用EXCEL VBA 让所选区域底色变色
答：该代码在你进行选择单元格时自动执行，包括你修改过后，也会自动填充相应背景色及边框。如有需要修改，继续追问Option ExplicitPublic i As IntegerPublic j As IntegerPublic borders_colors As IntegerPublic backgroup_colors As IntegerPrivate Sub Worksheet_SelectionChange(ByVal Target As Range) If i...
EXCEL中用VBA如何根据sheet1中的值判断sheet2中的值是否符合要求?并下...
答：要通过VBA把Sheet1工作表中的数据写入Sheet2工作表中，可以采用如下方法：1、假如要把Sheet1工作表中A1单元格的数据写入Sheet2工作表的A1单元格中。2、可以执行以下语句：sub test()sheets("Sheet2").range("A1").Value=sheets("Sheet1").range("A1").Value end sub 3、语句解释：range("A1")...
在excel中如何使用VBA插入一个按钮,使其点击按钮实现在表格中单元格输入...
答：A1到AN是横向输入？应该是纵向呀！Sub 按钮1()Cells(Range("a65536").End(xlUp).Row + 1, 1) = 1 End Sub Sub 按钮2()Cells(Range("a65536").End(xlUp).Row + 1, 1) = 2 End Sub 插入一个按钮控件，把下面的代码贴进去，注意你的button的名字替换掉Private Sub CommandButton1_...
