RplcList = Array("I have", "you will", "will not", "I will", "you are", " you have", "we have", "were not", "cannot", "eBays", "I have", "you will", "you are")įor x = LBound(fndList) To UBound(fndList) Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ 'Selects the range in the Application TTS column to paste Range(Cells(2, M圜ol), Cells(n, M圜ol)).Select 'Copies Recording Prompts to Application TTS column M圜ol2 = Application.Match("Application TTS", Range(Cells(1, 1), Cells(1, ColCount)), 0) N = Cells(Rows.Count, M圜ol).End(xlUp).Row M圜ol = Application.Match("Recording Prompts_Edit", Range(Cells(1, 1), Cells(1, ColCount)), 0)
0 Comments
Leave a Reply. |