Search found 31 matches

by daiweisc
09 Jul 2020, 01:44
Forum: Ask For Help
Topic: How AHK solve the non-linear equation?
Replies: 1
Views: 460

How AHK solve the non-linear equation?

There is non-linear equation to solve, I want to use AHK gui and code. How to do it?
by daiweisc
18 Jun 2020, 01:10
Forum: Ask For Help
Topic: How to use SeleniumBasic control QQBrowser
Replies: 0
Views: 911

How to use SeleniumBasic control QQBrowser

My computer have Google Chrome and QQBrowser, QQBrowser is a browser of double kernel base on Chronium70.0.3538.25 and IE11.0.9600.17843, Google Chrome is the latest version of 83.0.4103.106. I always use SeleniumBasic control Google Chrome. Today I want to use SeleniumBasic control QQBrowser. The c...
by daiweisc
16 Jun 2020, 20:35
Forum: Ask For Help
Topic: How to change PPT table font size
Replies: 3
Views: 2477

Re: How to change PPT table font size

Thanks flyingDman. I solve all problem. It's OK.
by daiweisc
16 Jun 2020, 01:14
Forum: Ask For Help
Topic: How to change PPT table font size
Replies: 3
Views: 2477

Re: How to change PPT table font size

Thanks your reply. Not change Font. But How I can change the TableStyle.
by daiweisc
15 Jun 2020, 21:45
Forum: Ask For Help
Topic: How to change PPT table font size
Replies: 3
Views: 2477

How to change PPT table font size

The code run with no error ,but table font size can not change. Who can help me. #SingleInstance,Force #NoEnv #Include 11DateSet.ahk SourcePattern := "F:\华鹤煤化\生产管理部\生产管理部台帐\工艺装备例会汇报材料.pptx" DestPattern := "F:\华鹤煤化\生产管理部\生产管理部台帐\" DateCn "工艺装备例会汇报材料.pptx" FileCopy,% SourcePattern,% DestPattern oPPT :...
by daiweisc
13 Jun 2020, 22:39
Forum: Ask For Help
Topic: how to solve excel copy to ppt
Replies: 5
Views: 1947

Re: how to solve excel copy to ppt

Thanks flyingDman reply. According your tips the error is fixed. The code run well.
by daiweisc
13 Jun 2020, 05:36
Forum: Ask For Help
Topic: how to solve excel copy to ppt
Replies: 5
Views: 1947

Re: how to solve excel copy to ppt

Thanks yout reply. But the error code is "oSlide.Slides(pptIndex).Shapes.Paste" .
not "xl.Close(0)"
by daiweisc
13 Jun 2020, 00:33
Forum: Ask For Help
Topic: how to solve excel copy to ppt
Replies: 5
Views: 1947

how to solve excel copy to ppt

The code of excel copy to ppt is wronge, who can help me. The wrong is "oSlide.Slides(pptIndex).Shapes.Paste" #SingleInstance,Force #NoEnv #Include 11DateSet.ahk SourcePattern := "F:\华鹤煤化\生产管理部\生产管理部台帐\工艺装备例会汇报材料.pptx" DestPattern := "F:\华鹤煤化\生产管理部\生产管理部台帐\" DateCn "工艺装备例会汇报材料.pptx" FileCopy,% Sourc...
by daiweisc
12 Jun 2020, 02:08
Forum: Ask For Help
Topic: Excel COM add Table Topic is solved
Replies: 4
Views: 1116

Re: Excel COM add Table Topic is solved

Thanks the above reply, my code run well #NoEnv #SingleInstance,Force dmb := ComObjCreate("Access.Application") ;Create new instance of Microsoft dmbess. Ac :="F:\华鹤煤化\生产管理部\工艺管理\技术委员会会议纪要\技术委员会台账.accdb" FileName := "F:\华鹤煤化\生产管理部\工艺管理\技术委员会会议纪要\技术委员会台账3.xlsx" dmb.OpenCurrentDatabase(Ac) xl := ComOb...
by daiweisc
11 Jun 2020, 02:37
Forum: Ask For Help
Topic: How to Copy Access query to Excel?
Replies: 5
Views: 310

Re: How to Copy Access query to Excel?

Thanks flyingDman. I find the problem, add global dmb. the correct code is #NoEnv #SingleInstance,Force Clipboard := "" dmb := ComObjCreate("Access.Application") ;Create new instance of Microsoft dmbess. Global dmb FileName := "技术委员会台账" Ac :="F:\华鹤煤化\生产管理部\工艺管理\技术委员会会议纪要\" FileName ".accdb" dmb.Open...
by daiweisc
11 Jun 2020, 00:50
Forum: Ask For Help
Topic: How to Copy Access query to Excel?
Replies: 5
Views: 310

Re: How to Copy Access query to Excel?

thangks give the tips. But Clipboard is still empty. I guess the cammand of OpenQuery and RunCommand is not work. #NoEnv #SingleInstance,Force dmb := ComObjCreate("Access.Application") ;Create new instance of Microsoft dmbess. FileName := "技术委员会台账" Ac :="F:\华鹤煤化\生产管理部\工艺管理\技术委员会会议纪要\" FileName ".acc...
by daiweisc
10 Jun 2020, 20:21
Forum: Ask For Help
Topic: How to Copy Access query to Excel?
Replies: 5
Views: 310

Re: How to Copy Access query to Excel?

My code change, but the clipboard is empty, the excel file is no change, is no save. #NoEnv #SingleInstance,Force dmb := ComObjCreate("Access.Application") ;Create new instance of Microsoft dmbess. FileName := "技术委员会台账" Ac :="F:\华鹤煤化\生产管理部\工艺管理\技术委员会会议纪要\" FileName ".accdb" dmb.OpenCurrentDatabase(A...
by daiweisc
09 Jun 2020, 21:22
Forum: Ask For Help
Topic: How to Copy Access query to Excel?
Replies: 5
Views: 310

How to Copy Access query to Excel?

Hi,I want to copy Access query to Excel, But the code is run not well. Can anyone give me a tips to solve this problem. #NoEnv #SingleInstance,Force dmb := ComObjCreate("Access.Application") ;Create new instance of Microsoft dmbess. FileName := "技术委员会台账" Ac :="F:\华鹤煤化\生产管理部\工艺管理\技术委员会会议纪要\" FileName...
by daiweisc
04 Dec 2019, 22:22
Forum: Ask For Help
Topic: Excel COM add Table Topic is solved
Replies: 4
Views: 1116

Re: Excel COM add Table Topic is solved

According the above code, My codes can not run well: #SingleInstance,Force objExcel := ComObjCreate("Excel.Application") objExcel.Application.Visible := False objExcel.DisplayAlerts := False Global objExcel ExcelStyles(WorkBook,Range1){ FilePath := "D:\AccessExport\" WorkBook ".xlsx" objWorkBook := ...
by daiweisc
07 Nov 2019, 21:00
Forum: Ask For Help
Topic: Excel Table paste into Word
Replies: 7
Views: 853

Re: Excel Table paste into Word

Thanks your reply.
But the PasteExcelTable is left Alignment in word.
How to make the table/Range Horizontal Alignment Center in word?
by daiweisc
07 Nov 2019, 05:32
Forum: Ask For Help
Topic: Excel Table paste into Word
Replies: 7
Views: 853

Re: Excel Table paste into Word

Thanks,the code runs with no error, but I set the table Font and Style dosn't work: #SingleInstance,Force ExcelToWord(ExcelPath,Sheet,oRange,Bookmark){ appExcel := ComObjCreate("Excel.Application") xl :=appExcel.Workbooks.Open(ExcelPath) xl.Sheets(Sheet).Range(oRange).Copy WordPath := "D:\华鹤公司工艺月报.d...
by daiweisc
07 Nov 2019, 01:15
Forum: Ask For Help
Topic: Excel Table paste into Word
Replies: 7
Views: 853

Re: Excel Table paste into Word

Code: Select all

wdApp.ActiveDocument.Bookmarks(Bookmark).Range.PasteExcelTable
the code run wrong.
by daiweisc
06 Nov 2019, 23:42
Forum: Ask For Help
Topic: Excel Table paste into Word
Replies: 7
Views: 853

Excel Table paste into Word

I have a task to Paste the Excel table into Word,the code is #SingleInstance,Force ExcelToWord(ExcelPath,Sheet,oRange,Bookmark){ appExcel := ComObjCreate("Excel.Application") xl :=appExcel.Workbooks.Open(ExcelPath) xl.Sheets(Sheet).Range(oRange).Copy WordPath := "F:\华鹤煤化\生产管理部\生产管理部台帐\华鹤公司工艺月报.docx"...
by daiweisc
02 Nov 2019, 10:08
Forum: Ask For Help
Topic: Why Excel Addins is Wrong?
Replies: 12
Views: 1998

Re: Why Excel Addins is Wrong?

Add Apllication
objExcel.Application.COMAddIns(6).Connect := True
status := objExcel.Application.COMAddIns(6).Connect
MsgBox,"COMAddIns" %Status%
it is still 0.
by daiweisc
02 Nov 2019, 10:01
Forum: Ask For Help
Topic: Why Excel Addins is Wrong?
Replies: 12
Views: 1998

Re: Why Excel Addins is Wrong?

I change the code #SingleInstance,Force objExcel := ComObjCreate("Excel.Application") objExcel.Application.Visible := True objExcel.DisplayAlerts := False objExcel.Workbooks.Add objExcel.COMAddIns(6).Connect := True status := objExcel.COMAddIns(6).Connect MsgBox,%Status% the code run well with no pr...

Go to advanced search