Thread View: be.comp.programming
2 messages
2 total messages
Started by Desmothunder
Sat, 20 Mar 2004 21:21
VBA vraagje in veband met Excell
Author: Desmothunder
Date: Sat, 20 Mar 2004 21:21
Date: Sat, 20 Mar 2004 21:21
40 lines
2268 bytes
2268 bytes
Ik open vanuit acess een excell template met de volgende code
'use choosen template
Dim nDoc As String
If Me.cboTemplate = "Zonder Anex" Then
nDoc = "C:\Documents andSettings\Dominique\Mijndocumenten\doc001_.XLT"
ElseIf Me.cboTemplate = "Met Anex" Then
nDoc = "C:\Documents andSettings\Dominique\Mijndocumenten\doc002_.XLT"
End If
Dim varNum As Long
Dim objExcel As Object
Dim objWorkbook As Object
Dim objWorksheet As Object
'Start the excel COM and make it visible.
Set objExcel = GetObject("", "excel.application")
objExcel.Visible = True
'Start a workbook.
Set objWorkbook = objExcel.workbooks.Open(nDoc)
'Turn off the alerts, otherwise user will have to confirm action.
objExcel.DisplayAlerts = False
'Set objWorksheet to the remaining worksheet.
Set objWorksheet = objExcel.ActiveSheet
Nu wil ik in stappen die template invullen aan de hand van een keuze
dat ik maak in een frame met keuzerondjes maar wel telkens met
dezelfde button die bovenstaande code ook uitvoerd.
Hoe kan ik nu bij de tweede keuze die ik maak het invullen verder
laten gebeuren in het reeds geopende object.
Eerste stuk invullen lukt maar dan kies ik bv optie 2 om de tweede
kolom in te vullen maar met dezelfde knop opent hij een nieuwe
workbook.
Alvast dank
Re: VBA vraagje in veband met Excell
Author: Desmothunder
Date: Fri, 26 Mar 2004 19:58
Date: Fri, 26 Mar 2004 19:58
4 lines
1115 bytes
1115 bytes
On Sat, 20 Mar 2004 21:21:29 GMT, Desmothunder <nomail@pondari.be> wrote: Laat maar zitten, heb het al zelf gevonden.
Thread Navigation
This is a paginated view of messages in the thread with full content displayed inline.
Messages are displayed in chronological order, with the original post highlighted in green.
Use pagination controls to navigate through all messages in large threads.
Back to All Threads