Tag: activexobject

使ActiveXbutton不能与单元格/ Excel一起移动: 有一对夫妇，如果在工作表中的ActiveX命令button。当我隐藏一些行时，它们随着单元格移动并最终彼此重叠。我应该使用哪个属性来告诉他们留下来？

使用ActiveXOjbect和javascript来保存excel表格: 我使用JavaScript和ActiveXObject的，看看这个链接在这里。我正在使用ActiveXObject的打开Excel文件做一些逻辑和保存文件。我需要完成的是打开具有多个工作表的Excel工作簿，并将其中一个工作表另存为新的Excel工作簿（newfile.xlsx）。下面的代码完全是我所需要的，除了保存为CSV而不是XLSX。我已经尝试使用其他数字与SaveAs（）函数，如1,4,8，我试过了。其中一些工作，但没有一个给我我期待的结果。这种types的任务甚至可以用ActiveXObject和JavaScript来完成？任何帮助是极大的赞赏！ /** IE 11 Only! **/ // ActiveXObject Example var Excel = new ActiveXObject("Excel.Application"); Excel.DisplayAlerts = false; var Book = Excel.Workbooks.Open(output_path+"file.xlsx"); Book.Worksheets("Sheet3”).SaveAs(output_path+"newfile.xlsx",6); Excel_LI.DisplayAlerts = true; Excel_LI.Quit();

如何在Excel 2016 VBA中引用ActiveXcombobox: 我在这里和其他地方尝试了各种解决scheme，例如： dim wb as workbook, ws as worksheet Dim cb As Object Set cb = ws.OLEObjects("ComboBoxViews") 要么 ComboBoxViews 要么 ws.comboboxviews 但是，所有返回错误1004，具有指定名称的项目未find。但它是否存在，检查属性名称是非常清楚的“comboboxviews”。有任何想法吗？编辑：为了明确其他人在将来寻求帮助，并使用Romcel的非常有用的代码作为基础，似乎为了添加项目到一个ActiveXcombobox（这是我的最终目标），你需要引用它作为一个对象： Sub caller3() Dim ws As Worksheet Dim oleob As OLEObject Set ws = ThisWorkbook.Sheets("Sheet1") For Each oleob In ws.OLEObjects If TypeName(oleob.Object) = "ComboBox" Then oleOb.Object.AddItem "TEST" <<< CORRECT oleOb.AddItem "TEST" […]

通过vba将数据从word传输到excel: 我有一个forms在MS单词与一些字段是内容控制和一些（这是单选button）是ActiveX控件。我想自动将百字表格转换成Excel文件。我使用以下vba代码： Sub getWordFormData() Dim wdApp As New Word.Application Dim myDoc As Word.Document Dim CCtl As Word.ContentControl Dim myFolder As String, strFile As String Dim myWkSht As Worksheet, i As Long, j As Long myFolder = "C:\Users\alarfajal\Desktop\myform" Application.ScreenUpdating = False If myFolder = "" Then Exit Sub Set myWkSht = ActiveSheet ActiveSheet.Cells.Clear Range("A1") = […]

closuresExcel没有提示JavaScript: 我正在尝试closures一个没有提示的excel文件，但我无法做到这一点。码： var excelObject = new ActiveXObject("Excel.Application"); var workbook = excelObject.Workbooks.Open("path"); //doing something. workbook.save(); workbook.Close();

是否有可能改变滑块控件在Excel中的背景颜色和其他视觉属性（通过VBA或其他）？: 我一直在尝试使用VBA来更改滑块的背景颜色： ActiveWorkbook.Worksheets("Dashboard").Slider21.BackColor = "xxxxx" 但有一个错误，说Object doesn't support this property or method

格式化Excel行空间JavaScript ActiveXObject: 如何修复我的excel activexobject电子表格中的行距。这些行太小，无法显示在工作表中的所有信息。对于activexobject excel电子表格的任何其他参考也将赞赏。 $scope.exportStudents = function () { excel = new ActiveXObject('Excel.Application'); excel.Workbooks.Add(); excel.Application.Visible = true; excel.ActiveSheet.Cells(1, 1).Value = "User ID"; excel.ActiveSheet.Cells(1, 2).Value = "Name"; excel.ActiveSheet.Cells(1, 3).Value = "Emergency Phone"; excel.ActiveSheet.Cells(1, 4).Value = "Cell Phone"; excel.ActiveSheet.Cells(1, 5).Value = "Provider"; excel.ActiveSheet.Cells(1, 6).Value = "Emergency Phone"; excel.ActiveSheet.Cells(1, 7).Value = "E-Mail"; excel.ActiveSheet.Cells(1, 8).Value = "Hire Date"; […]

读取Excel或OpenOffice（.ods）文件使用ActiveXObject（JavaScript）: 在我的系统中，我没有MS Office，我有Openoffice。这里我的要求是我想用ActiveXObject（JavaScript）读取.xls .xlsx和.ods文件。通过使用下面的代码，我只能读取.xls文件。在这里如何读取所有types的ActiveX对象的Excel文件？ <script type="text/javascript"> function ReadMyFile() { var ControlCn = new ActiveXObject("ADODB.Connection"); var Conn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source = D:\\DailyReport.ods; Persist Security Info=False;Extended Properties=Excel 8.0;"; ControlCn.Open(Conn); var rs = new ActiveXObject("ADODB.Recordset"); var SQL = "select * from [Sheet1$]"; rs.Open(SQL, ControlCn); if(rs.bof) { document.write('No Data Avaliable'); } if(!rs.bof) { rs.MoveFirst() while(!rs.eof) { for(var i=0; i!= […]

保存并退出ActiveX对象: 我正在尝试使用JavaScript将数据发送到Excel列表，将数据添加到列表，保存并closures列表。我知道什么时候使用ActiveX我只限于IE浏览器，但那没关系。我面临的问题是既不退出也不保存方法。该进程保持打开状态，数据不会保存，除非我手动保存。这里是代码： function getNumber() { var Excel = new ActiveXObject("Excel.Application"); var test = Excel.Workbooks.Open("pathToFile"); var LastRow = test.ActiveSheet.Range("A1").CurrentRegion.Rows.Count; alert(LastRow); var combine = "A" + (LastRow); alert(combine); var getCell = test.ActiveSheet.Range(combine).Value; var delimiter = '_'; var start = 3; var tokens = getCell.split(delimiter).slice(start); var result = parseInt(tokens.join(delimiter)); var newNumber = result + 1; […]