Frågan#1
Hej
Har ett fel som får en att slita sitt hår..
Jag använder vba kod i ett Word dokument som ska starta en excelfil och samtidigt anropa ett makro, filen funkar att öppna, makro funkar att starta men stannar och ger felet:
Körfel nr '1004'
Egenskapen Printarea går inte ange för klassen Pagesetup.
Väljer jag felsök så markeras raden nedan
.PrintArea = "$A$1:$O$49;$Q$1:$AE$49;$Q$50:$AE$97;$AG$50:$AU$97"
Hela kodstycket ser ut så här
If Sheets("Beräkningar").Cells(6, 2) = "4V" Then
With Sheets("Ritn").PageSetup
.PrintArea = "$A$1:$O$49;$Q$1:$AE$49;$Q$50:$AE$97;$AG$50:$AU$97"
.Zoom = 85
End With
Sheets("Ritn").PrintOut
End If
Det skumma är att nu när exceldokumentet är öppet så kan jag anropa ovan kod som ligger i en subrutin och sidan skrivs ut, men ova fel kommer bara när jag anropar makrot från word dokumentet
KOden i word dokumentet ser ut så här.
Set oExcelApp = CreateObject("Excel.Application")
Set oWorkbook = oExcelApp.workbooks.Open("C:\Documents and Settings\bosse\Mina dokument\eco.xls")
oExcelApp.Visible = True
'oExcelApp.Wait (Now + TimeValue("0:00:05"))
oExcelApp.Run "'ECO.xls'!Ritning"
Tacksam för all hjälp, inte många hårstrån kvar på huvudet nu