Tag: macos

Excel VBA：运行时错误7：内存不足: 如果有人能帮我解决我遇到的这个问题，我将不胜感激。基本上，VBA是一个searchfunction，使用户能够从作业数据库中search部分或全部作业名称。但是，它会导致“运行时错误7：内存不足”。这只发生在我的Macbook上，并不会在Windows电脑上发生。点击“debugging”，它将我带到这行代码： `If scd.Cells(i, j) Like "*" & Search & "*" Then 请帮忙！谢谢！其余的代码如下： Option Compare Text Sub SearchClientRecord() Dim Search As String Dim Finalrow As Integer Dim SearchFinalRow As Integer Dim i As Integer Dim scs As Worksheet Dim scd As Worksheet Set scs = Sheets("Client Search") Set scd = […]

显示百分比，但在图表中没有百分比叹息: 我有这个显示百分比（如下）的条形图。是否可以调整格式显示百分比，但没有百分比符号？即如下？我知道我可以更改来源（在下图中完成）。但是我正在寻找一个解决scheme，我可以改变条的格式，而一个简单的条形图显示％的格式是0%;;; ，我试过把它改为0;;; ， 0;;;*100等，但我无法设法得到第二个图。这是对Mac的Excel！

Excel VBA – 提取离线MAC地址: 我目前正在制作一个提取MAC地址的Excel工作表。我设法通过使用以下代码提取连接/在线MAC地址： Dim objVMI As Object Dim vAdptr As Variant Dim objAdptr As Object Dim adptrCnt As Long Set objVMI = GetObject("winmgmts:\\" & "." & "\root\cimv2") Set vAdptr = objVMI.ExecQuery("SELECT * FROM Win32_NetworkAdapterConfiguration WHERE IPEnabled = True") For Each objAdptr In vAdptr If Not IsNull(objAdptr.MACAddress) And IsArray(objAdptr.IPAddress) Then For adptrCnt = 0 To UBound(objAdptr.IPAddress) If […]

在Mac上从VBAmacros启动Googlesearch: 就在前面，我不是一个真正的程序员。我在编辑工作，我们公司使用许多macros来简化我们的stream程和function（大量的findReplace，识别不一致的拼写/间距约定等）。话虽如此，我已经开始拿起一些关于VBA编辑器如何在Microsoft Word上工作的东西。我们有一个Fetchmacros（最初由Paul Beverley创build），对于所有使用PC的员工来说都非常有效。它需要在文档中突出显示的术语，自动打开网页浏览器，并执行谷歌search。但是，我们有几个使用Office 2011 for Mac的员工，他们无法使用与PC用户相同的function。我真的很想调整macros，这样它就可以在Mac上工作，但是我缺乏训练严重阻碍了我。以下是我们公司用于PC的原始脚本： Sub GoogleFetch() ' Version 08.05.12 ' Launch selected text on Google useExplorer = False runBrowser = "C:\Program Files (x86)\Google\Chrome\Application\chrome.exe" mySite = "http://www.google.com/#q=" If Len(Selection) = 1 Then Selection.Words(1).Select mySubject = Trim(Selection) mySubject = Replace(mySubject, "&", "%26") mySubject = Replace(mySubject, " ", "+") […]

从第三个工作簿本身打开的工作簿调用打开时，工作簿不会打开: 我面临一个关于vba的问题，从一个文件（我们称之为file1）解释我自己，通过点击一个button，打开另一个工作簿（file2），当到达这个工作簿时，它要求打开另一个文件（file3），但它不….（当我写“设置WBK =工作簿（文件3），它给了我的错误”下标超出范围“）事实上，当我直接打开file2时，它将打开文件3，没有任何问题有人有答案吗？在文件1 Private Sub CommandButton3_Click() UserForm1.Hide Workbooks.Open ("Boss4 copy.xlsm") End Sub 在文件2（Boss4副本） Private Sub Workbook_Open() Dim MyPath As String Dim MyScript As String Dim MyFiles As String Dim MySplit As Variant Dim N As Long Dim Fname As String Dim mybook As Workbook On Error Resume Next MyPath = MacScript("return (path […]

如何在MAC上使用VBA从Excel 16打开工作簿？: 我想用MAC 10.10上的Excel 16的VBA从一个小的macros打开一个简单的工作簿，但我不能。我有我的macros： Sub Test() Call Workbooks.Open("Classeur1.xlsm") End Sub 与Office 11，此function正常工作，但我有Office 16的错误：运行时错误“1004”：应用程序定义或对象定义的错误你有什么想法解决它吗？

编译错误：search一个特定的数据点，循环整个工作簿，复制/粘贴数据: Excel VBA初学者回来了更多。我正在创build一个macros来做以下两件事情： 1）通过单个工作簿中的多个工作表search特定数据（名称），下面的variablesA 2）如果出现该名称，则将工作表（下面的variablesX）中特定范围的单元格复制到主文件（下面的variablesB） Sub Pull_X_Click() Dim A As Variant 'defines name Dim B As Workbook 'defines destination file Dim X As Workbook 'defines existing report file as source Dim Destination As Range 'defines destination for data pulled from report Dim ws As Worksheet Dim rng As Range A = Workbooks("B.xlsm").Worksheets("Summary").Range("A1").Value Set B = […]

我不能使用VBA工作表variablesMe来填充该Excel工作表中embedded的ComboBox？: 我只是试图填充embedded在Excel工作表中的combobox。我正在使用Mac版Excel 2010。以下返回运行时错误445“对象不支持此操作” Public Sub Worksheet_Activate() With Me.Shapes("TheComboBox").ControlFormat .RemoveAllItems .List = Array("me", "you") End With 但是，以下将工作正常 Public Sub Worksheet_Activate() With Worksheets(1).Shapes("TheComboBox").ControlFormat .RemoveAllItems .List = Array("me", "you") End With 请注意代码是在Worksheet 1的Worksheet_Activate子，所以我和工作表（1）应该引用完全相同的东西（正确的？）。我在网上发现了这个类似的post，build议Excel for Mac不喜欢在作为variables传递的工作表上使用ControlFormat。是否有避免必须硬编码工作表的编号或名称的解决方法？我不希望用户移动或重命名工作表，从而打破它。

VBA在Windows Excel上运行，但不在Mac Excel中运行: 当我在Windows Excel上运行VBA时，它工作。当我在Mac上运行相同的VBA，它不起作用。然后，我点击“debugging”它macros观macros的下面的部分 Selection.Replace What:="-", replacement:="/", LookAt:=xlPart, _ SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _ ReplaceFormat:=False

如何在Excel 2010中安装/使用“Scripting.FileSystemObject”for MAC？: 我正在使用VBA版本14.0的Mac 2011的Excel 。我试图使用这个代码来访问我知道在Windows上工作的文件系统： Function qfil_GetDirectory(strDirectoryName As String) Dim objFSO As Variant Dim objDirectory As Variant Set objFSO = CreateObject("Scripting.FileSystemObject") Set objDirectory = objFSO.GetFolder(strDirectoryName) Set qfil_GetDirectory = objDirectory End Function 但是，当我在Excel 2011中运行它，它给了我这个错误：运行时错误429使用ActiveX组件创build对象是不可能的为了解决这个问题，我知道我必须在工具下引用特定的DLL 。但是，在Mac上，当我下工具| 引用它只给了我这些：而且他们都不允许我使用Scripting.FileSystemObject 。在Excel 2011 for Mac中我需要做些什么，以便我可以使用Scripting.FileSystemObject通过VBA从Excel工作表读取硬盘中的文件？