$$Excel-Macros$$ Solve problem in excel

2012-01-31 Thread Veeru TOC
Dear All,


Can i use pivot table up to data came below

   Indus ID Alarm on Site Time  IN-1008993 DG on Load 12:16:29   Mains Fail
12:14:59  IN-1009598 Mains Fail 19:56:46   19:56:56   Rectifier Fail
19:56:46

But i need

Requirement data  type:

  indus id Text  IN-1008993 DG on load 12:16,Mains fail 12:14  IN-1009598 Mains
fail 19:56,Rectifier fail 19:56

plz find attachment of file


*ThanksRegards*

* *

*   **Veerendra.Vanam*

  *TOC TEAM*
* *  *Bhagyanagar Electrical  Contractors**
****H.No-5-9-286/65,Plot No-65
Rajiv Gandhi Nagar,Near Andhra Jyothi Press,IE-Kukatpally,
  Hyderabad-500072,-Andhra Pradesh
**   **91-9177-444-840**,*


 --
FORUM RULES (986+ members already BANNED for violation)

1) Use concise, accurate thread titles. Poor thread titles, like Please
Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice
will not get quick attention or may not be answered.

2) Don't post a question in the thread of another member.

3) Don't post questions regarding breaking or bypassing any security
measure.

4) Acknowledge the responses you receive, good or bad.

5) Cross-promotion of, or links to, forums competitive to this forum in
signatures are prohibited.

NOTE : Don't ever post personal or confidential data in a workbook. Forum
owners and members are not responsible for any loss.

--
To post to this group, send email to excel-macros@googlegroups.com



-- 





*ThanksRegards*

* *

*   **Veerendra.Vanam*

  *TOC TEAM*
* *  *Bhagyanagar Electrical  Contractors**
****H.No-5-9-286/65,Plot No-65
Rajiv Gandhi Nagar,Near Andhra Jyothi Press,IE-Kukatpally,
  Hyderabad-500072,-Andhra Pradesh
**   **91-9177-444-840**,*

-- 
FORUM RULES (986+ members already BANNED for violation)

1) Use concise, accurate thread titles. Poor thread titles, like Please Help, 
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get 
quick attention or may not be answered.

2) Don't post a question in the thread of another member.

3) Don't post questions regarding breaking or bypassing any security measure.

4) Acknowledge the responses you receive, good or bad.

5)  Cross-promotion of, or links to, forums competitive to this forum in 
signatures are prohibited. 

NOTE  : Don't ever post personal or confidential data in a workbook. Forum 
owners and members are not responsible for any loss.

--
To post to this group, send email to excel-macros@googlegroups.com


problem.xlsx
Description: application/vnd.openxmlformats-officedocument.spreadsheetml.sheet


Re: $$Excel-Macros$$ Solve problem in excel

2012-01-31 Thread Sam Mathai Chacko
Sub Consolidator()

Dim rngSource As Range
Dim lngCount As Long
Dim strArray() As String

With Worksheets(Sheet7)
Set rngSource = .Range(A4:C  .Cells(Rows.Count,
1).End(xlUp)(0).Row)
lngCount = Application.CountA(rngSource.Columns(1).Cells)
ReDim strArray(lngCount, 1)
End With
strArray(0, 0) = Indus ID
strArray(0, 1) = Text
lngCount = Empty
For Each rngSource In rngSource.Columns(1).Cells
If rngSource.Value   Then
lngCount = lngCount + 1
strArray(lngCount, 0) = rngSource.Value
End If
strArray(lngCount, 1) = strArray(lngCount, 1)  rngSource.Offset(,
1).Value rngSource.Offset(, 2).Text  ,
Next rngSource
Range(E4).Resize(lngCount + 1, 2).Value = strArray

End Sub

Regards,
Sam Mathai Chacko

On Tue, Jan 31, 2012 at 10:42 PM, Veeru TOC veerub...@gmail.com wrote:





 Dear All,


 Can i use pivot table up to data came below

Indus ID Alarm on Site Time  IN-1008993 DG on Load 12:16:29   Mains
 Fail 12:14:59  IN-1009598 Mains Fail 19:56:46   19:56:56   Rectifier Fail
 19:56:46

 But i need

 Requirement data  type:

   indus id Text  IN-1008993 DG on load 12:16,Mains fail 12:14  IN-1009598 
 Mains
 fail 19:56,Rectifier fail 19:56

 plz find attachment of file


 *ThanksRegards*

 * *

 *   **Veerendra.Vanam*

   *TOC TEAM*
 * *  *Bhagyanagar Electrical  Contractors**
 ****H.No-5-9-286/65,Plot No-65
 Rajiv Gandhi Nagar,Near Andhra Jyothi Press,IE-Kukatpally,
   Hyderabad-500072,-Andhra Pradesh
 **   **91-9177-444-840**,*


  --
 FORUM RULES (986+ members already BANNED for violation)

 1) Use concise, accurate thread titles. Poor thread titles, like Please
 Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice
 will not get quick attention or may not be answered.

 2) Don't post a question in the thread of another member.

 3) Don't post questions regarding breaking or bypassing any security
 measure.

 4) Acknowledge the responses you receive, good or bad.

 5) Cross-promotion of, or links to, forums competitive to this forum in
 signatures are prohibited.

 NOTE : Don't ever post personal or confidential data in a workbook. Forum
 owners and members are not responsible for any loss.


 --
 To post to this group, send email to excel-macros@googlegroups.com



 --





 *ThanksRegards*

 * *

 *   **Veerendra.Vanam*

   *TOC TEAM*
 * *  *Bhagyanagar Electrical  Contractors**
 ****H.No-5-9-286/65,Plot No-65
 Rajiv Gandhi Nagar,Near Andhra Jyothi Press,IE-Kukatpally,
   Hyderabad-500072,-Andhra Pradesh
 **   **91-9177-444-840**,*


  --
 FORUM RULES (986+ members already BANNED for violation)

 1) Use concise, accurate thread titles. Poor thread titles, like Please
 Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice
 will not get quick attention or may not be answered.

 2) Don't post a question in the thread of another member.

 3) Don't post questions regarding breaking or bypassing any security
 measure.

 4) Acknowledge the responses you receive, good or bad.

 5) Cross-promotion of, or links to, forums competitive to this forum in
 signatures are prohibited.

 NOTE : Don't ever post personal or confidential data in a workbook. Forum
 owners and members are not responsible for any loss.


 --
 To post to this group, send email to excel-macros@googlegroups.com




-- 
Sam Mathai Chacko

-- 
FORUM RULES (986+ members already BANNED for violation)

1) Use concise, accurate thread titles. Poor thread titles, like Please Help, 
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get 
quick attention or may not be answered.

2) Don't post a question in the thread of another member.

3) Don't post questions regarding breaking or bypassing any security measure.

4) Acknowledge the responses you receive, good or bad.

5)  Cross-promotion of, or links to, forums competitive to this forum in 
signatures are prohibited. 

NOTE  : Don't ever post personal or confidential data in a workbook. Forum 
owners and members are not responsible for any loss.

--
To post to this group, send email to excel-macros@googlegroups.com


Re: $$Excel-Macros$$ Solve problem in excel

2012-01-31 Thread Veeru TOC
dear sir,

 can i this pivot tabel after use this vba code but use total vba code and
get out put what my requirment data in vba codes

On Tue, Jan 31, 2012 at 11:13 PM, Sam Mathai Chacko samde...@gmail.comwrote:

 Sub Consolidator()

 Dim rngSource As Range
 Dim lngCount As Long
 Dim strArray() As String

 With Worksheets(Sheet7)
 Set rngSource = .Range(A4:C  .Cells(Rows.Count,
 1).End(xlUp)(0).Row)
 lngCount = Application.CountA(rngSource.Columns(1).Cells)
 ReDim strArray(lngCount, 1)
 End With
 strArray(0, 0) = Indus ID
 strArray(0, 1) = Text
 lngCount = Empty
 For Each rngSource In rngSource.Columns(1).Cells
 If rngSource.Value   Then
 lngCount = lngCount + 1
 strArray(lngCount, 0) = rngSource.Value
 End If
 strArray(lngCount, 1) = strArray(lngCount, 1)  rngSource.Offset(,
 1).Value rngSource.Offset(, 2).Text  ,
 Next rngSource
 Range(E4).Resize(lngCount + 1, 2).Value = strArray

 End Sub

 Regards,
 Sam Mathai Chacko


 On Tue, Jan 31, 2012 at 10:42 PM, Veeru TOC veerub...@gmail.com wrote:





 Dear All,


 Can i use pivot table up to data came below

Indus ID Alarm on Site Time  IN-1008993 DG on Load 12:16:29   Mains
 Fail 12:14:59  IN-1009598 Mains Fail 19:56:46   19:56:56   Rectifier Fail
 19:56:46

 But i need

 Requirement data  type:

   indus id Text  IN-1008993 DG on load 12:16,Mains fail 12:14  IN-1009598 
 Mains
 fail 19:56,Rectifier fail 19:56

 plz find attachment of file


 *ThanksRegards*

 * *

 *   **Veerendra.Vanam*

   *TOC TEAM*
 * *  *Bhagyanagar Electrical  Contractors**
 ****H.No-5-9-286/65,Plot No-65
 Rajiv Gandhi Nagar,Near Andhra Jyothi Press,IE-Kukatpally,
   Hyderabad-500072,-Andhra Pradesh
 **   **91-9177-444-840**,*


  --
 FORUM RULES (986+ members already BANNED for violation)

 1) Use concise, accurate thread titles. Poor thread titles, like Please
 Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice
 will not get quick attention or may not be answered.

 2) Don't post a question in the thread of another member.

 3) Don't post questions regarding breaking or bypassing any security
 measure.

 4) Acknowledge the responses you receive, good or bad.

 5) Cross-promotion of, or links to, forums competitive to this forum in
 signatures are prohibited.

 NOTE : Don't ever post personal or confidential data in a workbook. Forum
 owners and members are not responsible for any loss.


 --
 To post to this group, send email to excel-macros@googlegroups.com



 --





 *ThanksRegards*

 * *

 *   **Veerendra.Vanam*

   *TOC TEAM*
 * *  *Bhagyanagar Electrical  Contractors**
 ****H.No-5-9-286/65,Plot No-65
 Rajiv Gandhi Nagar,Near Andhra Jyothi Press,IE-Kukatpally,
   Hyderabad-500072,-Andhra Pradesh
 **   **91-9177-444-840**,*


  --
 FORUM RULES (986+ members already BANNED for violation)

 1) Use concise, accurate thread titles. Poor thread titles, like Please
 Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice
 will not get quick attention or may not be answered.

 2) Don't post a question in the thread of another member.

 3) Don't post questions regarding breaking or bypassing any security
 measure.

 4) Acknowledge the responses you receive, good or bad.

 5) Cross-promotion of, or links to, forums competitive to this forum in
 signatures are prohibited.

 NOTE : Don't ever post personal or confidential data in a workbook. Forum
 owners and members are not responsible for any loss.


 --
 To post to this group, send email to excel-macros@googlegroups.com




 --
 Sam Mathai Chacko

  --
 FORUM RULES (986+ members already BANNED for violation)

 1) Use concise, accurate thread titles. Poor thread titles, like Please
 Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice
 will not get quick attention or may not be answered.

 2) Don't post a question in the thread of another member.

 3) Don't post questions regarding breaking or bypassing any security
 measure.

 4) Acknowledge the responses you receive, good or bad.

 5) Cross-promotion of, or links to, forums competitive to this forum in
 signatures are prohibited.

 NOTE : Don't ever post personal or confidential data in a workbook. Forum
 owners and members are not responsible for any loss.


 --
 To post to this group, send email to excel-macros@googlegroups.com




-- 





*ThanksRegards*

* *

*   **Veerendra.Vanam*

  *TOC TEAM*
* *  *Bhagyanagar Electrical  Contractors**
****H.No-5-9-286/65,Plot No-65
Rajiv Gandhi Nagar,Near Andhra 

Re: $$Excel-Macros$$ Solve problem in excel

2012-01-31 Thread Sam Mathai Chacko
This works on the Pivot table only If you want a macro to create the
pivot table also, that can be done.

Regards,

Sam Mathai Chacko

On Tue, Jan 31, 2012 at 11:19 PM, Veeru TOC veerub...@gmail.com wrote:

 dear sir,

  can i this pivot tabel after use this vba code but use total vba code and
 get out put what my requirment data in vba codes


 On Tue, Jan 31, 2012 at 11:13 PM, Sam Mathai Chacko samde...@gmail.comwrote:

 Sub Consolidator()

 Dim rngSource As Range
 Dim lngCount As Long
 Dim strArray() As String

 With Worksheets(Sheet7)
 Set rngSource = .Range(A4:C  .Cells(Rows.Count,
 1).End(xlUp)(0).Row)
 lngCount = Application.CountA(rngSource.Columns(1).Cells)
 ReDim strArray(lngCount, 1)
 End With
 strArray(0, 0) = Indus ID
 strArray(0, 1) = Text
 lngCount = Empty
 For Each rngSource In rngSource.Columns(1).Cells
 If rngSource.Value   Then
 lngCount = lngCount + 1
 strArray(lngCount, 0) = rngSource.Value
 End If
 strArray(lngCount, 1) = strArray(lngCount, 1) 
 rngSource.Offset(, 1).Value rngSource.Offset(, 2).Text  ,
 Next rngSource
 Range(E4).Resize(lngCount + 1, 2).Value = strArray

 End Sub

 Regards,
 Sam Mathai Chacko


 On Tue, Jan 31, 2012 at 10:42 PM, Veeru TOC veerub...@gmail.com wrote:





 Dear All,


 Can i use pivot table up to data came below

Indus ID Alarm on Site Time  IN-1008993 DG on Load 12:16:29   Mains
 Fail 12:14:59  IN-1009598 Mains Fail 19:56:46   19:56:56   Rectifier
 Fail 19:56:46

 But i need

 Requirement data  type:

   indus id Text  IN-1008993 DG on load 12:16,Mains fail 12:14
 IN-1009598 Mains fail 19:56,Rectifier fail 19:56

 plz find attachment of file


 *ThanksRegards*

 * *

 *   **Veerendra.Vanam*

   *TOC TEAM*
 * *  *Bhagyanagar Electrical  Contractors**
 ****H.No-5-9-286/65,Plot No-65
 Rajiv Gandhi Nagar,Near Andhra Jyothi Press,IE-Kukatpally,
   Hyderabad-500072,-Andhra Pradesh
 **   **91-9177-444-840**,*


  --
 FORUM RULES (986+ members already BANNED for violation)

 1) Use concise, accurate thread titles. Poor thread titles, like Please
 Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice
 will not get quick attention or may not be answered.

 2) Don't post a question in the thread of another member.

 3) Don't post questions regarding breaking or bypassing any security
 measure.

 4) Acknowledge the responses you receive, good or bad.

 5) Cross-promotion of, or links to, forums competitive to this forum in
 signatures are prohibited.

 NOTE : Don't ever post personal or confidential data in a workbook.
 Forum owners and members are not responsible for any loss.


 --
 To post to this group, send email to excel-macros@googlegroups.com



 --





 *ThanksRegards*

 * *

 *   **Veerendra.Vanam*

   *TOC TEAM*
 * *  *Bhagyanagar Electrical  Contractors**
 ****H.No-5-9-286/65,Plot No-65
 Rajiv Gandhi Nagar,Near Andhra Jyothi Press,IE-Kukatpally,
   Hyderabad-500072,-Andhra Pradesh
 **   **91-9177-444-840**,*


  --
 FORUM RULES (986+ members already BANNED for violation)

 1) Use concise, accurate thread titles. Poor thread titles, like Please
 Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice
 will not get quick attention or may not be answered.

 2) Don't post a question in the thread of another member.

 3) Don't post questions regarding breaking or bypassing any security
 measure.

 4) Acknowledge the responses you receive, good or bad.

 5) Cross-promotion of, or links to, forums competitive to this forum in
 signatures are prohibited.

 NOTE : Don't ever post personal or confidential data in a workbook.
 Forum owners and members are not responsible for any loss.


 --
 To post to this group, send email to excel-macros@googlegroups.com




 --
 Sam Mathai Chacko

  --
 FORUM RULES (986+ members already BANNED for violation)

 1) Use concise, accurate thread titles. Poor thread titles, like Please
 Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice
 will not get quick attention or may not be answered.

 2) Don't post a question in the thread of another member.

 3) Don't post questions regarding breaking or bypassing any security
 measure.

 4) Acknowledge the responses you receive, good or bad.

 5) Cross-promotion of, or links to, forums competitive to this forum in
 signatures are prohibited.

 NOTE : Don't ever post personal or confidential data in a workbook. Forum
 owners and members are not responsible for any loss.


 --
 To post to this group, send email to 

Re: $$Excel-Macros$$ Solve problem in excel

2012-01-31 Thread Veeru TOC
Dear Sir,


When i click VBA code i am directly enter to my required data in
New sheet from raw data



On Tue, Jan 31, 2012 at 11:37 PM, Sam Mathai Chacko samde...@gmail.comwrote:

 This works on the Pivot table only If you want a macro to create the
 pivot table also, that can be done.

 Regards,

 Sam Mathai Chacko


 On Tue, Jan 31, 2012 at 11:19 PM, Veeru TOC veerub...@gmail.com wrote:

 dear sir,

  can i this pivot tabel after use this vba code but use total vba code
 and get out put what my requirment data in vba codes


 On Tue, Jan 31, 2012 at 11:13 PM, Sam Mathai Chacko 
 samde...@gmail.comwrote:

 Sub Consolidator()

 Dim rngSource As Range
 Dim lngCount As Long
 Dim strArray() As String

 With Worksheets(Sheet7)
 Set rngSource = .Range(A4:C  .Cells(Rows.Count,
 1).End(xlUp)(0).Row)
 lngCount = Application.CountA(rngSource.Columns(1).Cells)
 ReDim strArray(lngCount, 1)
 End With
 strArray(0, 0) = Indus ID
 strArray(0, 1) = Text
 lngCount = Empty
 For Each rngSource In rngSource.Columns(1).Cells
 If rngSource.Value   Then
 lngCount = lngCount + 1
 strArray(lngCount, 0) = rngSource.Value
 End If
 strArray(lngCount, 1) = strArray(lngCount, 1) 
 rngSource.Offset(, 1).Value rngSource.Offset(, 2).Text  ,
 Next rngSource
 Range(E4).Resize(lngCount + 1, 2).Value = strArray

 End Sub

 Regards,
 Sam Mathai Chacko


 On Tue, Jan 31, 2012 at 10:42 PM, Veeru TOC veerub...@gmail.com wrote:





 Dear All,


 Can i use pivot table up to data came below

Indus ID Alarm on Site Time  IN-1008993 DG on Load 12:16:29   Mains
 Fail 12:14:59  IN-1009598 Mains Fail 19:56:46   19:56:56   Rectifier
 Fail 19:56:46

 But i need

 Requirement data  type:

   indus id Text  IN-1008993 DG on load 12:16,Mains fail 12:14
 IN-1009598 Mains fail 19:56,Rectifier fail 19:56

 plz find attachment of file


 *ThanksRegards*

 * *

 *   **Veerendra.Vanam*

   *TOC TEAM*
 * *  *Bhagyanagar Electrical  Contractors**
 ****H.No-5-9-286/65,Plot No-65
 Rajiv Gandhi Nagar,Near Andhra Jyothi Press,IE-Kukatpally,
   Hyderabad-500072,-Andhra Pradesh
 **   **91-9177-444-840**,*


  --
 FORUM RULES (986+ members already BANNED for violation)

 1) Use concise, accurate thread titles. Poor thread titles, like Please
 Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice
 will not get quick attention or may not be answered.

 2) Don't post a question in the thread of another member.

 3) Don't post questions regarding breaking or bypassing any security
 measure.

 4) Acknowledge the responses you receive, good or bad.

 5) Cross-promotion of, or links to, forums competitive to this forum in
 signatures are prohibited.

 NOTE : Don't ever post personal or confidential data in a workbook.
 Forum owners and members are not responsible for any loss.


 --
 To post to this group, send email to excel-macros@googlegroups.com



 --





 *ThanksRegards*

 * *

 *   **Veerendra.Vanam*

   *TOC TEAM*
 * *  *Bhagyanagar Electrical  Contractors**
 ****H.No-5-9-286/65,Plot No-65
 Rajiv Gandhi Nagar,Near Andhra Jyothi Press,IE-Kukatpally,
   Hyderabad-500072,-Andhra Pradesh
 **   **91-9177-444-840**,*


  --
 FORUM RULES (986+ members already BANNED for violation)

 1) Use concise, accurate thread titles. Poor thread titles, like Please
 Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice
 will not get quick attention or may not be answered.

 2) Don't post a question in the thread of another member.

 3) Don't post questions regarding breaking or bypassing any security
 measure.

 4) Acknowledge the responses you receive, good or bad.

 5) Cross-promotion of, or links to, forums competitive to this forum in
 signatures are prohibited.

 NOTE : Don't ever post personal or confidential data in a workbook.
 Forum owners and members are not responsible for any loss.


 --
 To post to this group, send email to excel-macros@googlegroups.com




 --
 Sam Mathai Chacko

  --
 FORUM RULES (986+ members already BANNED for violation)

 1) Use concise, accurate thread titles. Poor thread titles, like Please
 Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice
 will not get quick attention or may not be answered.

 2) Don't post a question in the thread of another member.

 3) Don't post questions regarding breaking or bypassing any security
 measure.

 4) Acknowledge the responses you receive, good or bad.

 5) Cross-promotion of, or links to, forums competitive to this forum in
 signatures are prohibited.

 NOTE : Don't ever post personal or confidential data in a workbook.
 Forum owners and members are