Op deze website gebruiken we cookies om content en advertenties te personaliseren, om functies voor social media te bieden en om ons websiteverkeer te analyseren. Ook delen we informatie over uw gebruik van onze site met onze partners voor social media, adverteren en analyse. Deze partners kunnen deze gegevens combineren met andere informatie die u aan ze heeft verstrekt of die ze hebben verzameld op basis van uw gebruik van hun services. Meer informatie.

Akkoord

Vraag & Antwoord

Anders (software)

Geluidsbestand invoegen in Excel

Cor vd H
9 antwoorden
  • Ik heb in een Excel werkblad (werkblad1) een geluidsbestand ingevoegd en kan dit dan starten met de volgende macro:

    Sub Geluid_1 ()

    ActiveSheet.Shapes("Object 442").Select
    Selection.Verb Verb:=xlPrimary

    End sub

    Hoe start ik het zelfde geluidsbestand vanuit werkblad2 zonder het daar opnieuw te moeten invoegen?
  • Verander de macro in:

    Sub Geluid_1 ()

    [b:b06349d97a]sheets(1)[/b:b06349d97a].Shapes("Object 442").Select
    Selection.Verb Verb:=xlPrimary

    End sub
  • Ik heb het geprobeerd maar krijg de volgende melding:
    Fout 438 tijdens de uitvoering
    Deze eigenschap of methode word niet ondersteund door dit object

    Als ik dan op foutopsporing klik dan word de volgende tekst in de macro geel gemarkeerd:
    Selection.Verb Verb:=xlPrimary

    De macro die jij hier opgeeft doet het wel als het geluid word gestart vanaf werkblad 1 maar niet vanaf werkblad 2 tot dat ik het geluidsbestand daar naar toe kopieer dan gaat hij wel.
    Doe ik iets fout?
  • en als je er één regel van maakt?

    sheets(1).Shapes("Object 442").Verb Verb:=xlPrimary

    of eerst het 1e blad laten activeren

    sheets(1).activate
    'jouw macro
    sheets(2).activate

    Ben benieuwd… heb zelf geen tijd om te testen
  • sheets(1).activate
    'jouw macro
    sheets(2).activate

    Deze optie werkt wel maar nu gaat hij eerst naar werkblad 1, speelt dan het geluid af en gaat dan weer terug naar werkblad 2.
    Het zou natuurlijk mooier zijn als tijdens het afspelen van het geluid werkblad 2 gewoon constant in beeld blijft.
  • Daarvoor gebruik je ScreenUpdating. Als je die op False zet, ziet de gebruiker niet wat de macro uitvoert. Daarna niet vergeten om hem weer op True te zetten.

    application.screenupdating=false
    sheets(1).activate
    'jouw macro
    sheets(2).activate
    application.screenupdating=true
  • application.screenupdating=true
    application.screenupdating=False

    Beide geprobeerd maar resultaat blijft het zelfde.

    Het beeld verspringt nog steeds van werblad 2 naar werkblad 1 en weer terug als ik via een drukknop die ik op werkblad 2 heb gezet de macro start.
    Start ik de macro via de knop die ik op werkblad 1 heb gezet dan verspringt het beeld dus niet.
  • Je macro moet er zo uit zien:

    Sub MacroNaam()
    Application.ScreenUpdating = False
    Sheets(1).Select
    ActiveSheet.Shapes("Object 2").Select
    Selection.Verb Verb:=xlPrimary
    Sheets(2).Select
    Application.ScreenUpdating = True
    End Sub

    Als je de macro runt, dan knippert je scherm en hoor je het geluid. (maar werkblad 1 zal niet getoond worden)
  • Ik ga dit zeker uitproberen maar ik zit nu even achter een andere pc (zonder Excel) i.v.m. probleem met mijn eigen computer. (Probleem met nieuw moederbord)
    Voor nu alvast bedankt voor al je tips.

Beantwoord deze vraag

Dit is een gearchiveerde pagina. Antwoorden is niet meer mogelijk.