Recent content by xma

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...

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...

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...

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...

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...

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...

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...

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...

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.

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")

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...

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...

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...

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...