tervehdys,
En nyt jaksa jaaritella syitä eri toiminnallisuuksiin, mutta olisiko oikoreittiä seuraavaan, eli välissä on yksi turha .bat tiedoston avaaminen josta voisin luopua:
Käyttäjä klikkaa työpöydällä olevaa ".bat tiedostoa, joka tekee muutaman kopioinnin ja synkronoinnin, viimeisellä rivillä ohjelma aukaisee "\\server1\kansio1\tiedosto.xls" jossa "auto open" makro luo profiileja ja muita. niin miten saan kutsuttua suoraan ".vbs" tiedostoa "auto open" makrolla, nyt makro avaa turhaan ".bat" tiedoston "dRetVal = Shell("c:\a.bat", 0)" komennolla, "a.bat ei sisällä muuta kuin käskyn suorittaa ".vbs" tiedosto. niin saisinko siis jotenkin komennettua excelistä suoraan tämän ".vbs" filun suorituksen
Kiitoksia jälleen =)
En nyt jaksa jaaritella syitä eri toiminnallisuuksiin, mutta olisiko oikoreittiä seuraavaan, eli välissä on yksi turha .bat tiedoston avaaminen josta voisin luopua:
Käyttäjä klikkaa työpöydällä olevaa ".bat tiedostoa, joka tekee muutaman kopioinnin ja synkronoinnin, viimeisellä rivillä ohjelma aukaisee "\\server1\kansio1\tiedosto.xls" jossa "auto open" makro luo profiileja ja muita. niin miten saan kutsuttua suoraan ".vbs" tiedostoa "auto open" makrolla, nyt makro avaa turhaan ".bat" tiedoston "dRetVal = Shell("c:\a.bat", 0)" komennolla, "a.bat ei sisällä muuta kuin käskyn suorittaa ".vbs" tiedosto. niin saisinko siis jotenkin komennettua excelistä suoraan tämän ".vbs" filun suorituksen
Kiitoksia jälleen =)
Vastaukset 5
Vanhimmat
mitä pitäisi tehdä Auto_Open makrolla
Auto open siis tekee muutaman oikeankin toimenpiteen (päivittää listaa exceliin, jonka jälkeen se alkaa pelaamaan aikaa eli do...loop kiertää noin 3 minuuttia tehden ei yhtään mitään (tämä siksi että aiempi tapahtuma ".bat tiedoston kanssa suoritettava ketju vie noin. 1-2 minuuttia)
tämän turhan loopin (joka siis on tarkoituksen mukainen) jälkeen pitäisi siis käynnistää ".vbs" tiedosto, mutta en saa sitä käyniin excelin koodilla, vaan koodin viimeisellä rivillä on käsky ".bat" tidoston käynnistämiseksi joka käynnistää ".vbs" tiedoston.
Eihän tuosta niinkään haittaa ole(alle sekunti menee hukkaan) mutta haluaisin vain yksinkertaistaa tapahtumien kulkua.
sanon tämän nyt varmasti turhan tarkasti mutta kysymys on siis:
Kuinka käynnistää ".vbs" tiedosto excelin VB koodilla ? =)
Kiitos sinulle
lisää moduuli ja soodi sinne
suorittaa 3 min kuluttua koe makron
Public Aika As Double
Sub Auto_Open()
Aika = Now TimeSerial(0, 0, 180)
Application.OnTime earliesttime:=Aika, procedure:="koe", schedule:=True
End Sub
Sub koe()
Dim RetVal
RetVal = Shell("C:\Windows\System32\WScript.exe C:\koe.vbs", 0)
End Sub
En vielä edes kokeillut tuon toimivuutta, mutta täytyy sanoa että uskomaton guru oot näissä
Kiitos jälleen
kiitoksia kehuista :-)
Keep Excelling