25. april 2002 - 12:27Der er
4 kommentarer og 1 løsning
Åbne test.xls fra word via cmd1 ...
Hej!
jeg skal åbne et excel regneark fra word, ved at trykke på en knap. Med koden herunder kan jeg idag åbne arket I WORD og det giver et uoverskueligt virvar af koder. Nogen forslag til kode??
Danmark vil mindske afhængigheden af globale techgiganter, men det kræver mere end politiske formuleringer og strategier, understreger PROSA’s formand Niels Bertelsen.
Sub Open_MSWord() On Error GoTo errorHandler Dim wdApp As Word.Application Dim myDoc As Word.Document Dim mywdRange As Word.Range Set wdApp = New Word.Application With wdApp .Visible = True .WindowState = wdWindowStateMaximize End With Set myDoc = wdApp.Documents.Add Set mywdRange = myDoc.Words(1) With mywdRange .Text = Range("F6") & " This text is being used to test subroutine." & _ " More meaningful text to follow." .Font.Name = "Comic Sans MS" .Font.Size = 12 .Font.ColorIndex = wdGreen .Bold = True End With errorHandler: Set wdApp = Nothing Set myDoc = Nothing Set mywdRange = Nothing End Sub
-åbner et worddokument fra Excel og skriver til det - du skal jo "bare" åbne et exceldokument fra Word - metoden er meget det samme - se om du kan bruge det til noget...
Det er rigtigt den virker til et word dokument, men jeg kan ikke bruge den til excel. Når jeg erstatter word variablerne med excel, kokser det for systemet.
Er det ikke det jeg gør ved Fileconverter(21), idet det er Microsoft Excel Worksheet?
Hvordan ville du ellers gøre det?
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.