Excel_VBA 获取文件的上级目录

最新推荐文章于 2022-01-05 22:46:08 发布
原创 最新推荐文章于 2022-01-05 22:46:08 发布 · 3.6k 阅读 · 6 ·
CC 4.0 BY-SA版权
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。

本文详细解析了使用VBA从工作簿中获取路径的方法，通过使用ThisWorkbook.Path属性并结合Mid和InStrRev函数，实现高效路径提取。适合VBA编程初学者和进阶者参考。
部署运行你感兴趣的模型镜像
Sub test()
p = ThisWorkbook.Path
p = Mid(p, 1, InStrRev(p, "\"))
Debug.Print p
End Sub

您可能感兴趣的与本文相关的镜像

Stable-Diffusion-3.5

Stable-Diffusion-3.5

图片生成
Stable-Diffusion

Stable Diffusion 3.5 (SD 3.5) 是由 Stability AI 推出的新一代文本到图像生成模型，相比 3.0 版本，它提升了图像质量、运行速度和硬件效率

VBA获取指定目录下的所有文件目录信息
weixin_43957681的博客
01-18 2412
这段VBA（Visual Basic for Applications）代码用于创建一个Excel宏，该宏用于生成文件夹中所有文件的列表，并显示文件名、大小以及创建、修改和访问日期等详细信息。用于获取检索指定文件夹及其子文件夹内的文件时可用该方法导出。
全民一起VBA实战篇第五课：外部文件处理技巧
qq_43568982的博客
02-06 1155
题目一 用窗口选择/打开文件 Sub get方法() Dim fname fname = Application.GetOpenFilename() '获取选择的文件名 If fname <> False Then '判断是否有选中，如果点了取消，则退出程序 '否则运行文件 MsgBox fname ...
VBA之获取目录（一）
Gaodes的博客
05-26 2732
例子 [01]一级目录 [02]二级目录 [3]三级目录 内容1 内容2 .............................................. ............................................... 如何使用v...
VBA自动获取二级文件夹目录
Yogurt_cry的博客
10-10 2746
Sub FindFileName() ThisWorkbook.Worksheets(1).UsedRange.Delete '打开文件时清空所有单元格内容 Dim DirectPath As String '定义父文件夹路径 Dim ChildDirectPath As String '定义子文件夹路径 DirectPath = ThisWorkbook.Pat...
Excel——快速获取文件路径
Hern（宋兆恒）
07-26 1万+
（包含文件名称与格式）CELL函数获取Excel当前文件路径可以帮助我们查看当前Excel工作簿的路径：在任意空白单元格输入公式：【=CELL("filename")】，即可返回当期工作簿在电脑的存储路径。 （不包含文件名称与路径）INFO函数获取Excel当前文件路径：在任意单元格中输入公式=INFO("directory")即可返回当期工作簿在电脑的存储路径。 （获取多个文件路径，通过系统实现，仅限于Windows）选中想要获取路径的文件，选择系统左上方的【主页】——【复制路径】..
VBA-ThisWorkbook.Path
ben9518chen的博客
03-28 1万+
Workbooks.Open ("C:\对账单\对帐单.xlsx") 这里你可以把“C:\对账单\”换成你的绝对路径， 你可以用：a = ThisWorkbook.Path a = ThisWorkbook.Path Workbooks.Open ("" & a & "&" \ "&对帐单.xlsx") ...
ExcelVBA列出指定目录及子目录文件
04-10
在Excel VBA中，我们可以利用文件系统对象（FileSystemObject）来遍历指定的目录及其子目录，并将所有文件的信息列出到工作表中。这是一项非常实用的技能，尤其是在需要批量处理或管理大量文件时。以下将详细介绍...
VBA示例之 求人不如自已动手 取得一个文件的路径2
10-26
在这个示例中，我们将重点探讨如何使用VBA的文件系统对象（FileSystemObject，简称FSO）来获取文件路径。 在VBA中，`FileSystemObject` 提供了一种方法来与文件系统交互，包括读取、写入、创建和删除文件及目录。要...
上述Excel VBA代码中的文件对象，除了Name和Path外，还有哪些属性
08-12
可用于获取文件的上级目录路径。 #### `ShortName` 和 `ShortPath` 返回文件的短名称（8.3 格式）及其短路径。在某些旧系统或命令行操作中可能会用到。 #### `Drive` 返回文件所在驱动器的对象。可用于判断文件...
VBA提取文件夹名到excel
最新发布
09-30
'排除当前目录（.）和上级目录（..）以及文件（因为Dir返回的文件夹没有属性标识，需进一步判断） If folderName <> "." And folderName <> ".." Then '检查是否是文件夹（通过检查路径属性） If (GetAttr(path ...
相对路径上一级及上上级目录的表示方法
热门推荐
野猿新一
07-22 5万+
问题引入，绝对路径的缺点 在Android开发中我会把keystore签名文件放在项目根目录下，然后在build.gradle中配置release包的签名配置，这样每次可以一键打包，不要要再选择签名输入密码等，配置如下所示 signingConfigs { release { keyAlias 'keyAlias' keyPassword 'keyPa...
获取项目当前路径，上一级，下一级
qq_30443907的博客
06-05 8229
public static void main(String[] args){ Test2 test = new Test2(); try { test.showURL(); } catch (IOException e) { // TODO Auto-generated catch block e.printStackTrace(); } } public void showURL() thro...
VBA实战(08) - 文件和文件夹处理
jie_ming514的博客
01-05 3108
文件与文件夹汇总 选择文件 下面代码可以弹出文件框，让用户选中文件，其中 strFile 为选中后的地址文件名，取消或关闭文件框均为退出程序。 '弹窗选择文件 With Application.FileDialog(msoFileDialogFilePicker) .AllowMultiSelect = False '单选择 .Filters.Clear '清除文件过滤器 .Title = "请选择文件" .InitialFileName = "" .Filt
vba 获取当前sheet总行数_VBA入门只需3天 VBA中的绝对路径与相对路径
weixin_39928099的博客
12-08 749
这是VBA入门只需3天的第2篇，第1篇讲得是vba中Range的用法。点击阅读！3天之后，我们将可以使用VBA进行多Sheet汇总。今天我们需要了解的是VBA中的相对路径和绝对路径。绝对路径，顾名思义，完整的磁盘路径就是绝对路径。例如这样完整的磁盘路径就是绝对路径。C:甥敳獲AdministratorDesktopMerge_Sheet而相对路径，表示的是一个文件相对另外一个文件的位置。大家可以参...
获取上一级目录
weixin_34301307的博客
08-08 543
procedure TForm1.Button1Click(Sender: TObject);vara,b,c:string;begina:=ExtractFilePath(paramstr(0));b:=copy(a,1,length(a)-1);showmessage(ExtractFilePath(b + '..')); end; 转载于:https...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值