Tuota edellistä ongelmaa katsoessani törmäsin siihen, että koneessani XP/Office2003 ei tunnu Beep toimivan lainkaan.
Miten excelin saisi ylipäätään piippaamaan? Ohjeita löytyy useammasta paikasta, mutta muuten puhelias koneeni ei piipahtele niillä käskyillä.
Excel piippaamaan
xlsti
4
530
Vastaukset
Mulla Excel 2003 ja piippaa ihan kivasti.
siis taulukon moduuliin...
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" And Target.Value = 0 Then
PlayWAV
End If
End Sub
ja moduuliin ...
Private Declare Function PlaySound Lib "winmm.dll" _
Alias "PlaySoundA" (ByVal lpszName As String, _
ByVal hModule As Long, ByVal dwFlags As Long) As Long
Const SND_SYNC = &H0
Const SND_ASYNC = &H1
Const SND_FILENAME = &H20000
Sub PlayWAV()
WAVFile = "beep.wav"
WAVFile = ThisWorkbook.Path & "\" & WAVFile
Call PlaySound(WAVFile, 0&, SND_ASYNC Or SND_FILENAME)
End Sub- xlsti
Hei, kerropa tarkemmin mihin ja miten laitetaan nuo scriptit. Visual Basic Editorilla olen tyrkännyt ne kohtaan Modules Module1 ja Module2. En vaan saa soimaan. Wav toimii, mutta tuo ehdollistaminen ei toimi.
xlsti kirjoitti:
Hei, kerropa tarkemmin mihin ja miten laitetaan nuo scriptit. Visual Basic Editorilla olen tyrkännyt ne kohtaan Modules Module1 ja Module2. En vaan saa soimaan. Wav toimii, mutta tuo ehdollistaminen ei toimi.
mun viesteissä tarkoittaa
taulukon moduuliin...
taulukon valitsemasta klikkaat hiiren oikealla ja klikkaat Näytä koodi/View Code ja seuraavaksi aukeaa VBA editorissa taulukon moduuli mihin liität koodin tai
excelin puolella ALT F11 ja aukeaa VBA editori ja ja vasemmalta VBAProject "työkirjan nimi" tuplaklikkaat taulukon nimeä mihin koodin haluat liittää
jos VBAProject ikkuna ei ole näkyvissä sen saat näkyviin valikosta View/Project Explorer tai CTRL R
moduuliin...
valikosta Insert/Module ja liität koodin aukeavaan moduuliin
Class moduuliin...
valikosta Insert/Class Module ja liität koodin aukeavaan moduuliin
sun tapauksessa nyt toi eka taulukkokoodi on tavallisessa moduulissa eikä taulukon moduulissa, joten ei voi toimia...
siirrä se siis sinne taulukon moduuliin- xlsti
kunde kirjoitti:
mun viesteissä tarkoittaa
taulukon moduuliin...
taulukon valitsemasta klikkaat hiiren oikealla ja klikkaat Näytä koodi/View Code ja seuraavaksi aukeaa VBA editorissa taulukon moduuli mihin liität koodin tai
excelin puolella ALT F11 ja aukeaa VBA editori ja ja vasemmalta VBAProject "työkirjan nimi" tuplaklikkaat taulukon nimeä mihin koodin haluat liittää
jos VBAProject ikkuna ei ole näkyvissä sen saat näkyviin valikosta View/Project Explorer tai CTRL R
moduuliin...
valikosta Insert/Module ja liität koodin aukeavaan moduuliin
Class moduuliin...
valikosta Insert/Class Module ja liität koodin aukeavaan moduuliin
sun tapauksessa nyt toi eka taulukkokoodi on tavallisessa moduulissa eikä taulukon moduulissa, joten ei voi toimia...
siirrä se siis sinne taulukon moduuliinTosin vaati muutaman yrityksen, mutta sitten alkoi pelittää. Ongelma taisi olla se, että koodissa ei ollut 0 vaan oli O. Kiitän!
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Eutanasia - miksi eläimelle sallitaan armokuolema, mutta ihmiselle ei?
Olen pitkään ihmetellyt yhtä asiaa Suomessa. Kun koira kärsii parantumattomasta sairaudesta ja kovista kivuista, eläinlä2411453Veli Sofia teki urosmehiläisen työn
Paljastaessaan kuinka TPS:ssä ei joukkuehenki toimi sooloilijoiden vuoksi, jonka takia koko seura ei pärjää kilpailussa494000Unisex-vessat
Ahdistaa. Miksi kaikki pitää tasapäistää tasa-arvon nimissä? Tasa-arvo on sitä, että kunnioitetaan sukupuolien erilaisu1163207Sosiaalidemokratia romahtanut kautta maailman
nuoret eivät enää kannata järjetöntä aatetta, joten demarien täytyy hakea kannattajia mamuista. Ruotsin sos.demit jo kie1612529Miksi Seta ja Sofia Virta ei vaadi muslimeita kunnioittamaan priden-arvoja?
Kuten tiedetään niin islam ei hyväksy sitä mitä pride edustaa. Seta-pomo Mikkonen nosti hirveän äläkän kun yksi tepsin1042245Vastuun ottaminen omasta hyvinvoinnista
Olen huomannut tuttavapiirissäni ihmisiä, joilla on mt-diagnooseja. Sen sijaan, että millekään asialle yritettäisiin teh2001834Sofia Virralle täydet 12 pistettä!
Kun ei jäänyt mukaan vähemmistöjen sortamista epäsuorasti tukevaan joukkueeseen. Urheilijoiden pitäisi olla esikuvia.3121100Miksi Hotelli Kainuuta dissataan?
Ihmetyttää tämä jatkuva yhden yrityksen arvosteleminen. Ikäänkuin mikään ei olisi hyvin. Kuitenkin yritys työllistää, ta18895- 61855
Toisten elämän moralisointi
Eikö kukin voisi keskittyä lähinnä omaan elämäänsä? Jos jollakulla muulla on tunteita, ajatuksia, tai tekoja oman suhte143805