Åbne Exel, Insætte værdier, Print og luk

Er det en makro i Excel du tænker på, eller er det et VBS script ?
Eller et selvstændigt VB program ?

Selvstendigt VB program...

lavet med Visual Studio

men det må selvfølgelig også godt laves således at man har et Excel regneark ligende med nogle markroer hvor dar hentes data ud fra en DB... så alt det med at hente ikke behøver at ligge i VB programmet, men godt kanl ligge i regnearket... så kan man faktisk nøjes med at sende ganske få variabler...

prøv lige at se http://www.eksperten.dk/spm/243083
Det kan måske bringe dig videre selv

Her er den med lidt ændringer. Sætningen der er remmet ud kan bruges til din opgave 2, hvis du så fjerner linien ovenover.

Dim min_var1
Dim min_var2
Dim i As Integer
Dim wkbNewBook  As Excel.Workbook
Dim xlApp As Excel.Application
   
Set xlApp = New Excel.Application
'xlApp.Visible = True  'vælg om excel sal være synlig
xlApp.Workbooks.Open "c:\slet.xls"
Set wkbNewBook = xlApp.ActiveWorkbook
With wkbNewBook.Sheets(1)
    .Range("B5") = min_var1
    .Range("a1") = min_var2
    .PrintOut Copies:=1, Collate:=True
    '.PrintPreview
End With
wkbNewBook.Close savechanges:=False
xlApp.Quit
Set xlApp = Nothing

Takker... kigger lige nærmere på det en af dagende...

md craig -> har du fået kigget ?

ikke så meget endnu... det går lidt sløvt for tiden... men jeg skal nok skrive hvis der er noget...

og du skal nok få point...

grunden til at det ikke går så hurgtigt det er at det ikke kun er mig der skal bruge det, det er mig og min bror der har det som fælles projekt... men vores tid har lige været optaget af at skulle have ny computer begge to...

men jeg vil prøve at se om vi ikke kan få tid til det her i weekenden.. men ejg kan ikke love noget... men jeg tror selvfølgelig ikke på at det ikke virker, men der kan jo være nogle spørgsmål ikke sandt...

Godt nok.. det var såmænd også derfor jeg spugte.

nå never miin... vi har stadig ikke føet et tjecket helt... men det virker garanteret. og ellers vender vi tilbage...