小编ash*_*awg的帖子

从Outlook下载附件并在Excel中打开

我正在尝试下载,然后使用Excel中的VBA在Outlook电子邮件中打开Excel电子表格附件.我怎么能够:

  1. 从我的Outlook收件箱中的第一封电子邮件(最新电子邮件)下载唯一的附件
  2. 附件保存在具有指定路径的文件中(例如:"C:...")
  3. 使用以下命令重命名附件名称:当前日期 + 上一个文件名
  4. 将电子邮件保存到其他文件夹中,其路径如"C:..."
  5. 将Outlook中的电子邮件标记为"已读"
  6. 在Excel中打开 Excel附件

我还希望能够将以下内容保存为分配给各个变量的单个字符串:

  • 发件人电子邮件地址
  • 接收日期
  • 发送日期
  • 学科
  • 电子邮件的消息

虽然这可能更好地在一个单独的问题中提出/自己寻找它.

我目前的代码来自其他在线论坛,可能不是很有帮助.但是,这里有一些我一直在努力的点点滴滴:

Sub SaveAttachments()
    Dim olFolder As Outlook.MAPIFolder
    Dim att As Outlook.Attachment
    Dim strFilePath As String
    Dim fsSaveFolder As String

    fsSaveFolder = "C:\test\"

    strFilePath = "C:\temp\"

    Set olFolder = Application.GetNamespace("MAPI").GetDefaultFolder(olFolderInbox)

    For Each msg In olFolder.Items
        While msg.Attachments.Count > 0
            bflag = False
            If Right$(msg.Attachments(1).Filename, 3) = "msg" Then
                bflag = True
                msg.Attachments(1).SaveAsFile strFilePath & strTmpMsg
                Set msg2 …
Run Code Online (Sandbox Code Playgroud)

excel outlook vba excel-vba email-attachments

26
推荐指数
1
解决办法
7万
查看次数

Excel告诉我我的空白单元格不是空白

所以在excel中我试图通过使用F5找到空白单元格来删除我的单元格中有空白单元格的空白单元格,然后按Ctrl + - 删除它们,并将单元格向上移动.但是,当我尝试这样做时,它告诉我"没有找到细胞".

我注意到,如果我选择"空白"单元格,Excel仍然会计算它们: 就像在这张照片中这很奇怪.但是如果我在那些选定的单元格上按Delete键,计数就会消失,然后我可以去F5,空白,Ctrl + - 和Shift单元格,它可以工作......

所以我的问题是我怎么能这样做,但Excel认为这些空白单元格不是空白的?我试图通过删除空白单元格,但我有很多数据,并意识到这将花费我很长时间.我需要找到一种方法来在选择的数据中选择这些"空白"单元格.

在此先感谢您的帮助!:)

excel vba excel-vba

24
推荐指数
4
解决办法
18万
查看次数

返回所选单元格的背景颜色

我有一个电子表格,其中的单元格有意义地着色.

有没有人知道如何在Excel工作表中返回当前单元格的背景颜色值?

excel vba excel-vba

23
推荐指数
4
解决办法
12万
查看次数

用于查找字符串中最常见子字符串的算法

是否有任何算法可用于查找字符串中最常见的短语(或子串)?例如,以下字符串将"hello world"作为其最常见的双字短语:

"hello world this is hello world. hello world repeats three times in this string!"

在上面的字符串中,最常见的字符串(在空字符串字符之后,重复无限次数)将是空格字符.

有没有办法在这个字符串中生成一个公共子串列表,从最常见到最不常见?

language-agnostic algorithm

23
推荐指数
2
解决办法
1万
查看次数

Excel中用于蒙特卡罗模拟的RAND()函数有多好?

我正在Excel中的3个变量中实现蒙特卡罗模拟.我已经使用RAND()函数从Weibull分布中采样(带有长尾).应用于样本的函数是非线性但平滑的(exp,ln,cos等).每个样本的结果是通过/失败,总体结果是失败的概率.

我也通过MathCad中的数值积分和蒙特卡罗实现了这一点,两次得到相同的结果.MathCad使用(我认为)Mersenne Twister随机数生成器.

我的Excel电子表格得到的结果始终不同(即总是更大).我检查过方程是一样的.

Excel使用什么随机数生成器,它有多好?这可能是我问题的根源吗?我假设exp,cos等的Excel实现都可以.

最后,有没有办法实现蒙特卡罗来减轻特定随机数发生器的(已知的)不良特性?(我听说马尔可夫链,随机走路等,但对它们并不是很了解)

非常感谢.

statistics excel vba excel-vba

22
推荐指数
2
解决办法
3万
查看次数

VBA中的<>是什么运算符

我正在研究一些代码并且遇到了这个:

If DblBalance <> 0 Then
Run Code Online (Sandbox Code Playgroud)

我无法弄清楚这是什么算子,任何帮助将不胜感激.

vba operators

22
推荐指数
3
解决办法
18万
查看次数

在Excel VBA中单击OnClick

有没有办法用Excel在VBA中捕获单元格?我不是指Worksheet_SelectionChange事件,因为如果多次单击该单元格,则不会多次触发.BeforeDoubleClick也没有解决我的问题,因为我不想要求用户双重点击那个.

我当前的解决方案确实适用于该SelectionChange事件,但似乎需要使用全局变量和其他次优编码实践.它似乎也容易出错.

excel vba excel-vba

21
推荐指数
2
解决办法
11万
查看次数

如何确定日期是否在周末?

给定日期作为输入,我如何确定当天是否属于周末?

excel vba excel-vba

21
推荐指数
3
解决办法
6万
查看次数

VBA:使用值初始化对象?

我希望能够初始化一个

CArticle 具有以下属性:

Private pNumber As String
Private pQuantity As Double
Run Code Online (Sandbox Code Playgroud)

具有空值,预定义值或当前值.我怎样才能做到这一点?我正在考虑以下几点:

新空 CArticle

pNumber
pQuantity
Run Code Online (Sandbox Code Playgroud)

新的假人 CArticle

pNumber
pQuantity = 99999
Run Code Online (Sandbox Code Playgroud)

新的init CArticle(number, quantity)

pNumber = number
pQuantity = quantity
Run Code Online (Sandbox Code Playgroud)

variables vba initialization object

21
推荐指数
1
解决办法
5万
查看次数

获得实际使用范围

我有一个带有按钮的Excel工作表.

当我调用usedRange()函数时,它返回的范围包括按钮部分.

无论如何我可以获得包含数据的实际使用范围吗?

excel vba excel-vba

20
推荐指数
3
解决办法
15万
查看次数