excel macro in DB server
Hi;
I work with FM 11 and FM pro advanced server. My abjectif is to export word file from a database server ,after running a macro script from default excel file.
I cretae the macro that save data sheet excel on a template word . I shoud make it running on a database server ( FileMaker server 11). Is it possible to run an excel macro and save documents (.doc) on the DataBase server??
My macro is:
Dim TimeToRun
Sub Auto_Open()
Call scheduleJb
End Sub
Sub scheduleJb()
TimeToRun = Now + TimeValue("00:00:01")
Application.OnTime TimeToRun, "MacroAutoJB"
End Sub
Sub MacroAutoJB()
Dim WordApp As Word.Application
Dim WordDoc As Word.Document
Dim oWdApp As Object
Dim i As Byte
Dim sChemin As String
On Error Resume Next
Dim nom As String
On Error Resume Next
Dim j As Integer
j = ActiveSheet.UsedRange.Rows.Count
Dim n As Byte
n = Cells(1, Columns.Count).End(xlToLeft).Column
If ActiveWorkbook.Name Like "Class*.xls" Then
Set WordDoc = WordApp.Documents.Open("C:\Documents and Settings\User1\My Documents\Class_fich.doc") 'ouvre document Word
Set oWdApp = CreateObject("Word.Application")
Set WordDoc = oWdApp.Documents.Open("C:\Documents and Settings\User1\My Documents\Class_fich.doc")
For i = 1 To n
WordDoc.Bookmarks("Sig" & i).Range.Text = Cells(j, i)
Next i
WordDoc.Bookmarks("Signet").Range.Text = Cells(j, 2)
WordDoc.SaveAs Filename:=nom & ".doc"
colonne du fichier excel
WordApp.Visible = False
End If
Next j
...
Where... Specify the row,
Where...
Specify the row, please.
Did you have checked the Word Library reference ?
I checked the Word Library
I checked the Word Library reference.
I m sorry , I don't Know which row because I have just the msg box error !! I put that macro like I send it to you , the last one ..