Tag: excel vba mac

是否有可能使分页符，所以当我查看PDF格式的一切格式？

Sub pagesetuptrythis() ' ' pagesetuptrythis Macro ' ' Range("A1:L1").Select ActiveWindow.SmallScroll Down:=173 Range("A1:L195").Select With ActiveSheet.pagesetup .PrintTitleRows = "" .PrintTitleColumns = "" End With ActiveSheet.pagesetup.PrintArea = "$A$1:$L$195" With ActiveSheet.pagesetup .LeftHeader = "" .CenterHeader = "" .RightHeader = "" .LeftFooter = "" .CenterFooter = "" .RightFooter = "" .LeftMargin = Application.InchesToPoints(0.75) .RightMargin = Application.InchesToPoints(0.75) .TopMargin = Application.InchesToPoints(1) .BottomMargin […]

Mac上的VBA下拉列表中无法设置ControlFormat.Value

我在Excel中创build了一个导航系统，在VBA中使用了两个相互关联的下拉框（表单控件）。 首先是主要类别（Drop Down 186），其次是主要类别中的子类别（Drop Down 187） 当我select主要类别（186）时，我将子类别（187）重置为列表项目＃1使用： Sheets("Equipment").Shapes("Drop Down 187").ControlFormat.Value = 1 这可以在PC上正常工作，但在Excel 2016中发出1004错误，并显示“无法设置DropDown类的Value属性”消息。 有任何想法吗？ 很确定这在Excel 2011上正常工作。

CSV导入时运行时错误“5”（Excel 2011，Mac）

我一直在爬网站寻求解决我的问题。 我使用Excel 2011 for Mac OS X 10.10.5。 我的情况是这样的：我有一堆CSV文件，我需要导入到Excel进一步的统计分析。 这里是我的一个CSV文件的例子 （与谷歌驱动器共享）。 数据以逗号分隔，并且应该导入到所有表格的单元格A1中（为了说明，我不希望在A1中有所有的数据，那现在真是愚蠢，不应该，CSV数据应该从这里开始，横跨A列和B列，直到行号~1200或任何长度）。 导入给定CSV文件的工作表应以CSV文件命名（不带“.csv”），因为稍后将使用工作表名称调用数据。 使用导入向导是非常单调乏味的，有180个导入，一个VBA代码/macros将会帮助很多，因为它需要我6个非常集中的时间（我喜欢在Excel中做聪明的东西） 目前我有一个代码添加新的工作表，但它不工作 （1）数据没有被导入 – 我得到一个运行时错误'5' – 无效的过程调用或参数。 （2）表格以文件types扩展名.csv命名。 任何想法，为什么我在这之后得到一个错误？ With ActiveSheet.QueryTables.Add( _ Connection:="TEXT;" & Fname, _ Destination:=Range("A1"))l 当前代码： Sub CSVIMPORTTEST2() Dim MyPath As String Dim MyScript As String Dim MyFiles As String Dim MySplit As Variant Dim N As Long Dim Fname […]

Excel 2011和Excel 2016可以在OSX上使用相同的macros工作簿源吗？

这可能是非常具体的，但我在工作中使用macros。 我们最近在办公室里得到了Mac版的Excel 2016，除了VBA编辑器在function和易用性方面受到重创之外，它比Excel 2011更好。 最近，我一直在使用Excel 2011个人macros工作簿编辑macros，然后将所有代码复制/粘贴到我的Excel 2016个人macros工作簿中，这可能很麻烦，并且在将来的某个时候很容易出错。 2011年和2016年的源代码是否有可能来自相同的个人macros观工作簿，因此在2011年进行编辑时，它会自动更改2016年的使用情况？ 如果有人有解决scheme，这也可能是一个很好的方式来共享定期更新的同事之间的macros。

VBA Excel到Mac – 文件path

以前有我的工作的人在PC上使用Excel中的VBA创build报告来跟踪办公室里的财务状况。 它从多个工作簿中获取信息。 我想在Mac上运行它。 我把所有相关的文件移到我的电脑上。 我知道我需要更新文件path，但即使这样做我也迷路了。 当前文件path如下所示：Application.Workbooks.Open（“C：\ Users \ Chris Treeman \ My Documents \ Dept MathCS Financials \ Accounting Files \ Dept。Fund Tracking \ Daily Compass Report Files \”＆“CFSPPSUM – ”＆SpecifiedDate ＆“.xls”） 我已经从我的Mac使用获取信息复制path。 这是正确的吗？ Application.Workbooks.Open（“/ Users / robert / Documents / Reporting / Dept MathCS Financials / Accounting Files / Dept。Fund Tracking / Daily Compass […]

在使用vba为单元格范围添加名称时，请避免包含图纸名称

我正在使用Excel 2011 for Mac（版本14.3.1）中的一些数据，我需要绘制图表并稍后添加更多数据。 要做到这一点，我使用范围名称，因为它在这里解释。 基本上，使用公式=OFFSET($A$2,0,0,COUNTA($A:$A)-1) （用西class牙语： =DESREF($A$2,0,0,CONTARA($A:$A)-1) ）。 我有很多专栏，所以我写了这个vba来为我做： Sub Botón6_AlHacerClic() For i = 1 To Columns.Count Names.Add Name:=ActiveSheet.Name & Range(Cells(1, i).Address).Value, RefersTo:="=DESREF(" & Cells(2, i).Address & ",0,0,CONTARA(" & Replace(Cells(1, i).Address, "$1", "") & ":" & Replace(Cells(1, i).Address, "$1", "") & ")-1)" Next i End Sub 哪里： Cells(2, i).Address是第二行的单元格ID（例如： $ A $ 2 ） […]

VBAmacros在Excel 2016 for Windows上工作，但不适用于Mac

我有一个Excel 2016的macros，它非常适合创buildPDF。 但是这个macros只适用于Windows的Excel 2016。 我在Mac上使用Excel 2016（最新版本）进行试用，并且不起作用。 这是我的macros Sub Macro1() Dim Chemin As String Dim texte As String Chemin = ThisWorkbook.Path & "/" texte = Range("C3") Application.DisplayAlerts = False ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _ Filename:=Chemin & texte & ".pdf", _ Quality:=xlQualityMinimum, _ IncludeDocProperties:=True, _ IgnorePrintAreas:=False, _ OpenAfterPublish:=False Cells(1, 3).Value = Cells(1, 3).Value + 1 End Sub 我做了大量的search，似乎“ExportAsFixedFormattypes：= xlTypePDF”不适用于Mac的最后一个Excel版本。 […]

在Mac上ExecuteExcel4Macro – 1004错误

我是创buildmacros的新手。 我正在录制一个简单的macros，使用两列创build一个数据图。 当我运行macros代码时，我不断收到以下错误： 运行时错误“1004”： 您键入的公式包含一个错误。要获得input帮助function，请单击确定，然后单击插入菜单上的function。 •如果您不想input公式，请避免使用等号（=）或减号（ – ），或在其前面加上单引号（'）。 这里是VB代码： Sub Macro4() ' ' Macro4 Macro ' ' Keyboard Shortcut: Option+Cmd+p ' Range("A1:B39").Select ExecuteExcel4Macro (FALSE,240,73) ActiveChart.SetSourceData Source:=Range("'5E627659 host-260'!$A$1:$B$39") End Sub 我为Mac运行Excel 2016。 当我在Windows机器上尝试相同的东西时，它可以工作。 不知道我在这里做错了什么。 请帮忙。

运行时错误1004上.Refresh BackgroundQuery：= False VBA

早安，那是我的第一篇文章…所以请耐心等待:) 我有一个VBA代码的问题，我试图在Excel 2016上执行。我正在运行一台MacOSX Sierra机器。 每天我需要从3个.csv文件导入数据，并把它放在3个不同的Excel工作表，以特定的方式格式化数据，并添加一个networking链接，所以我logging了一个macros的Excel文件，这对我来说。 这里是导入一个.csv的代码（对于所有的都是一样的） Sub csvimport() ' ' csvimport Macro ' ' Keyboard Shortcut: Option+Cmd+Shift+I ' Sheets("displayAddedByCollaboration").Select Columns("A:A").Select With ActiveSheet.QueryTables.Add(Connection:= _ "TEXT;/Users/oem/Desktop/report/displayAddedByCollaborationReport.csv", _ Destination:=Range("A1")) .Name = "displayAddedByCollaborationReport" .FieldNames = True .RowNumbers = False .FillAdjacentFormulas = False .RefreshOnFileOpen = False .BackgroundQuery = True .RefreshStyle = xlInsertDeleteCells .SavePassword = False .SaveData = True .AdjustColumnWidth = […]

如何通过Excel VBA代码手动传递用户名和密码以获取SharePoint 2010列表数据

目标 – 通过Excel VBA代码专门获取SharePoint列表数据到Excel中。 问题 – 下面的代码将列表值加载到预期的Excel中，但我想通过使用相同的代码手动传递用户名和密码，所以我可以根据需要更改凭据。 使用的技术 – SharePoint 2010和Excel VBA。 完整代码： Sub RCAFunc() Dim objMyList As ListObject*emphasized text* Dim objWksheet As Worksheet Dim strSPServer As String Const SERVER As String = "intranet.xyz.com/Ops/RCA/" Const LISTNAME As String = "{15f4dl02-iz9g-496o-uh9q-6br0984bb9tw}" Const VIEWNAME As String = "294O2P46-ZC5S-4ETL-BQC9-4I234A4C4025" ' The SharePoint server URL pointing to ' the […]