vba运行以下命令： SubCaption_Macro() 'ChangestheCaptionpropertyofthefirstwindow Windows(1).Caption="Window1" 'Settingthattheworkbookhaschanged. ActiveWorkbook.Saved=False EndSub

1.　未在本地计算机上注册“Microsoft.Ace.OleDb.12.0”提供程序。 a.请您在Project->属性->Build->目标CPU设置为X64位。 b.SQL导入excel数据：baidu下载AccessDatabaseEngine.rar 2.查询MSSQL端口 方法一： 新建查询->执行：　execsys.sp_readerrorlog0,1,'listening' 2017-12-2813:56:56.750服务器Serverislisteningo

MicrosoftACEOLEDB12.0数据库连接字符串 Excel97-2003 Provider=Microsoft.ACE.OLEDB.12.0;DataSource=c:\myFolder\myOldExcelFile.xls;ExtendedProperties="Excel8.0;HDR=YES"; Excel2007-2013 Provider=Microsoft.ACE.OLEDB.12.0;DataSource=c:\myFolder\myExcel2007file.xlsx;ExtendedProperties="Ex

方法/步骤 启动Excel2003（其它版本请仿照操作），打开相应的工作表； 执行“工具→宏→VisualBasic编辑器”命令（或者直接按“Alt+F11”组合键），进入VisualBasic编辑状态； 执行“插入→模块”命令，插入一个新模块。再双击插入的模块，进入模块代码编辑状态； 将代码输入其中； Functionpinyin(pAsString)AsString i=Asc(p)