thanx ashish will try this code
i also wanted formula to extract only the 10 digit mobile numbers from the
data list
+ 022-2 Ex-6432341 ~+ 9870188646 + 022-2 Ex-6487723 + 022-2
Ex-6658518 ~+ 9821916656 + 022-2 Ex-6795123 + 0251- Ex-2311543 ~+
9869478989 ~+ 2311543 +91 (022) 9920283747 ~+91 (91) 9221201496 +
(0832) 2217393 ~+91 (0) 9049914155 ~+91 (0) 9850687476 ~+91 (0)
9820194010 + (033) 9831556578 ~+91 (033) 9477092032
Regards,
Lucky
On Wed, Jan 19, 2011 at 1:55 PM, ashish koul <koul.ash...@gmail.com> wrote:
> codes
>
>
> Sub clear()
>
>
>
> Sheets("Score").Cells(3, 2).Value = ""
>
>
>
> Sheets("Score").Cells(4, 2).Value = ""
>
>
>
> Sheets("Score").Cells(5, 2).Value = ""
>
>
>
> Sheets("Score").Cells(6, 2).Value = ""
>
>
>
> Sheets("Score").Cells(7, 2).Value = ""
>
>
>
> End Sub
>
>
>
>
>
> Sub update()
>
> Dim z, k, s As Long
>
>
>
>
>
> For i = 1 To Sheets("Summary").Range("b65356").End(xlUp).Row
>
> If Sheets("score").Cells(2, 2).Value = Sheets("Summary").Cells(i, 2).Value
> Then
>
>
>
> z = i
>
> Exit For
>
>
>
> End If
>
> Next i
>
> Sheets("Summary").Select
>
> Sheets("Summary").Cells(z + 1, 2).Select
>
> k = Selection.End(xlToRight).Column + 1
>
>
>
>
>
> Sheets("Summary").Cells(z + 1, k).Value = Sheets("score").Cells(10,
> 2).Value
>
>
>
> Sheets("Summary").Cells(z + 2, k).Value = Sheets("score").Cells(14,
> 2).Value
>
>
>
> Sheets("Summary").Cells(z + 3, k).Value = Sheets("score").Cells(18,
> 2).Value
>
> Sheets("Summary").Cells(z + 4, k).Value = Sheets("score").Cells(22,
> 2).Value
>
>
>
> Sheets("Summary").Cells(z + 4, k).Value = Sheets("score").Cells(22,
> 2).Value
>
> Sheets("Summary").Cells(z + 5, k).Value = Sheets("score").Cells(26,
> 2).Value
>
>
>
> Sheets("Summary").Cells(z + 6, k).Value = Sheets("score").Cells(30,
> 2).Value
>
> Sheets("Summary").Cells(z + 7, k).Value = Sheets("score").Cells(34,
> 2).Value
>
>
>
> For s = z To z + 7
>
>
>
> If Sheets("Summary").Cells(s + 1, k).Value = "GOOD" Then
>
> Sheets("Summary").Cells(s + 1, k).Value = 10
>
> ElseIf Sheets("Summary").Cells(s + 1, k).Value = "AVERAGE" Then
>
> Sheets("Summary").Cells(s + 1, k).Value = 5
>
> ElseIf Sheets("Summary").Cells(s + 1, k).Value = "POOR" Then
>
> Sheets("Summary").Cells(s + 1, k).Value = 0
>
> ElseIf Sheets("Summary").Cells(s + 1, k).Value = "YES" Then
>
> Sheets("Summary").Cells(s + 1, k).Value = 10
>
> ElseIf Sheets("Summary").Cells(s + 1, k).Value = "NO" Then
>
> Sheets("Summary").Cells(s + 1, k).Value = 5
>
> Else
>
> Sheets("Summary").Cells(s + 1, k).Value = ""
>
> End if
>
> Next s
>
> End Sub
>
>
> On Wed, Jan 19, 2011 at 10:28 AM, lucky singh <lucky60...@gmail.com>wrote:
>
>>
>> sorry ashish,
>>
>> the file is not working when i click on update it opens a pop up says read
>> only, notify & cancel...
>>
>>
>> Regards,
>>
>>
>>
>>
>> On Tue, Jan 18, 2011 at 8:56 PM, ashish koul <koul.ash...@gmail.com>wrote:
>>
>>> check the attachment
>>>
>>> On Tue, Jan 18, 2011 at 12:20 PM, lucky singh <lucky60...@gmail.com>wrote:
>>>
>>>>
>>>> Hello,
>>>>
>>>> Guys Need your help urgently....
>>>>
>>>> please
>>>>
>>>> Regrads
>>>>
>>>> ---------- Forwarded message ----------
>>>> From: lucky singh <lucky60...@gmail.com>
>>>> Date: Tue, Jan 18, 2011 at 10:51 AM
>>>> Subject: need help
>>>> To: excel-macros@googlegroups.com
>>>>
>>>>
>>>>
>>>> Hi Guys need your help,
>>>>
>>>> I have 25 agenst overall & I have to record & listen to 12 calls per
>>>> agent,
>>>>
>>>> While rating a call i'll put scores in sheet one & automatically it
>>>> should get updated in sheet 3 i.e. summary sheet & all the scores shuld get
>>>> accumulated...
>>>>
>>>> Thanx in advance
>>>>
>>>> Regards,
>>>> Lucky
>>>>
>>>> --
>>>>
>>>> ----------------------------------------------------------------------------------
>>>> Some important links for excel users:
>>>> 1. Follow us on TWITTER for tips tricks and links :
>>>> http://twitter.com/exceldailytip
>>>> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
>>>> 3. Excel tutorials at http://www.excel-macros.blogspot.com
>>>> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
>>>> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
>>>>
>>>> To post to this group, send email to excel-macros@googlegroups.com
>>>>
>>>> <><><><><><><><><><><><><><><><><><><><><><>
>>>> Like our page on facebook , Just follow below link
>>>> http://www.facebook.com/discussexcel
>>>>
>>>
>>>
>>>
>>> --
>>> *Regards*
>>> * *
>>> *Ashish Koul*
>>> *akoul*.*blogspot*.com <http://akoul.blogspot.com/>
>>> *akoul*.wordpress.com <http://akoul.wordpress.com/>
>>> My Linkedin Profile <http://in.linkedin.com/pub/ashish-koul/10/400/830>
>>>
>>>
>>> P Before printing, think about the environment.
>>>
>>>
>>> --
>>>
>>> ----------------------------------------------------------------------------------
>>> Some important links for excel users:
>>> 1. Follow us on TWITTER for tips tricks and links :
>>> http://twitter.com/exceldailytip
>>> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
>>> 3. Excel tutorials at http://www.excel-macros.blogspot.com
>>> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
>>> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
>>>
>>> To post to this group, send email to excel-macros@googlegroups.com
>>>
>>> <><><><><><><><><><><><><><><><><><><><><><>
>>> Like our page on facebook , Just follow below link
>>> http://www.facebook.com/discussexcel
>>>
>>
>> --
>>
>> ----------------------------------------------------------------------------------
>> Some important links for excel users:
>> 1. Follow us on TWITTER for tips tricks and links :
>> http://twitter.com/exceldailytip
>> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
>> 3. Excel tutorials at http://www.excel-macros.blogspot.com
>> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
>> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
>>
>> To post to this group, send email to excel-macros@googlegroups.com
>>
>> <><><><><><><><><><><><><><><><><><><><><><>
>> Like our page on facebook , Just follow below link
>> http://www.facebook.com/discussexcel
>>
>
>
>
> --
> *Regards*
> * *
> *Ashish Koul*
> *akoul*.*blogspot*.com <http://akoul.blogspot.com/>
> *akoul*.wordpress.com <http://akoul.wordpress.com/>
> My Linkedin Profile <http://in.linkedin.com/pub/ashish-koul/10/400/830>
>
>
> P Before printing, think about the environment.
>
>
> --
>
> ----------------------------------------------------------------------------------
> Some important links for excel users:
> 1. Follow us on TWITTER for tips tricks and links :
> http://twitter.com/exceldailytip
> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
> 3. Excel tutorials at http://www.excel-macros.blogspot.com
> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
>
> To post to this group, send email to excel-macros@googlegroups.com
>
> <><><><><><><><><><><><><><><><><><><><><><>
> Like our page on facebook , Just follow below link
> http://www.facebook.com/discussexcel
>
--
----------------------------------------------------------------------------------
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links :
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
To post to this group, send email to excel-macros@googlegroups.com
<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/discussexcel
