Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations John Tel on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  • Users: xma
  • Order by date
  1. xma

    Sound Question

    Gavona - Thank you very much for your help. I tried your code and it still acts as before but with one difference. The speech does not run at the same time as the recording like before. The "SpeakAsync:=False" did cause it be seperated. I also tried "SpeakAsync:=True" to see what would happen...
  2. xma

    Sound Question

    kjv1611 - Thank you very much for your help and the offer to set it up for me. That is such a kind and generous gesture. I am going to try some other methods in the process of trying to learn more about VBA and it's logic. If I run into a brick wall I will ask you for your help. Thank you again...
  3. xma

    Sound Question

    kjv1611 - Thank you for your help. I don't consider myself experienced enough to do what you suggested on the downloads. I would probably mess the system and then I would end up with less then I have. I will just Record what I want to say which is the same thing as the Speech with out the...
  4. xma

    Sound Question

    kjv1611 - Thanks for your help. I finaly understand what you are telling me and set up the macro button to the "MyButtonPusher" macro. It worked like you said and linked them both togeather but it STILL done the "Speak" first and the "SoundRec" second. The "Speak" is set up to run second but...
  5. xma

    Sound Question

    Steve - Thank you for your help. How do I link them togeather? I can link them to the macro button one by one but not togeather. Public Sub SoundRec() ActiveSheet.Shapes("object 1").Select Selection.Verb Verb:=xlPrimary End Sub Public Sub Speak() Application.Speech.Speak "Hello and how...
  6. xma

    Sound Question

    Thank you for your help. I am not very good with VBA so my questions will be dumb. You had "Public" listed and I have the code in VBAProject (PERSONAL.XLS) Module1. and this is linked to a control button on the Excel sheet. I don't know how to link the more then one "procedures" to a control...
  7. xma

    Sound Question

    Thank you for your help. In this sample I have it speaking something that I have talked into a microphone and it is a EMBED("SoundRec","") file. Then I have it doing a normal speech code Application.Speech.Speak "Hello and how are you today" after it does the microphone speech. This is all in...
  8. xma

    Sound Question

    I am trying to have the "Speech" after the "SoundRec" but it always says the "Speech" first. I don't understand why it does not work. Thank you for your help. dhh Sub Macro1() ' Range("A1").Select ActiveSheet.Shapes("object 1").Select Selection.Verb Verb:=xlPrimary...
  9. xma

    Sound & Speak

    PHV - Thank you for your help. I have been trying a lot of different combinations of code to make this work on ANY cell in ANY row or ANY column in any part of the sheet and with each cell having a different wav file and speech. So far all I can come up with is making the sound work but not the wav.
  10. xma

    Sound & Speak

    I have used the "or" but it still uses in column 2 the sound and speech from Column 3. If Target.Column = 2 Or Target.Column = 3 Then strSound = Choose(Target.Row, "Drumroll", "ding") strtalk = Choose(Target.Row, "house and horn", "Dog and cat")
  11. xma

    Sound & Speak

    I was trying to see if the Sound & Speech could be set up for ANY cell in ANY row or column. The code below works for column 1 & 3 but NOT for column 2. I tried "If Target.Column = 2,3 Then" but that did not work like I thought it would. Thank you for your help. Private Declare Function...
  12. xma

    Sound & Speak

    PHV - Thank you very much. It works - I can use the Column = 2 for any other column that I want such as 3 (C) and so forth. I would have never thought of setting up a seperate target by column. Private Declare Function sndPlaySound Lib "winmm.dll" _ Alias "sndPlaySoundA" (ByVal lpszSoundName...
  13. xma

    Sound & Speak

    PHV - Thank you for your help. I put the "Target.Column" in and it still won't work right. I am still doing something wrong and I don't see what it is. Private Sub Worksheet_Change(ByVal Target As Excel.Range) Dim strSound As String Dim strtalk As String If Not...
  14. xma

    Sound & Speak

    If the number in the cell is over >10 then it should play a wav sound and if it under <10 then it should speak a word. The code works for the A column (A1:A6) but the B column (B2) has the same wav and speech as A2. Thank you for your help. Private Declare Function sndPlaySound Lib...

Part and Inventory Search

Back
Top