Re: $$Excel-Macros$$ Counting up the combinations

2017-02-20 Thread Greg Della-Croce
OK, people, I like a good dialog as much as anyone else.  But will you
please stop using this thread for your conversation!

Thanks,


Greg Della-Croce

-- 
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s 
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ 
https://www.facebook.com/discussexcel

FORUM RULES

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) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.

NOTE  : Don't ever post confidential data in a workbook. Forum owners and 
members are not responsible for any loss.
--- 
You received this message because you are subscribed to the Google Groups "MS 
EXCEL AND VBA MACROS" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at https://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


Re: $$Excel-Macros$$ Counting up the combinations

2017-02-20 Thread derrickandrew994 via MS EXCEL AND VBA MACROS


On Mon, 2/20/17, hopkinsruben865 via MS EXCEL AND VBA MACROS 
 wrote:

 Subject: Re: $$Excel-Macros$$ Counting up the combinations
 To: excel-macros@googlegroups.com
 Date: Monday, February 20, 2017, 9:23 PM
 
 
 
 On Mon, 2/20/17, martinez.david533 via MS EXCEL AND VBA
 MACROS 
 wrote:
 
  Subject: Re: $$Excel-Macros$$ Counting up the combinations
  To: excel-macros@googlegroups.com
  Date: Monday, February 20, 2017, 7:11 PM
  
  
  
  On Mon, 2/20/17, Paul Schreiner 
  wrote:
  
   Subject: Re: $$Excel-Macros$$ Counting up the
 combinations
   To: "excel-macros@googlegroups.com"
  
   Date: Monday, February 20, 2017, 4:50 PM
   
   What's
   the format of your survey results?
   My
   script "assumes" that the current sheet has three
   columns:
   Survey#,
   Question, Answer in
   columns A, B, and C.
   It
   places the summary in columns F:Kwith
   the header of:  Question#, Ans_1, Ans_2, Ans_3,
 Ans_4,
   Ans_5
   Sub
   CountArray()
      
   Dim Results(1 To 4, 1 To 5)
      
   Dim nRow, nRows
      
   Dim qNo As Integer, qVal As Integer
      
   
      
   nRows =
   Application.WorksheetFunction.CountA(Range("A:A"))
      
   
      
   For nRow = 2 To nRows
      
   qNo = Cells(nRow, "B").Value
      
   qVal = Cells(nRow, "C").Value
      
   Results(qNo, qVal) = Results(qNo, qVal) + 1
      
   Next nRow
      
   
      
   For qNo = 1 To 4
      
   For qVal = 1 To 5
      
   Cells(qNo + 1, qVal + 6).Value = Results(qNo, qVal)
      
   Next qVal
      
   Next qNo
      
   MsgBox "Fin"
   End
   Sub
    Paul-
   “Do
   all the good you can,
   By all the means you
   can,
   In all the ways you can,
   In all the places you can,
   At
   all the times you can,
   To all the people you
   can,
   As long as ever you can.” - John
   Wesley
   -
   
   
    
     On Monday, February 20, 2017 8:43 AM,
   Greg Della-Croce 
  wrote:
     
   
    Paul,  That is an
   excellent idea!  All my survey results are on one
 page of
   on workbook.  So this should be fairly simple to
 write.
     Thanks!!
   
   Greg Della-CroceSkype:
   gdellacroce55Cell: 407-408-2572greg_della-cr...@sil.org"If
  you assume you
   know the answer, you will miss having a
 breakthrough.
  It’s
   okay to do what you did yesterday, but it will never
 be
   amazing again.". - Rod Favarod, CEO of
   Spredfast
   
   
   
   
   
   On
   Mon, Feb 20, 2017 at 7:55 AM, Paul Schreiner 
   wrote:
   How
   are your survey results stored?Are
   they separate files?or
   have you already combined them into one
   workbook? 
   What
   *I* would do would define an
 array:Results(QuestionNo,
   QuestionVal)
   Dim
   Results(1 to 4,1 to 5)
   Then,
   go through your surveys and increment the array value
 for
   each questionThat
   is: Question 1, value 1, increment Results(1,1) by
   1:
      
   Results(qNo, qVal) = Results(qNo, qVal) + 1
   Once
   you've populated the array, you can use nested loops
 to
   write the values:   
   For qNo = 1 To 4
      
   For qVal = 1 To 5 
   Cells(qNo + 1, qVal).Value = Results(qNo, qVal) 
      
   Next qVal
      
   Next qNo   Since
   I don't know how your data is formatted, it is
 difficult
   to write sample code.
   I
   created a worksheet of 1000 surveys, 4 questions
 each, and
   random values 1-5.
   The
   entire subroutine to count the values and write out
 the
   results was 20 lines and took less than a second to
   run!
   If
   you have to open each survey separately, it will
 take
   significantly longer :)
   let
   me know if you need additional assistance.
   Paul--
   ---
   “Do
   all the good you can,
   By all the means you
   can,
   In all the ways you can,
   In all the places you can,
   At
   all the times you can,
   To all the people you
   can,
   As long as ever you can.” - John
   Wesley
   --
   --- 
   
    
   
    On
   Saturday, February 18, 2017 6:28 PM, Greg
 Della-Croce
  
   wrote:
     
   
    
   
   I have a sheet of responses to
   a short survey.   The survey asked 4 questions with
 range
   answers (1 to 5, 5 being best), and then two
   open-ended questions.   I would like to count up
 the
   number of each combination of answers with the range
   answers.  So for all of the surveys, I would like to
 know
   how many people that answered 1 to question 1
 answered
   question 2 - 1, 3 -1, 4-1, and how many of those
 people
   answered 2-2, 3-1, 4-1,  and how many answered 2-1,
 3-2,
   4-1, and so forth for all of 

Re: $$Excel-Macros$$ Counting up the combinations

2017-02-20 Thread hopkinsruben865 via MS EXCEL AND VBA MACROS


On Mon, 2/20/17, martinez.david533 via MS EXCEL AND VBA MACROS 
 wrote:

 Subject: Re: $$Excel-Macros$$ Counting up the combinations
 To: excel-macros@googlegroups.com
 Date: Monday, February 20, 2017, 7:11 PM
 
 
 
 On Mon, 2/20/17, Paul Schreiner 
 wrote:
 
  Subject: Re: $$Excel-Macros$$ Counting up the combinations
  To: "excel-macros@googlegroups.com"
 
  Date: Monday, February 20, 2017, 4:50 PM
  
  What's
  the format of your survey results?
  My
  script "assumes" that the current sheet has three
  columns:
  Survey#,
  Question, Answer in
  columns A, B, and C.
  It
  places the summary in columns F:Kwith
  the header of:  Question#, Ans_1, Ans_2, Ans_3, Ans_4,
  Ans_5
  Sub
  CountArray()
     
  Dim Results(1 To 4, 1 To 5)
     
  Dim nRow, nRows
     
  Dim qNo As Integer, qVal As Integer
     
  
     
  nRows =
  Application.WorksheetFunction.CountA(Range("A:A"))
     
  
     
  For nRow = 2 To nRows
     
  qNo = Cells(nRow, "B").Value
     
  qVal = Cells(nRow, "C").Value
     
  Results(qNo, qVal) = Results(qNo, qVal) + 1
     
  Next nRow
     
  
     
  For qNo = 1 To 4
     
  For qVal = 1 To 5
     
  Cells(qNo + 1, qVal + 6).Value = Results(qNo, qVal)
     
  Next qVal
     
  Next qNo
     
  MsgBox "Fin"
  End
  Sub
   Paul-
  “Do
  all the good you can,
  By all the means you
  can,
  In all the ways you can,
  In all the places you can,
  At
  all the times you can,
  To all the people you
  can,
  As long as ever you can.” - John
  Wesley
  -
  
  
   
    On Monday, February 20, 2017 8:43 AM,
  Greg Della-Croce 
 wrote:
    
  
   Paul,  That is an
  excellent idea!  All my survey results are on one page of
  on workbook.  So this should be fairly simple to write.
    Thanks!!
  
  Greg Della-CroceSkype:
  gdellacroce55Cell: 407-408-2572greg_della-cr...@sil.org"If
 you assume you
  know the answer, you will miss having a breakthrough.
 It’s
  okay to do what you did yesterday, but it will never be
  amazing again.". - Rod Favarod, CEO of
  Spredfast
  
  
  
  
  
  On
  Mon, Feb 20, 2017 at 7:55 AM, Paul Schreiner 
  wrote:
  How
  are your survey results stored?Are
  they separate files?or
  have you already combined them into one
  workbook? 
  What
  *I* would do would define an array:Results(QuestionNo,
  QuestionVal)
  Dim
  Results(1 to 4,1 to 5)
  Then,
  go through your surveys and increment the array value for
  each questionThat
  is: Question 1, value 1, increment Results(1,1) by
  1:
     
  Results(qNo, qVal) = Results(qNo, qVal) + 1
  Once
  you've populated the array, you can use nested loops to
  write the values:   
  For qNo = 1 To 4
     
  For qVal = 1 To 5 
  Cells(qNo + 1, qVal).Value = Results(qNo, qVal) 
     
  Next qVal
     
  Next qNo   Since
  I don't know how your data is formatted, it is difficult
  to write sample code.
  I
  created a worksheet of 1000 surveys, 4 questions each, and
  random values 1-5.
  The
  entire subroutine to count the values and write out the
  results was 20 lines and took less than a second to
  run!
  If
  you have to open each survey separately, it will take
  significantly longer :)
  let
  me know if you need additional assistance.
  Paul--
  ---
  “Do
  all the good you can,
  By all the means you
  can,
  In all the ways you can,
  In all the places you can,
  At
  all the times you can,
  To all the people you
  can,
  As long as ever you can.” - John
  Wesley
  --
  --- 
  
   
  
   On
  Saturday, February 18, 2017 6:28 PM, Greg Della-Croce
 
  wrote:
    
  
   
  
  I have a sheet of responses to
  a short survey.   The survey asked 4 questions with range
  answers (1 to 5, 5 being best), and then two
  open-ended questions.   I would like to count up the
  number of each combination of answers with the range
  answers.  So for all of the surveys, I would like to know
  how many people that answered 1 to question 1 answered
  question 2 - 1, 3 -1, 4-1, and how many of those people
  answered 2-2, 3-1, 4-1,  and how many answered 2-1, 3-2,
  4-1, and so forth for all of the combinations of answers.
    
  I just can not figure
  out the right algorithm to do this without hard-coding
 ever
  possible combo.  Would someone know where I could get
 some
  help doing this in Exel, or suggest a better
  program?
  Thanks
  
  
  
  -- 
  
  Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you
  wanna be? It’s =TIME(2,DO:IT,N:OW) ! Join official
  Facebook page of this forum @ https://www.facebook.com/
  discussexcel
  
   
  
  FORUM RULES
  
   
  
  1) Use 

$$Excel-Macros$$ *** we provide GC and USC only ***

2017-02-20 Thread mike . 7nani


 we provide GC and USC only 

 

This is Mike from Golok Global . I have a* Tableau Developer/Admin , 
DevOps,Java Devloper,Java UI Devloper* those are GC’s and citizens . if 
 you have any requirements for my candidates*.*

 Please forward  your requirements to my mail Id:*m...@golokglobal.com* Desk 
No: *9722329938*

 

-- 
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s 
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ 
https://www.facebook.com/discussexcel

FORUM RULES

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) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.

NOTE  : Don't ever post confidential data in a workbook. Forum owners and 
members are not responsible for any loss.
--- 
You received this message because you are subscribed to the Google Groups "MS 
EXCEL AND VBA MACROS" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at https://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


Re: $$Excel-Macros$$ Counting up the combinations

2017-02-20 Thread martinez.david533 via MS EXCEL AND VBA MACROS


On Mon, 2/20/17, Paul Schreiner  wrote:

 Subject: Re: $$Excel-Macros$$ Counting up the combinations
 To: "excel-macros@googlegroups.com" 
 Date: Monday, February 20, 2017, 4:50 PM
 
 What's
 the format of your survey results?
 My
 script "assumes" that the current sheet has three
 columns:
 Survey#,
 Question, Answer in
 columns A, B, and C.
 It
 places the summary in columns F:Kwith
 the header of:  Question#, Ans_1, Ans_2, Ans_3, Ans_4,
 Ans_5
 Sub
 CountArray()
    
 Dim Results(1 To 4, 1 To 5)
    
 Dim nRow, nRows
    
 Dim qNo As Integer, qVal As Integer
    
 
    
 nRows =
 Application.WorksheetFunction.CountA(Range("A:A"))
    
 
    
 For nRow = 2 To nRows
    
 qNo = Cells(nRow, "B").Value
    
 qVal = Cells(nRow, "C").Value
    
 Results(qNo, qVal) = Results(qNo, qVal) + 1
    
 Next nRow
    
 
    
 For qNo = 1 To 4
    
 For qVal = 1 To 5
    
 Cells(qNo + 1, qVal + 6).Value = Results(qNo, qVal)
    
 Next qVal
    
 Next qNo
    
 MsgBox "Fin"
 End
 Sub
  Paul-
 “Do
 all the good you can,
 By all the means you
 can,
 In all the ways you can,
 In all the places you can,
 At
 all the times you can,
 To all the people you
 can,
 As long as ever you can.” - John
 Wesley
 -
 
 
  
   On Monday, February 20, 2017 8:43 AM,
 Greg Della-Croce  wrote:
   
 
  Paul,  That is an
 excellent idea!  All my survey results are on one page of
 on workbook.  So this should be fairly simple to write.
   Thanks!!
 
 Greg Della-CroceSkype:
 gdellacroce55Cell: 407-408-2572greg_della-cr...@sil.org"If you assume you
 know the answer, you will miss having a breakthrough. It’s
 okay to do what you did yesterday, but it will never be
 amazing again.". - Rod Favarod, CEO of
 Spredfast
 
 
 
 
 
 On
 Mon, Feb 20, 2017 at 7:55 AM, Paul Schreiner 
 wrote:
 How
 are your survey results stored?Are
 they separate files?or
 have you already combined them into one
 workbook? 
 What
 *I* would do would define an array:Results(QuestionNo,
 QuestionVal)
 Dim
 Results(1 to 4,1 to 5)
 Then,
 go through your surveys and increment the array value for
 each questionThat
 is: Question 1, value 1, increment Results(1,1) by
 1:
    
 Results(qNo, qVal) = Results(qNo, qVal) + 1
 Once
 you've populated the array, you can use nested loops to
 write the values:   
 For qNo = 1 To 4
    
 For qVal = 1 To 5 
 Cells(qNo + 1, qVal).Value = Results(qNo, qVal) 
    
 Next qVal
    
 Next qNo   Since
 I don't know how your data is formatted, it is difficult
 to write sample code.
 I
 created a worksheet of 1000 surveys, 4 questions each, and
 random values 1-5.
 The
 entire subroutine to count the values and write out the
 results was 20 lines and took less than a second to
 run!
 If
 you have to open each survey separately, it will take
 significantly longer :)
 let
 me know if you need additional assistance.
 Paul--
 ---
 “Do
 all the good you can,
 By all the means you
 can,
 In all the ways you can,
 In all the places you can,
 At
 all the times you can,
 To all the people you
 can,
 As long as ever you can.” - John
 Wesley
 --
 --- 
 
  
 
  On
 Saturday, February 18, 2017 6:28 PM, Greg Della-Croce 

 wrote:
   
 
  
 
 I have a sheet of responses to
 a short survey.   The survey asked 4 questions with range
 answers (1 to 5, 5 being best), and then two
 open-ended questions.   I would like to count up the
 number of each combination of answers with the range
 answers.  So for all of the surveys, I would like to know
 how many people that answered 1 to question 1 answered
 question 2 - 1, 3 -1, 4-1, and how many of those people
 answered 2-2, 3-1, 4-1,  and how many answered 2-1, 3-2,
 4-1, and so forth for all of the combinations of answers.
   
 I just can not figure
 out the right algorithm to do this without hard-coding ever
 possible combo.  Would someone know where I could get some
 help doing this in Exel, or suggest a better
 program?
 Thanks
 
 
 
 -- 
 
 Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you
 wanna be? It’s =TIME(2,DO:IT,N:OW) ! Join official
 Facebook page of this forum @ https://www.facebook.com/
 discussexcel
 
  
 
 FORUM RULES
 
  
 
 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) Jobs posting is not allowed.
 
 6) Sharing copyrighted material and their links is not
 allowed.
 
  
 

$$Excel-Macros$$ الدورة التدريبية تكنولوجيا الإدارة الذكية التحول من الإدارة الإلكترونية الى الإدارة الذكية إدارة المستقبل والخدمات الذكية دبى – الامارات العربية المتحدة )Smart technology management)

2017-02-20 Thread sara ali
*الدار العربية للتنمية الإدارية*

*بالتعاون مع الإتحاد الدولى لمؤسسات التنمية البشرية*

*الدورة التدريبية *

*تكنولوجيا الإدارة الذكية *

*التحول من الإدارة الإلكترونية الى الإدارة الذكية *

*إدارة المستقبل والخدمات الذكية *

*دبى – الامارات العربية المتحدة *

*)**Smart technology management)*

*خلال الفترة من  26   الى 29 مارس 2017 م*

*تهدف الورشة الى  * :



*تزويد المشتركين **بالمعرفة العامة في مختلف المجالات في نظام إدارة الموارد
البشرية. تركز الدورة على منهج الأنظمة في إدارة الموارد البشرية, و التطوير
والتحليل الوظيفي, و التصميم والتقييم, و تخطيط الموارد البشرية, والتوظيف
والاختيار، و إدارة الأداء, و التدريب والتطوير، إضافة الى اتجاهات جديدة في
مجال إدارة الموارد البشرية*

*.* *سيتمكن المشتركون من كسب المعرفة العامة في المجالات المختلفة داخل
نظام إدارة الموارد البشرية**.*



*مستهدفين في ذلك*



*موظفى الموارد البشرية والاشخاص المهتمين بذلك المجال .. *



*والدار العربية  يسرها دعوتكم للمساهمة والمشاركة في أعمال الفاعليات من خلال
تجربة مميزة أو بالحضور والمناقشة، كذلك ترشيح من ترون من كوادر مؤسستكم
الموقرة وتمنح الدار العربية مقعدا خامس مجانا في حال ترشيح سيادتكم اربع
افراد من مؤسستكم الموقرة.*

*تأكيد المشاركة*

*يتم إرسال خطاب المشاركة الرسمى او تعبئة النموذج المرفق موضح بة أسماء
المرشحين – مناصبهم الإدارية -  اسم النشاط – طريقة سداد رسوم المشاركة ( كاش
اول أيام التدريب او بتحويل بنكى قبل بدء النشاط)وصورة من تذكرة الطيران **علماً
بأن رسوم الاشتراك 1500دولار أمريكى* *للفرد*



*علي فاكس رقم *0020237800573 او0020235866323 *اوعلي *

*بريدي الإلكتروني**saragw...@gmail.com* 

-- 
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s 
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ 
https://www.facebook.com/discussexcel

FORUM RULES

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) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.

NOTE  : Don't ever post confidential data in a workbook. Forum owners and 
members are not responsible for any loss.
--- 
You received this message because you are subscribed to the Google Groups "MS 
EXCEL AND VBA MACROS" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at https://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


Re: $$Excel-Macros$$ Counting up the combinations

2017-02-20 Thread Paul Schreiner
What's the format of your survey results?
My script "assumes" that the current sheet has three columns:
Survey#, Question, Answer in columns A, B, and C.
It places the summary in columns F:Kwith the header of:  Question#, Ans_1, 
Ans_2, Ans_3, Ans_4, Ans_5
Sub CountArray()
    Dim Results(1 To 4, 1 To 5)
    Dim nRow, nRows
    Dim qNo As Integer, qVal As Integer
    
    nRows = Application.WorksheetFunction.CountA(Range("A:A"))
    
    For nRow = 2 To nRows
    qNo = Cells(nRow, "B").Value
    qVal = Cells(nRow, "C").Value
    Results(qNo, qVal) = Results(qNo, qVal) + 1
    Next nRow
    
    For qNo = 1 To 4
    For qVal = 1 To 5
    Cells(qNo + 1, qVal + 6).Value = Results(qNo, qVal)
    Next qVal
    Next qNo
    MsgBox "Fin"
End Sub
 Paul-
“Do all the good you can,
By all the means you can,
In all the ways you can,
In all the places you can,
At all the times you can,
To all the people you can,
As long as ever you can.” - John Wesley
- 

On Monday, February 20, 2017 8:43 AM, Greg Della-Croce 
 wrote:
 

 Paul,  That is an excellent idea!  All my survey results are on one page of on 
workbook.  So this should be fairly simple to write.   Thanks!!

Greg Della-CroceSkype: gdellacroce55Cell: 
407-408-2572greg_della-cr...@sil.org"If you assume you know the answer, you 
will miss having a breakthrough. It’s okay to do what you did yesterday, but it 
will never be amazing again.". - Rod Favarod, CEO of Spredfast




On Mon, Feb 20, 2017 at 7:55 AM, Paul Schreiner  wrote:

How are your survey results stored?Are they separate files?or have you already 
combined them into one workbook? 
What *I* would do would define an array:Results(QuestionNo, QuestionVal)
Dim Results(1 to 4,1 to 5)
Then, go through your surveys and increment the array value for each 
questionThat is: Question 1, value 1, increment Results(1,1) by 1:
    Results(qNo, qVal) = Results(qNo, qVal) + 1
Once you've populated the array, you can use nested loops to write the values:  
  For qNo = 1 To 4
    For qVal = 1 To 5  Cells(qNo + 1, qVal).Value = Results(qNo, 
qVal) 
    Next qVal
    Next qNo   Since I don't know how your data is formatted, it is difficult 
to write sample code.
I created a worksheet of 1000 surveys, 4 questions each, and random values 1-5.
The entire subroutine to count the values and write out the results was 20 
lines and took less than a second to run!
If you have to open each survey separately, it will take significantly longer :)
let me know if you need additional assistance.
Paul-- ---
“Do all the good you can,
By all the means you can,
In all the ways you can,
In all the places you can,
At all the times you can,
To all the people you can,
As long as ever you can.” - John Wesley
-- --- 

On Saturday, February 18, 2017 6:28 PM, Greg Della-Croce 
 wrote:
 

 

I have a sheet of responses to a short survey.   The survey asked 4 questions 
with range answers (1 to 5, 5 being best), and then two open-ended questions.   
I would like to count up the number of each combination of answers with the 
range answers.  So for all of the surveys, I would like to know how many people 
that answered 1 to question 1 answered question 2 - 1, 3 -1, 4-1, and how many 
of those people answered 2-2, 3-1, 4-1,  and how many answered 2-1, 3-2, 4-1, 
and so forth for all of the combinations of answers.   
I just can not figure out the right algorithm to do this without hard-coding 
ever possible combo.  Would someone know where I could get some help doing this 
in Exel, or suggest a better program?
Thanks-- 
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s 
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ 
https://www.facebook.com/ discussexcel
 
FORUM RULES
 
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) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.
 
NOTE : Don't ever post confidential data in a workbook. Forum owners and 
members are not responsible for any loss.
--- 
You received this message because you are subscribed to the Google Groups "MS 
EXCEL AND VBA MACROS" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to excel-macros+unsubscribe@ googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at https://groups.google.com/ group/excel-macros.

Re: $$Excel-Macros$$ Counting up the combinations

2017-02-20 Thread libertystringer via MS EXCEL AND VBA MACROS


On Mon, 2/20/17, Greg Della-Croce  wrote:

 Subject: Re: $$Excel-Macros$$ Counting up the combinations
 To: excel-macros@googlegroups.com
 Date: Monday, February 20, 2017, 3:42 PM
 
 Paul,
  That is an excellent idea!  All my survey results are on
 one page of on workbook.  So this should be fairly simple
 to write.   Thanks!!
 
 Greg Della-CroceSkype:
 gdellacroce55Cell: 407-408-2572greg_della-cr...@sil.org"If you assume you know 
the answer, you will
 miss having a breakthrough. It’s okay to do what you did
 yesterday, but it will never be amazing again.".
 - Rod Favarod, CEO
 of Spredfast
 
 
 
 
 
 On
 Mon, Feb 20, 2017 at 7:55 AM, Paul Schreiner 
 wrote:
 How
 are your survey results stored?Are
 they separate files?or
 have you already combined them into one
 workbook? 
 What
 *I* would do would define an array:Results(QuestionNo,
 QuestionVal)
 Dim
 Results(1 to 4,1 to 5)
 Then,
 go through your surveys and increment the array value for
 each questionThat
 is: Question 1, value 1, increment Results(1,1) by
 1:
    
 Results(qNo, qVal) = Results(qNo, qVal) + 1
 Once
 you've populated the array, you can use nested loops to
 write the values:   
 For qNo = 1 To 4
    
 For qVal = 1 To 5 
 Cells(qNo + 1, qVal).Value = Results(qNo, qVal) 
    
 Next qVal
    
 Next qNo   Since
 I don't know how your data is formatted, it is difficult
 to write sample code.
 I
 created a worksheet of 1000 surveys, 4 questions each, and
 random values 1-5.
 The
 entire subroutine to count the values and write out the
 results was 20 lines and took less than a second to
 run!
 If
 you have to open each survey separately, it will take
 significantly longer :)
 let
 me know if you need additional assistance.
 Paul--
 ---
 “Do
 all the good you can,
 By all the means you
 can,
 In all the ways you can,
 In all the places you can,
 At
 all the times you can,
 To all the people you
 can,
 As long as ever you can.” - John
 Wesley
 --
 --- 
 
  
 
  On
 Saturday, February 18, 2017 6:28 PM, Greg Della-Croce 

 wrote:
   
 
  
 
 I have a sheet of responses to
 a short survey.   The survey asked 4 questions with range
 answers (1 to 5, 5 being best), and then two
 open-ended questions.   I would like to count up the
 number of each combination of answers with the range
 answers.  So for all of the surveys, I would like to know
 how many people that answered 1 to question 1 answered
 question 2 - 1, 3 -1, 4-1, and how many of those people
 answered 2-2, 3-1, 4-1,  and how many answered 2-1, 3-2,
 4-1, and so forth for all of the combinations of answers.
   
 I just can not figure
 out the right algorithm to do this without hard-coding ever
 possible combo.  Would someone know where I could get some
 help doing this in Exel, or suggest a better
 program?
 Thanks
 
 
 
 -- 
 
 Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you
 wanna be? It’s =TIME(2,DO:IT,N:OW) ! Join official
 Facebook page of this forum @ https://www.facebook.com/
 discussexcel
 
  
 
 FORUM RULES
 
  
 
 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) Jobs posting is not allowed.
 
 6) Sharing copyrighted material and their links is not
 allowed.
 
  
 
 NOTE  : Don't ever post confidential data in a workbook.
 Forum owners and members are not responsible for any
 loss.
 
 --- 
 
 You received this message because you are subscribed to the
 Google Groups "MS EXCEL AND VBA MACROS" group.
 
 To unsubscribe from this group and stop receiving emails
 from it, send an email to excel-macros+unsubscribe@
 googlegroups.com.
 
 To post to this group, send email to excel-macros@googlegroups.com.
 
 Visit this group at https://groups.google.com/
 group/excel-macros.
 
 For more options, visit https://groups.google.com/d/
 optout.
 
 
 
 
 
 
 
 -- 
 
 Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you
 wanna be? It’s =TIME(2,DO:IT,N:OW) ! Join official
 Facebook page of this forum @ https://www.facebook.com/
 discussexcel
 
  
 
 FORUM RULES
 
  
 
 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) Jobs posting is not allowed.
 
 6) Sharing 

Re: $$Excel-Macros$$ Counting up the combinations

2017-02-20 Thread Greg Della-Croce
Paul,  That is an excellent idea!  All my survey results are on one page of
on workbook.  So this should be fairly simple to write.
Thanks!!


Greg Della-Croce
Skype: gdellacroce55
Cell: 407-408-2572
greg_della-cr...@sil.org
"If you assume you know the answer, you will miss having a breakthrough.
It’s okay to do what you did yesterday, but it will never be amazing again.".
- *Rod Favarod, CEO of Spredfast*




On Mon, Feb 20, 2017 at 7:55 AM, Paul Schreiner 
wrote:

> How are your survey results stored?
> Are they separate files?
> or have you already combined them into one workbook?
>
> What *I* would do would define an array:
> Results(QuestionNo, QuestionVal)
>
> Dim Results(1 to 4,1 to 5)
>
> Then, go through your surveys and increment the array value for each
> question
> That is: Question 1, value 1, increment Results(1,1) by 1:
>
> Results(qNo, qVal) = Results(qNo, qVal) + 1
>
> Once you've populated the array, you can use nested loops to write the
> values:
> For qNo = 1 To 4
> For qVal = 1 To 5
>   Cells(qNo + 1, qVal).Value = Results(qNo, qVal)
> Next qVal
> Next qNo
>
> Since I don't know how your data is formatted, it is difficult to write
> sample code.
>
> I created a worksheet of 1000 surveys, 4 questions each, and random values
> 1-5.
>
> The entire subroutine to count the values and write out the results was 20
> lines and took less than a second to run!
>
> If you have to open each survey separately, it will take significantly
> longer :)
>
> let me know if you need additional assistance.
>
> *Paul*
> -
>
>
>
>
>
>
>
> *“Do all the good you can,By all the means you can,In all the ways you
> can,In all the places you can,At all the times you can,To all the people
> you can,As long as ever you can.” - John Wesley*
> -
>
>
> On Saturday, February 18, 2017 6:28 PM, Greg Della-Croce <
> greg_della-cr...@sil.org> wrote:
>
>
>
>
> I have a sheet of responses to a short survey.   The survey asked 4
> questions with range answers (1 to 5, 5 being best), and then two
> open-ended questions.   I would like to count up the number of each
> combination of answers with the range answers.  So for all of the surveys,
> I would like to know how many people that answered 1 to question 1 answered
> question 2 - 1, 3 -1, 4-1, and how many of those people answered 2-2, 3-1,
> 4-1,  and how many answered 2-1, 3-2, 4-1, and so forth for all of the
> combinations of answers.
>
> I just can not figure out the right algorithm to do this without
> hard-coding ever possible combo.  Would someone know where I could get some
> help doing this in Exel, or suggest a better program?
>
> Thanks
> --
> Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s
> =TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @
> https://www.facebook.com/discussexcel
>
> FORUM RULES
>
> 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) Jobs posting is not allowed.
> 6) Sharing copyrighted material and their links is not allowed.
>
> NOTE : Don't ever post confidential data in a workbook. Forum owners and
> members are not responsible for any loss.
> ---
> You received this message because you are subscribed to the Google Groups
> "MS EXCEL AND VBA MACROS" group.
> To unsubscribe from this group and stop receiving emails from it, send an
> email to excel-macros+unsubscr...@googlegroups.com.
> To post to this group, send email to excel-macros@googlegroups.com.
> Visit this group at https://groups.google.com/group/excel-macros.
> For more options, visit https://groups.google.com/d/optout.
>
>
> --
> Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s
> =TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @
> https://www.facebook.com/discussexcel
>
> FORUM RULES
>
> 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) Jobs posting is not allowed.
> 6) Sharing copyrighted material and their links is not allowed.
>
> NOTE : Don't ever post confidential data in a workbook. Forum owners and
> members are not responsible for any loss.
> ---
> You received this message because you are subscribed to a topic in the
> Google Groups "MS EXCEL AND VBA 

Re: $$Excel-Macros$$ Counting up the combinations

2017-02-20 Thread Paul Schreiner
How are your survey results stored?Are they separate files?or have you already 
combined them into one workbook? 
What *I* would do would define an array:Results(QuestionNo, QuestionVal)
Dim Results(1 to 4,1 to 5)
Then, go through your surveys and increment the array value for each 
questionThat is: Question 1, value 1, increment Results(1,1) by 1:
    Results(qNo, qVal) = Results(qNo, qVal) + 1
Once you've populated the array, you can use nested loops to write the values:  
  For qNo = 1 To 4
    For qVal = 1 To 5  Cells(qNo + 1, qVal).Value = Results(qNo, 
qVal) 
    Next qVal
    Next qNo   Since I don't know how your data is formatted, it is difficult 
to write sample code.
I created a worksheet of 1000 surveys, 4 questions each, and random values 1-5.
The entire subroutine to count the values and write out the results was 20 
lines and took less than a second to run!
If you have to open each survey separately, it will take significantly longer :)
let me know if you need additional assistance.
Paul-
“Do all the good you can,
By all the means you can,
In all the ways you can,
In all the places you can,
At all the times you can,
To all the people you can,
As long as ever you can.” - John Wesley
- 

On Saturday, February 18, 2017 6:28 PM, Greg Della-Croce 
 wrote:
 

 

I have a sheet of responses to a short survey.   The survey asked 4 questions 
with range answers (1 to 5, 5 being best), and then two open-ended questions.   
I would like to count up the number of each combination of answers with the 
range answers.  So for all of the surveys, I would like to know how many people 
that answered 1 to question 1 answered question 2 - 1, 3 -1, 4-1, and how many 
of those people answered 2-2, 3-1, 4-1,  and how many answered 2-1, 3-2, 4-1, 
and so forth for all of the combinations of answers.   
I just can not figure out the right algorithm to do this without hard-coding 
ever possible combo.  Would someone know where I could get some help doing this 
in Exel, or suggest a better program?
Thanks-- 
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s 
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ 
https://www.facebook.com/discussexcel
 
FORUM RULES
 
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) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.
 
NOTE : Don't ever post confidential data in a workbook. Forum owners and 
members are not responsible for any loss.
--- 
You received this message because you are subscribed to the Google Groups "MS 
EXCEL AND VBA MACROS" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at https://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


   

-- 
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s 
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ 
https://www.facebook.com/discussexcel

FORUM RULES

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) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.

NOTE  : Don't ever post confidential data in a workbook. Forum owners and 
members are not responsible for any loss.
--- 
You received this message because you are subscribed to the Google Groups "MS 
EXCEL AND VBA MACROS" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at https://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


$$Excel-Macros$$ Re: Organizational Chart

2017-02-20 Thread Suresh Kumar B
Hi Kiran,

Herewith i have attached as you asked.

Please check & let me, if you have any questions.

*Thanks & Regards,*
*Suresh Kumar.B*
*Mobile # 9894585740*

On Thursday, February 2, 2017 at 12:53:41 AM UTC+5:30, Kiran Kancherla 
wrote:
>
> Hi All:
>
> I have different kind of requirement in which I have to prepare 
> Organizational Chart.
>
> I have googled my requirements but in all the codes, they are adding some 
> reporting numbers or something. In my current sheet I will be giving the 
> same some senior management executive.
>
> In my current case name are only the unique once.
>
> Attached the sample xlsx and with sample sheet.
>
> Request you help me with code as I cannot add 'Add ins' in my office 
> environment.
>
> Thanks in advance.
>
> Regards,
> Kiran
>

-- 
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s 
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ 
https://www.facebook.com/discussexcel

FORUM RULES

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) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.

NOTE  : Don't ever post confidential data in a workbook. Forum owners and 
members are not responsible for any loss.
--- 
You received this message because you are subscribed to the Google Groups "MS 
EXCEL AND VBA MACROS" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at https://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


{Modified}Sample Data and Chart.xlsm
Description: application/vnd.ms-excel.sheet.macroenabled.12


$$Excel-Macros$$ Re: Need Help in Macros for Currency change in numbers to text

2017-02-20 Thread Suresh Kumar B
Hi *Sachin*,

As you said, I have made changes in the file through formulas

Please check & let me know, If any Changes.

*Thanks & Regards,*
*Suresh Kumar.B*
*Mobile #9894585740*



On Friday, February 17, 2017 at 10:53:19 AM UTC+5:30, सचिन शर्मा wrote:
>
> Thanks Suresh,
>
> It's working and shows "*and*" before last 2 "00" digits.
>
> but, if value comes less then 100 then "*Hundred And*" still visible 
> (Ex.: 99 = *Hundred and Ninety Nine Rupees Only*)
>
>
>
> On Monday, February 6, 2017 at 4:24:42 PM UTC+5:30, सचिन शर्मा wrote:
>>
>> Dear Experts,
>>
>> Please help to resolve below requirement.
>>
>> File attached for reference.
>>
>>
>> *Numbers .: 1,054,265*
>>
>> *Result Shows .: *Ten Lakh Fifty Four Thousand Two Hundred Sixty Five 
>> Rupees Only
>>
>> *Required format .:  *Ten Lakh Fifty Four Thousand Two Hundred *and *Sixty 
>> Five Rupees Only 
>>
>> Thanks and Regards
>> *Sachin Sharma*
>>
>

-- 
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s 
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ 
https://www.facebook.com/discussexcel

FORUM RULES

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) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.

NOTE  : Don't ever post confidential data in a workbook. Forum owners and 
members are not responsible for any loss.
--- 
You received this message because you are subscribed to the Google Groups "MS 
EXCEL AND VBA MACROS" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at https://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


Invoice_Format(Modified).xlsm
Description: application/vnd.ms-excel.sheet.macroenabled.12