小编Adr*_*ian的帖子

有没有办法将背景颜色更改xlNone为例如整个工作表.我看到你可以放一张背景图片......但你怎么能改变表格中所有单元格的颜色呢？

我在vb中有一个选择器

Dim ver =101
Select Case ver
        Case 101
            upd101()
        Case 102
            upd102()
        Case 103
            upd103()
    End Select

如何通过以这种形式更动态地调用函数来更好地选择这个:使用前缀"upd"后跟一个ver整数..？

谢谢!阿德里安

如何将网页加载到.net中的字符串中？

我希望以最快的方式......

我最近开发了一个 Android 应用程序，并发布了它，但我在开发者控制台列表中没有看到任何当前安装。我已经安装在 2 台设备上。该应用程序是免费的，我也有付费版本。我已经有 3 条评论，但没有显示安装...？！

play.google.com/store/apps/details?id=iappz.universalconverterfree

我还需要做什么设置？是否必须添加/设置 Google Analytics 来跟踪此情况？

我的印象是，这已经是内置的，并且基本的安装统计数据已经可用......

谢谢

Hy,如何遍历匹配通配符的文件并找到上次创建日期的文件.这是在VB ...所以我有一些具有特定前缀的文件,我喜欢找到最后一个日期时间创建的文件!他怎么能这样做？

谢谢!阿德里安

如何使用密码打开工作簿,禁用事件,然后将后台工作表复制到第二个文件并保存.我需要在VBA中,使用MS-Access和Excel文件

我这样做到现在为止,正在努力.

Private Sub TestFunction()

'strPath = CurrentDb.Properties(0)
'strPath = Left(strPath, Len(strPath) - Len(Dir(strPath, vbNormal))) & "Temp\"
Dim CopyFrom As Object
Dim CopyTo As Object ''Early binding: Workbook
Dim CopyThis As Object
Dim xl As Object ''Early binding: New Excel.Application

Set xl = CreateObject("Excel.Application")
xl.Visible = True
Set CopyFrom = xl.Workbooks.Open("D:\A01.xls")
'CopyFrom.EnableEvents = False
Set CopyThis = CopyFrom.Sheets(1) ''Sheet number 1
Set CopyTo = xl.Workbooks.Open("D:\PM1.xls")
CopyThis.Copy After:=CopyTo.Sheets(CopyTo.Sheets.Count)
CopyFrom.Close
End Sub

这将打开Excel,我输入传递副本的工作表到第二个文件.

但我需要在后台传递密码,删除工作表并保存第二个文件,全部在后台.另外我需要删除一张表,而不是问我,如:

CopyTo.Sheets("Sheet1").Delete

谢谢

简单!如何在.NET中用某些东西替换？