盗墓笔记365 盗墓笔记365
关注数: 24 粉丝数: 10 发帖数: 182 关注贴吧数: 135
求助，启动Django项目时出错 self.connection = self.get_new_connection(conn_params) File "C:\Users\Administrator\Desktop\pythonstudy\examination\venv\lib\site-packages\django\db\backends\mysql\base.py", line 274, in get_new_connection conn = Database.connect(**conn_params) File "C:\Users\Administrator\Desktop\pythonstudy\examination\venv\lib\site-packages\pymysql\__init__.py", line 90, in Connect return Connection(*args, **kwargs) File "C:\Users\Administrator\Desktop\pythonstudy\examination\venv\lib\site-packages\pymysql\connections.py", line 699, in __init__ self.connect() File "C:\Users\Administrator\Desktop\pythonstudy\examination\venv\lib\site-packages\pymysql\connections.py", line 967, in connect raise exc django.db.utils.OperationalError: (2003, "Can't connect to MySQL server on 'localhost' ([WinError 10061] 由于目标计算机积极拒绝，无法连接。)")
求助，pycharm运行一个叫中华诗词大会的django项目出错 self.connection = self.get_new_connection(conn_params) File "C:\Users\Administrator\Desktop\pythonstudy\examination\venv\lib\site-packages\django\db\backends\mysql\base.py", line 274, in get_new_connection conn = Database.connect(**conn_params) File "C:\Users\Administrator\Desktop\pythonstudy\examination\venv\lib\site-packages\pymysql\__init__.py", line 90, in Connect return Connection(*args, **kwargs) File "C:\Users\Administrator\Desktop\pythonstudy\examination\venv\lib\site-packages\pymysql\connections.py", line 699, in __init__ self.connect() File "C:\Users\Administrator\Desktop\pythonstudy\examination\venv\lib\site-packages\pymysql\connections.py", line 967, in connect raise exc django.db.utils.OperationalError: (2003, "Can't connect to MySQL server on 'localhost' ([WinError 10061] 由于目标计算机积极拒绝，无法连接。)")
wordvba问题 如何在word文档修改内容时启动宏 如题 如何在word文档修改内容时启动宏，就是word文档修改文字时运行宏注意是word不是Excel
求助 使用wordVBA判断Excel文件是否打开，如果打开就关闭保存 我使用的是word的VBA想判断Excel表格文件是否被打开（因为如果是打开的我在运行时会出错），想通过这样的方法把打开的表格关闭上，求大神指定 Sub 实验6() Set xlApp = CreateObject("excel.application") Dim x As Integer For x = 1 To Workbooks.Count'我想使用设置xlapp的方法引用ExcelVBA判断，但不行 If Workbooks(x).Name = "8888.xls" Then MsgBox "文件已打开" Exit Sub End If Next x End Sub
求助 使用wordVBA判断Excel文件是否打开，如果打开就关闭保存 我使用的是word的VBA想判断Excel表格文件是否被打开（因为如果是打开的我在运行时会出错），想通过这样的方法把打开的表格关闭上，求大神指定 Sub 实验6() Set xlApp = CreateObject("excel.application") Dim x As Integer For x = 1 To Workbooks.Count'我想使用设置xlapp的方法引用ExcelVBA判断，但不行 If Workbooks(x).Name = "8888.xls" Then MsgBox "文件已打开" Exit Sub End If Next x End Sub
求助 AutoFilter 通配符问题 我要筛选c列部分带202101的单元格，但是通配符总是不行，筛选时会筛选出*202101*内容的单元格，而不是部分带202101内容的单元格，求助大神 Sub dd() Rows("2:2").AutoFilter 3, "*" & "202101" & "*"'这里的*会被认成要筛选的一部分，而不是通配符 End Sub 是不是我输入有错误？还是通配符特性问题？
求助 使用workVBA往Excel单元格里添加超级链接 在workVBA编辑宏，往Excel单元格里添加超级链接！！！大佬帮帮忙
求助 用workVBA调用Excel将文档选定内容填写到Excel内 求助 用workVBA调用Excel将文档选定内容填写到Excel内B行第一个非空第一个内，需要在work中编写宏代码，我写了一个就是不好使，求大佬帮忙！！！ Sub 实验1() '打开登记表 Set xlapp = CreateObject("excel.application") '设置要打开的文件 MYPT = ActiveDocument.Path myfile = "告知函登记表.xlsx" xlapp.Workbooks.Open MYPT & "\" & myfile xlapp.Visible = True xlapp.sheets("告知函登记表").Range("b10").End(xlDown)(2,1).Select'注意就是这个不好使选取指定表格的第一个非空单元格 Set xlapp = Nothing End Sub 这是用workVBA打开指定Excel表格，并选择B列第一个非空单元格
求助去年买的蔷薇今天发现叶面有白点不知道怎么办了！
1 下一页