Toon posts:

[VB]excel sheet openen

Pagina: 1
Acties:
  • 125 views sinds 30-01-2008
  • Reageer

Verwijderd

Topicstarter
Hoi allemaal,

Ik ben een n00b als het gaat om VB. Nu moet ik op mijn stageplek een scripje maken/zoeken dat een excel sheet opent. Nu heb ik de search gebruikt niets gevonden. Op Microsoft heb ik wel iets gevonden voor word. Ben bezig geweest met het ombatterijen maar het lukt me niet.

code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
   <HTML>
   <HEAD>
   <SCRIPT LANGUAGE=VBScript>
   Dim objExcel
   Sub Btn1_onclick()
   call OpenDoc("c:\test.xls")
   End Sub

   Sub OpenDoc(strLocation)

   Set objExcel = CreateObject("Excel.Application")
   objExcel.Visible = true
   objExcel.Documents.Open strLocation
   End Sub

   </SCRIPT>
   <TITLE>Launch Excel</Title>
   </HEAD>
   <BODY>
   <INPUT TYPE=Button NAME=Btn1 VALUE="Open Excel Sheet">
   </BODY>
   </HTML>


Trouwens ik moet geen button hebben maar een link. Dit werkt voor een gedeelte. Alleen opent Excel wel maar krijg geen test.xls in beeld.

Ik heb nu wel dat hij alles goed opend maar nu moet ik die button nog kwijt. Is dat mogelijk. En kan ik ook die vraag die je krijgt met ActiveX ook automatisch op ja zetten.

Nieuwe script is:
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
   <HTML>
   <HEAD>
   <SCRIPT LANGUAGE=VBScript>
   Dim objExcel
   Sub Btn1_onclick()
   call Openworkbook("c:\KGB Ploegenrooster.xls")
   End Sub

   Sub Openworkbook(strLocation)

   Set objExcel = CreateObject("Excel.Application")
   objExcel.Visible = true
   objExcel.workbooks.Open strLocation
   End Sub

   </SCRIPT>
   <TITLE>Launch Excel</Title>
   </HEAD>
   <BODY>
   <INPUT TYPE=Button NAME=Btn1 VALUE="Open Excel Sheet">
   </BODY>
   </HTML>


Wie kan me helpen

[ Voor 56% gewijzigd door Verwijderd op 17-02-2003 11:41 ]


  • Jaspertje
  • Registratie: September 2001
  • Laatst online: 12-08 16:04

Jaspertje

Max & Milo.. lief

kan je niet in je <a een onclick zetten??

duidelijk :P

HTML:
1
<a href="#" onclick="Btn1_onclick();">hbsdknsdkjh</a>


zoiets zou met javascriupt werken, of het ook met vb gaat...

[ Voor 69% gewijzigd door Jaspertje op 17-02-2003 11:45 ]


Verwijderd

Topicstarter
kan zijn dat deze script ook java is zoals ik zeg ben ik hierin nog maar een n00b. Maar het werkt dankje. Nu krijg ik de opmerking van excel dat de inhoud is gewijzigd maar dit terwijl ik dit niet gebruik. Het is voor een intranet dus voor de gebruikers is het beter dat deze vraag niet komt wat kan ik hier aan doen.

En ook de begin vraag dat je de macro wil uitvoeren. Zou dit ook uitgeschakeld kunnen worden

[ Voor 14% gewijzigd door Verwijderd op 17-02-2003 11:50 ]


Verwijderd

Topicstarter
Nu heeft het volgend probleem zich voor gedaan. Het filetje is een ploegenrooster dat verspreid over meerdere jaren. Er staan knoppen boven zodat je door de jaren heen kan switchen. Klik je daar op dan krijg je de volgende vraag.
Dit besturingselement kan alleen worden weergeven wanneer dit blad in een appart venster wordt geopend
Maar wij willen niet dat hij in een ander venster wordt geopend. Dus eigenlijk moet excel worden geintregeerd worden met explorer. Is er nog een ander scripje voor dit probleem

[ Voor 13% gewijzigd door Verwijderd op 17-02-2003 12:03 ]


Verwijderd

Topicstarter
We hebben de boel nu bijna werken. Zie onderstaande code

code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
<HTML>
<BODY>

<INPUT id=button1 name=button1 type=button value=Button>

<SCRIPT LANGUAGE="VBScript">

       sub button1_onclick()

          ' Launch Excel
          dim app
          set app = createobject("Excel.Application")
    
          ' Make it visible
          app.Visible = true
    
          app.workbooks.open "c:\KGB Ploegenrooster.xls"

          ' Give the user control of Excel
          app.UserControl = true

       end sub
</SCRIPT>

</BODY>
</HTML>


Nu het probleem. Het is een button en die moeten we veranderen. Gebruiken we dit:
Jaspertje schreef op 17 February 2003 @ 11:44:
kan je niet in je <a een onclick zetten??

duidelijk :P

HTML:
1
<a href="#" onclick="Btn1_onclick();">hbsdknsdkjh</a>


zoiets zou met javascriupt werken, of het ook met vb gaat...
werkt het niet omdat die onclick geen functie heeft. Hoe lossen we dit op.