vba 获取当前路径

最新推荐文章于 2024-08-17 09:13:08 发布

nongcunqq

最新推荐文章于 2024-08-17 09:13:08 发布

阅读量3.1k

点赞数 1

分类专栏： vb

本文链接：https://blog.csdn.net/nongcunqq/article/details/115011179

版权

vb 专栏收录该内容

15 篇文章 1 订阅

订阅专栏

Sub get_path()

Dim ActivePath As String
ActivePath = ActiveWorkbook.Path

Range("a1") = ActivePath


End Sub

在这里插入图片描述

参考

看67433的回答
https://zhidao.baidu.com/question/2117151906662330347.html

确定要放弃本次机会？

福利倒计时

: :

立减 ¥

普通VIP年卡可用

立即使用

nongcunqq

关注关注

1
点赞
踩
4

收藏

觉得还不错? 一键收藏
0
评论
复制链接

分享到 QQ

分享到新浪微博

扫一扫

专栏目录

VB得到或获取路径

05-07

Excel VBA获取文件当前路径、文件另存、提取对话框输入的多个数据

xfjane的专栏

12-24

1954

Excel VBA获取文件当前路径、文件另存、提取对话框输入的多个数据

参与评论您还未登录，请先登录后发表或查看评论

VBA学习(36)：获取文件全路径（一）GetOpenFilename 方法

最新发布

nianfen的博客

08-17

866

pthsht = Application.GetOpenFilename("excel Files(*.xl*),*.xl*", , "请选择文件", ,pthsht = Application.GetOpenFilename("excel Files(*.xl*),*.xl*", , "请打开文件", ,如果省略该参数，或者该参数的值大于可用筛选条件数，则使用第一个文件筛选条件。好了，这节课就分享到这里，稍后还会分享获取文件全路径的另外两种方法。可选参数，代表指定文件筛选条件的字符串。

Application.GetOpenFilename 使用说明

weixin_30305735的博客

11-14

4081

Application.GetOpenFilename(FileFilter, FilterIndex, Title, ButtonText, MultiSelect) 语法：名称　　说明 FileFilter　　可选参数，代表指定文件筛选条件的字符串。如果省略该参数，默认为：“所有文件(*.*),*.*”。FilterInde...

vba 获取当前文件路径

liuxiaofeng1991的博客

07-07

2549

1 2 3 4 5 Sub?s() ????Dim?pth$ ????pth?=?ThisWorkbook.Path ????MsgBox?"本文件的路径为："?&?pth End?Sub

vba获取当前所在路径，请写出详细代码，谢谢

weixin_35755434的博客

02-14

2660

以下是 VBA 代码用于获取当前工作路径： Dim strPath As String strPath = Application.ActiveWorkbook.Path MsgBox strPath 代码说明：定义一个字符串变量strPath来存储当前工作路径。使用Application.ActiveWorkbook.Path获取当前活动工作簿的路径，并将其存储到strPath中。最后...

VBA如何获取当前EXCEL文件的路径

热门推荐

niepangu的专栏

10-13

4万+

返回应用程序完整路径 Application.Path 返回当前工作薄的路径 ThisWorkbook.Path 返回当前默认文件路径： Application.DefaultFilePath Application.ActiveWorkbook.Path 只返回路径 Application.ActiveWorkbook.FullName

【vba】【excel】获取当前文件的路径

weixin_61256014的博客

02-26

484

一句话就搞定。

VB:获取程序运行的当前路径

学习小笔

04-02

4134

自己在学习过程中，查资料所掌握的一些小知识，和大家分享，关于APP的内容

VBA获取当前路径有多少个文件夹

03-21

您可以使用以下代码获取当前路径下的文件夹数量： ``` Sub GetFolderCount() Dim path As String Dim folderCount As Integer path = ActiveWorkbook.path '获取当前路径 folderCount = 0 '循环遍历当前...

Excel VBA 操作拆分当前Excel表中 / 所选取文件夹所有子文件中所有sheet保存到对应文件夹路径中拆分表内

06-05

要使用这个宏，你需要在运行前选择一个文件夹，例如通过`Application.GetSaveAsFilename`函数获取用户指定的路径。然后，调用`SplitWorkbook`子过程并传入这个路径。如果你想要处理一个文件夹内所有Excel文件，你...

VB 获取系统路径

06-08

VB 获取系统路径 VB 获取系统路径 VB 获取系统路径

VBA读取递归读取所有子目录

06-16

下载文件，放到指定的文件夹，打开excle，点击运行。该文件夹的和文件夹下的所有子目录就出来了。

VBA常用技巧

12-21

- **CurrentRegion属性**：返回当前选定区域的连续单元格。 **技巧2：选定单元格区域** - **Select方法**：选择单元格，如`Range("A1:C3").Select`。 - **Activate方法**：激活单元格，如`Range("A1").Activate`。...

Excel-VBA宏编程实例源代码-获取Excel路径.zip

12-14

这个“Excel-VBA宏编程实例源代码-获取Excel路径.zip”文件包含了一个具体示例，教我们如何通过VBA获取当前打开的Excel工作簿的完整路径。下面将详细讲解这一知识点及其相关背景和应用。首先，了解VBA的基本结构。...

Excel vba返回的路径.docx

09-26

在Excel VBA编程中，获取和操作文件路径是非常常见的需求。以下是对标题和描述中提到的知识点的详细说明： 1. **返回应用程序完整路径**：使用`Application.Path`可以获取到Excel应用程序安装的根目录。例如，它...

VBA-ThisWorkbook.Path

ben9518chen的博客

03-28

1万+

Workbooks.Open ("C:\对账单\对帐单.xlsx") 这里你可以把“C:\对账单\”换成你的绝对路径，你可以用：a = ThisWorkbook.Path a = ThisWorkbook.Path Workbooks.Open ("" & a & "&" \ "&对帐单.xlsx") ...

vba中有多线程吗_通过VBA来找到excel库文件的路径

weixin_39702649的博客

12-14

515

都知道excel中有一个库文件，一些对excel有深入了解的有可能会需要使用这个excel的库文件，你知道excel的库文件在哪里吗，一般来说excel的库文件放在了安装目录下，但是到了不是自己的电脑下就找不到库文件了，我们可以通过VBA来找到excel库文件的路径。我们在excel中写下的VBA语句来显示EXCEL库文件的路径。Public Sub EXCEL库文件路径() MsgBox "Ap...

VBA之获取目录（二）

Gaodes的博客

05-26

856

接上一篇，如果我们获取完目录，需要生成新的sheet页 Sub main() Dim line As Integer Dim row As Integer Dim dic_arr(0 To 10) As String Dim dic_index As String Dim sheetname As String dic_index = 0 ...

vba 获取当前 路径

vba 获取当前路径