在Excel中从string列表中分割列

我正在尝试创build基于文本文件的Excel文档。 这是我的文本文件的一个例子: example.txt文件 |<Number1>| |TREE= 800 | |BIRD = 500 | |FISH = 25 | |DOG = 10 | |CAT = 5 | |ANOTHERCAT = 800 | |THERESOMANYCATS = 3 | |HAMSTER = 5 | |<Number2>| |TREE= 800 | |BIRD = 500 | |FISH = 25 | |DOG = 10 | |CAT = 5 | […]

Excel中使用一个声明variables在另一个子

我想在这里做的是使用我声明的“vSelection”在另一个小组,但它似乎并没有工作。 也许任何人都可以帮助我? 这是我宣布的地方。 Public Sub cmdBladeren_Click() Dim vSelection As Variant vSelection = Application.GetOpenFilename("Graphics files (*.gif), *.gif") If vSelection = False Then MsgBox "Selecteer een foto!" Exit Sub End If End Sub 这是我想要使用它的地方 Private Sub btnOK_Click() Dim rngRange As Range Dim rngProduct As Range Dim lTop As Long Dim lLeft As Long Dim oShape As Shape […]

设置活动单元closures

我有一个macros分配到一个特定的单元格,启动一个dateselect器日历。 不幸的是,当我的工作簿被closures时,同一个单元在下次打开时仍然是活动单元格。 这会导致下一个用户必须点击另一个单元格,然后再次点击macros的单元格以启动日历。 我期望完成的是一个将使另一个单元格closures或保存工作簿的活动。 这样,当一个人打开工作簿时,他们只需要点击macros的单元格来启动日历。

性能问题在外部数据源的两个表中运行Excel中的macros

在工作表上,我有两个表,它们是从两个不同的外部来源填充的,一个来自db2和另一个SQL服务器。 一旦表中的数据被刷新,我将触发一个运行VBA代码的macros,这个代码循环遍历两个表中的单元格并应用业务规则。 在本地进行testing,按预期工作,macros在几秒钟内完成。 当我将连接更改为指向networking上的db2和SQL Server数据库时,它会及时刷新数据,但是当我触发macros时, 30分钟即可完成。 只有连接已被更改,我正在使用相同的工作簿进行所有testing。 首先想到的是,它现在正在从networking中提取数据,可能是连通性的,但是它刷新了数据OK,而且它只是运行缓慢的macros,VBA代码不使用连接,只是循环的基础。 我失去了什么是造成这一点,想知道是否有人曾经遇到过这种行为,知道如何解决它?

函数检查列中的两个值是否相等,以及它们对应的行值之一是否相等

我有一个Excel电子表格,其中包含Raw file和Sequences作为列。 我想检查Sequences列find任何重复的序列和所有的重复,以检查他们的Raw file也是相同的。 这是它的样子: | 原始文件| 序列| otherdata1 | otherdata2 | | HU_932 | BLAST | **& | (&| | WR_235 | HELLO | #(@ |#@ * | | HU_932 | BLAST | #@(|(#)| | HU_932 | CHART | $&@ | %#* | | RT_329 | BLAST | ^ *)| @ $#| 所以在上面的例子中,我希望能够只select第一和第三行,因为这些是Sequences唯一的行,并且Raw file是相同的。 […]

从embedded的模板文件中将模板应用于Excel VBA中的powerpoint

我正试图通过excel将一个模板应用到一个简报。 PowerPoint模板通过插入 – >对象embedded到我的Excel文件中。 我已经成功地使用.applytemplate方法来从文件中应用模板,但我无法调整代码以引用embedded的PPT模板。 我试过使用OLEObject,但是恐怕这是不正确的。 请查看下面的代码。 Sub ppCreate() Dim myPP As PowerPoint.Application Dim myPres As PowerPoint.Presentation Dim activeSlide As PowerPoint.Slide Dim ppObj As OLEObject ' Create instance of PowerPoint Set myPP = CreateObject("Powerpoint.Application") ' For automation to work, PowerPoint must be visible myPP.Visible = True ' Create a presentation Set myPres = myPP.Presentations.Add ' […]

如何将arrarylist值存储到sqlitedb?

我把手机中的所有数字都存入了数组列表,现在我需要将所有这些数字存储到sqlitedb中,这样我就可以轻松地将它们转换为Excel表格。 List list = new ArrayList(); String number = cur.getString(cur.getColumnIndex(CommonDataKinds.Phone.NUMBER)); list.add(数);

Webview在通用的Windows应用程序

我在我的通用Windows 10应用程序中使用webview控件来打开任何链接,如:Uri uri = new(“ http://www.c-sharpcorner.com ”); WebView1.Navigate(URI); 现在我想在webview中打开MS Excel文件。 我将我的excel文件保存为.htm / .html格式,然后我想在webview中打开这个.htm / .html页面,但是当我尝试在浏览器(Firefox / explorer)中打开它时, 。 我复制相同的链接并通过WebView1.Navigate(//链接//); 但不开放。 如何在webview中打开这个.htm / .html(excel文件)。 谢谢。

只想在运行VBA代码的时候显示一个Popup或者状态栏

我有一个很长的代码,并采取约。 1分30秒执行,所以我想显示一个状态栏显示“请稍等…正在运行”或一个popup式的相同的消息或任何其他的将是容易的。 它包括很多做,而如果条件..我不想用任何长码或非常沉重的方法来显示消息,请build议一些小方法来做到这一点。

使用相同的查找值自动增加列索引(VLOOKUP)

所以我得到了以下查询: = VLOOKUP(A20;员工:GE;柱(C:C); FALSE) 下一列应具有相同的查找值(A20),但COLUMN(D:D)作为列索引号。 而这种情况持续数百列。 这可能吗?