Hei, yritän Vb 6:lla saada Excelin avautumaan tällaisella koodilla:
Dim oExcel As Object
Set oExcel = CreateObject("Excel.Application")
Tämän jälkeen tietokoneen prosessilistaan ilmstyy Excel.exe mutta itse sovellus ei kuitenkaan käynnisty. Missä lienee vika?
excelin käynnistäminen
2
359
Vastaukset
- Kunde
muista viittaus excelin objektikirjastoon
Sub Koe()
Dim Excel As Object
Dim ExcelSheet As Object
On Error Resume Next
Set Excel = GetObject(, "Excel.Application") 'onko käynnissä
If Err 0 Then
Err.Clear
Set Excel = CreateObject("Excel.Application") 'käynnistetään
If Err 0 Then
MsgBox "Exceliä ei voitu aukaista ", vbExclamation
End
End If
End If
On Error GoTo 0
Excel.Visible = True
'koodia tähän esim. avataan exceltiedosto
Excel.Workbooks.Open "C:\Summa.xls"
'koodia lisää
Excel.Quit 'lopetusjutskat
Set Excel = Nothing
End Sub- Tulostelija
Mitenkä tuommosen avatun Excel-sheetin sais tulostumaan kahtena kappaleena ennen noita lopetusjutskia? Ja sama kysymys Word-dokumentille?
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Ja taas ammuttu kokkolassa
Kokkolaisilta pitäisi kerätä pois kaikki ampumaset, keittiöveitset ja kaikki mikä vähänkään paukku ja on terävä.575499- 934347
Helena Koivu on äiti
Mitä hyötyä on Mikko Koivulla kohdella LASTENSA äitiä huonosti . Vie lapset tutuista ympyröistä pois . Lasten kodista.3752594Ovatko naiset lopettaneet sen vähäisenkin vaivannäön Tinderissa?
Meinaan vaan profiileja selatessa nykyään valtaosalla ei ole minkäänlaista kirjoitettua tekstiä siellä. Juuri ja juuri s721121Suomi vietiin Natoon väärin perustein. Viides artikla on hölynpölyä. Yksin jäämme.
Kuka vielä uskoo, että viides artikla takaa Suomelle avun, jos Suomeen hyökätään. Liikuttavasti täällä on uskottu ja ved3301038- 61853
Sydämeni on sinun luona
Koko ajan. Oli ympärilläni ketä oli niin sinä olet vain ajatuksissa ja tunteissa. En halua muiden kosketusta kuin sinun46826- 28823
Trump ja Venäjä
Huomasitteko muuten... Käytännössä ainoat valtiot, joille Trump EI eilen asettanut typeriä tariffejaan, olivat Venäjä ja102799Jatkuva stressitila
On sinun vuoksesi kun en tiedä missä mennään mutta tunteeni tiedän ainoastaan52789