ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Running Macros without opening file. (https://www.excelbanter.com/excel-programming/351650-running-macros-without-opening-file.html)

[email protected]

Running Macros without opening file.
 
I have a big Excel file and a macro which processes this Excel file and
spits out a text file. Is it possible to run this macro without opening
the Excel file? Opening a 100MB excel file takes time and doing it 100
times over is not fun...


Monish

Running Macros without opening file.
 
If you save a copy of your Excel file under a standard file name, say
"LargeFile.xls" then you could set up a macro to find and run "LargeFile.xls"
to output a saved text file.

You would save this macro under All Open Workbooks, then open Excel without
opening your large file in order to find and run your macro.

HTH

" wrote:

I have a big Excel file and a macro which processes this Excel file and
spits out a text file. Is it possible to run this macro without opening
the Excel file? Opening a 100MB excel file takes time and doing it 100
times over is not fun...



michelxld[_43_]

Running Macros without opening file.
 

Hello

I'm not sure to understand but if you want to export datas of a closed
workbook in a text File , you may try


Sub excelVersFichierTexte()
Dim Rs As New ADODB.Recordset
Dim Fichier As String, Feuille As String
Dim xConnect As String, xSql As String

Fichier = "C:\Documents and Settings\michel\WorkBook.xls"
Feuille = "Sheet1"

xConnect = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Fichier &
";" & _
"Extended Properties=Excel 8.0;"

xSql = "SELECT * FROM [" & Feuille & "$];"

Set Rs = New ADODB.Recordset
Rs.Open xSql, xConnect, adOpenForwardOnly, adLockReadOnly, adCmdText

Open "C:\essai.txt" For Output As #1

Do Until Rs.EOF
'vbTab is the separator in this example
'Print #1, Rs.GetString(, 600, ",", vbCrLf, "");
Print #1, Rs.GetString(, 400, vbTab, vbCrLf, "");
Loop
Close #1

End Sub



Regards
michel


--
michelxld
------------------------------------------------------------------------
michelxld's Profile: http://www.excelforum.com/member.php...o&userid=17367
View this thread: http://www.excelforum.com/showthread...hreadid=505783



All times are GMT +1. The time now is 11:54 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com