Re: $$Excel-Macros$$ for updating the worksheet through the user form

2014-09-24 Thread Ganesh N
Hi Shankar,

PFA,

I have just added one more button (Modify) use that before update button.

Thanks  Regards,
Ganesh N

On Wed, Sep 24, 2014 at 11:00 AM, Shankar Bheema shankar.n...@gmail.com
wrote:

 Good morning all,

 I am attaching an excel workbook which is meant for office file tracking.
 On the worksheet I placed commandbutton namely Entry Form.  Which enables
 entry of the data into the sheet.

 Entry fields will be initially filled upto TIMEIN column.

 From the Timeout, entry of columns will be made at the end of the office
 hours.  Hence, I placed an update command button.  I want to update the sl
 no.1 without disturbing the previous / initial entries.

 Kindly provide solution.

 what is this .xlsm.  I saved the file in .xls format but its showing as
 .xlsm.  However, its working on my machine.

 Thank you in advance

 regards
 shankar sb

 --
 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 http://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 http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


Copy of dak track tool.xlsm
Description: application/vnd.ms-excel.sheet.macroenabled.12


Re: $$Excel-Macros$$ for updating the worksheet through the user form

2014-09-24 Thread Shankar Bheema
thank you very much bro

On Wed, Sep 24, 2014 at 12:26 PM, Ganesh N ganeshg...@gmail.com wrote:

 Hi Shankar,

 PFA,

 I have just added one more button (Modify) use that before update button.

 Thanks  Regards,
 Ganesh N

 On Wed, Sep 24, 2014 at 11:00 AM, Shankar Bheema shankar.n...@gmail.com
 wrote:

 Good morning all,

 I am attaching an excel workbook which is meant for office file
 tracking.  On the worksheet I placed commandbutton namely Entry Form.
 Which enables entry of the data into the sheet.

 Entry fields will be initially filled upto TIMEIN column.

 From the Timeout, entry of columns will be made at the end of the office
 hours.  Hence, I placed an update command button.  I want to update the sl
 no.1 without disturbing the previous / initial entries.

 Kindly provide solution.

 what is this .xlsm.  I saved the file in .xls format but its showing as
 .xlsm.  However, its working on my machine.

 Thank you in advance

 regards
 shankar sb

 --
 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 http://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 http://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 http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


Re: $$Excel-Macros$$ for updating the worksheet through the user form

2014-09-24 Thread Shankar Bheema
Dear Ganesh

I have tried just now and what I found is, when I enter rest of column
fields from the Form Entry and pressing the Modify, a message box asking
for the sl no to modify and I have supplied but nothing is happening.
Modify means, entered fields should reflect on the worksheet na.

Please provide solution.

On Wed, Sep 24, 2014 at 12:26 PM, Ganesh N ganeshg...@gmail.com wrote:

 Hi Shankar,

 PFA,

 I have just added one more button (Modify) use that before update button.

 Thanks  Regards,
 Ganesh N

 On Wed, Sep 24, 2014 at 11:00 AM, Shankar Bheema shankar.n...@gmail.com
 wrote:

 Good morning all,

 I am attaching an excel workbook which is meant for office file
 tracking.  On the worksheet I placed commandbutton namely Entry Form.
 Which enables entry of the data into the sheet.

 Entry fields will be initially filled upto TIMEIN column.

 From the Timeout, entry of columns will be made at the end of the office
 hours.  Hence, I placed an update command button.  I want to update the sl
 no.1 without disturbing the previous / initial entries.

 Kindly provide solution.

 what is this .xlsm.  I saved the file in .xls format but its showing as
 .xlsm.  However, its working on my machine.

 Thank you in advance

 regards
 shankar sb

 --
 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 http://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 http://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 http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


Re: $$Excel-Macros$$ for updating the worksheet through the user form

2014-09-24 Thread Ganesh N
Dear Shankar,

The modify will choose the particular row (enter the sn. no) and then wht
ever change u want make (e.g out time) and then click the update button.

Just try if you have doubt let me know.

Regards,
Ganesh N

On Wed, Sep 24, 2014 at 1:07 PM, Shankar Bheema shankar.n...@gmail.com
wrote:

 Dear Ganesh

 I have tried just now and what I found is, when I enter rest of column
 fields from the Form Entry and pressing the Modify, a message box asking
 for the sl no to modify and I have supplied but nothing is happening.
 Modify means, entered fields should reflect on the worksheet na.

 Please provide solution.

 On Wed, Sep 24, 2014 at 12:26 PM, Ganesh N ganeshg...@gmail.com wrote:

 Hi Shankar,

 PFA,

 I have just added one more button (Modify) use that before update button.

 Thanks  Regards,
 Ganesh N

 On Wed, Sep 24, 2014 at 11:00 AM, Shankar Bheema shankar.n...@gmail.com
 wrote:

 Good morning all,

 I am attaching an excel workbook which is meant for office file
 tracking.  On the worksheet I placed commandbutton namely Entry Form.
 Which enables entry of the data into the sheet.

 Entry fields will be initially filled upto TIMEIN column.

 From the Timeout, entry of columns will be made at the end of the office
 hours.  Hence, I placed an update command button.  I want to update the sl
 no.1 without disturbing the previous / initial entries.

 Kindly provide solution.

 what is this .xlsm.  I saved the file in .xls format but its showing as
 .xlsm.  However, its working on my machine.

 Thank you in advance

 regards
 shankar sb

 --
 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 http://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 http://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.
 

Re: $$Excel-Macros$$ for updating the worksheet through the user form

2014-09-24 Thread Shankar Bheema
thank you, thank you so much. working fine.

On Wed, Sep 24, 2014 at 1:20 PM, Ganesh N ganeshg...@gmail.com wrote:

 Dear Shankar,

 The modify will choose the particular row (enter the sn. no) and then wht
 ever change u want make (e.g out time) and then click the update button.

 Just try if you have doubt let me know.

 Regards,
 Ganesh N

 On Wed, Sep 24, 2014 at 1:07 PM, Shankar Bheema shankar.n...@gmail.com
 wrote:

 Dear Ganesh

 I have tried just now and what I found is, when I enter rest of column
 fields from the Form Entry and pressing the Modify, a message box asking
 for the sl no to modify and I have supplied but nothing is happening.
 Modify means, entered fields should reflect on the worksheet na.

 Please provide solution.

 On Wed, Sep 24, 2014 at 12:26 PM, Ganesh N ganeshg...@gmail.com wrote:

 Hi Shankar,

 PFA,

 I have just added one more button (Modify) use that before update button.

 Thanks  Regards,
 Ganesh N

 On Wed, Sep 24, 2014 at 11:00 AM, Shankar Bheema shankar.n...@gmail.com
  wrote:

 Good morning all,

 I am attaching an excel workbook which is meant for office file
 tracking.  On the worksheet I placed commandbutton namely Entry Form.
 Which enables entry of the data into the sheet.

 Entry fields will be initially filled upto TIMEIN column.

 From the Timeout, entry of columns will be made at the end of the
 office hours.  Hence, I placed an update command button.  I want to update
 the sl no.1 without disturbing the previous / initial entries.

 Kindly provide solution.

 what is this .xlsm.  I saved the file in .xls format but its showing as
 .xlsm.  However, its working on my machine.

 Thank you in advance

 regards
 shankar sb

 --
 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 http://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 http://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 

$$Excel-Macros$$ Help in recording macro's

2014-09-24 Thread 'Ankit Chandna' via MS EXCEL AND VBA MACROS
Hi,

I want to record the macro's through which i can automate the data base that 
ways i want to enter details in main sheet and data should get accumulate in 
compile sheet once i save it.


Please help me out in recording the macro's.

-- 
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 http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


macro sheet.xlsx
Description: MS-Excel 2007 spreadsheet


$$Excel-Macros$$ Help in macro recording

2014-09-24 Thread Ankit chandna
Hi,

I want to record the macro's through which i can automate the data base 
that ways i want to enter details in main sheet and data should get 
accumulate in compile sheet once i save it.


Please help me out in recording the macro's.

-- 
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 http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


macro sheet.xlsx
Description: MS-Excel 2007 spreadsheet


Re: $$Excel-Macros$$ Macro to highlight Max Value in a Column and copy/transpose data in another file

2014-09-24 Thread prkhan56
Hi Pramod
Thanks for your response.
If you check my Input data sheet on File 1 of my original post.  I want it 
to paste transposed data  it in B9, C9, D9 and E9 downwards.
Second, please assign a shortcut or Button to the macro as clicking on the 
Cell is bit risky...it paste the data again and again if we click on the 
colored cell.
Also File 2 will be open.  Your code saves and close the file
 File 1 and File 2 both will be opened by me when I am running Macro 1 and 
Macro 2
 


On Wednesday, September 24, 2014 8:01:22 AM UTC+4, pramodb35 wrote:

 Hi prkhan56 , 

 Please find the your second macro.Kindly see the path as i mention 
 your attached file.[File2.xlsb] your will be second file. 


 Thanks 
 P 



 On Tue, Sep 23, 2014 at 9:23 PM, prkhan56 prkh...@gmail.com javascript: 
 wrote: 
  
  
  Hello All, 
  Can someone help me with the Second Macro? 
  Thanks 
  On Monday, September 22, 2014 7:34:17 PM UTC+4, prkhan56 wrote: 
  
  Hi Pramod, 
  Thanks for your prompt reply. 
  Works great! 
  
  The second macro should run when the Cell Pointer is in Column T on a 
  Highlighted Cell (in red). Can red be given the RGB value mentioned on 
 my 
  sample data? 
  I want to copy and transpose cells from the Row where the Max value is 
  found in Col T. 
  (Cells to be copied are colored and shown under various Steps) 
  
  See the output required is in the Input Data Sheet. I have made a 
 sample 
  output on Input Data sheet for values on Row 25 on SM Data sheet 
  
  I have shown the Input Data shown here for sake of explanation.  It 
 would 
  be in File 2 which would be on the shared folder Path S:\..\...\ 
  
  Hope it is clear now. 
  Thanks once again for your time. 
  Rashid 
  
  On Monday, September 22, 2014 5:23:52 PM UTC+4, pramodb35 wrote: 
  
  Hi Dear, 
  
  
  Please find the Attached file ... 
  
  
  Regards 
  P 
  
  On Mon, Sep 22, 2014 at 2:53 PM, prkhan56 prkh...@gmail.com wrote: 
   Dear All, 
   
   I am using Excel 2010 and have attached a file with my problem. 
   
   I need Two Macros for my problem. 
   
   
   
   There are two Files (both in a shared location - Path S:\...\...\) 
   
   File 1 has sheet name SM 
   
   File 2 has sheet name Input Data (shown here to explain the problem) 
   
   
   
   Data in set of 24 rows i.e for 24 Hours x 10 days 
   
   Data Set is starting from A25 to Z 
   
   
   
   First Macro should run upto Row 264 and highlight the Max Value in 
 Col 
   T 
   
   24 Rows data should be considered when highlighting the Max Value 
   
   eg Row 25 - 48, 49 - 72 and so on till Row 264 
   
   
   
   
   
   Second Macro should run only when the Cell pointer is on the 
   highlighted 
   Cell in Col T 
   
   
   
   It should copy the values found in the highlighted Row and paste it 
 in 
   File 
   2 as follows: 
   
   Step 1 - Values from Cell C to I should be copied and transposed in 
   File 2 
   in Cell B9 down 
   
   Step 2 - Values from Cell J to M should be copied and transposed in 
   File 2 
   in Cell C9 down 
   
   Step 3 - Values from Cell N to S should be copied and transposed in 
   File 2 
   in Cell D9 down 
   
   Step 4 - Values from Cell T to Z should be copied and transposed in 
   File 2 
   in Cell E9 down 
   
   
   
   Colored only for sake of explanation 
   
   
   
   Second Macro should run only once and then as and when required, as 
   further 
   work needs to be done after copy/transposing the data. 
   
   
   
   TIA 
   
   Rashid 
   
   -- 
   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...@googlegroups.com. 
   To post to this group, send email to excel-...@googlegroups.com. 
   Visit this group at http://groups.google.com/group/excel-macros. 
   For more options, visit https://groups.google.com/d/optout. 
  
  
  
  -- 
  PramodSingh 
  
  -- 
  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 

Re: $$Excel-Macros$$ Macro to highlight Max Value in a Column and copy/transpose data in another file

2014-09-24 Thread Pramod Singh
Hi Dear.

  You can self change of range that which range u want and remove the come
workbook.save /close. And create one new modul anf paste that code.

Thanks
P

Pramod
On 24 Sep 2014 14:38, prkhan56 prkha...@gmail.com wrote:

 Hi Pramod
 Thanks for your response.
 If you check my Input data sheet on File 1 of my original post.  I want it
 to paste transposed data  it in B9, C9, D9 and E9 downwards.
 Second, please assign a shortcut or Button to the macro as clicking on the
 Cell is bit risky...it paste the data again and again if we click on the
 colored cell.
 Also File 2 will be open.  Your code saves and close the file
  File 1 and File 2 both will be opened by me when I am running Macro 1 and
 Macro 2



 On Wednesday, September 24, 2014 8:01:22 AM UTC+4, pramodb35 wrote:

 Hi prkhan56 ,

 Please find the your second macro.Kindly see the path as i mention
 your attached file.[File2.xlsb] your will be second file.


 Thanks
 P



 On Tue, Sep 23, 2014 at 9:23 PM, prkhan56 prkh...@gmail.com wrote:
 
 
  Hello All,
  Can someone help me with the Second Macro?
  Thanks
  On Monday, September 22, 2014 7:34:17 PM UTC+4, prkhan56 wrote:
 
  Hi Pramod,
  Thanks for your prompt reply.
  Works great!
 
  The second macro should run when the Cell Pointer is in Column T on a
  Highlighted Cell (in red). Can red be given the RGB value mentioned on
 my
  sample data?
  I want to copy and transpose cells from the Row where the Max value is
  found in Col T.
  (Cells to be copied are colored and shown under various Steps)
 
  See the output required is in the Input Data Sheet. I have made a
 sample
  output on Input Data sheet for values on Row 25 on SM Data sheet
 
  I have shown the Input Data shown here for sake of explanation.  It
 would
  be in File 2 which would be on the shared folder Path S:\..\...\
 
  Hope it is clear now.
  Thanks once again for your time.
  Rashid
 
  On Monday, September 22, 2014 5:23:52 PM UTC+4, pramodb35 wrote:
 
  Hi Dear,
 
 
  Please find the Attached file ...
 
 
  Regards
  P
 
  On Mon, Sep 22, 2014 at 2:53 PM, prkhan56 prkh...@gmail.com wrote:
   Dear All,
  
   I am using Excel 2010 and have attached a file with my problem.
  
   I need Two Macros for my problem.
  
  
  
   There are two Files (both in a shared location - Path S:\...\...\)
  
   File 1 has sheet name SM
  
   File 2 has sheet name Input Data (shown here to explain the
 problem)
  
  
  
   Data in set of 24 rows i.e for 24 Hours x 10 days
  
   Data Set is starting from A25 to Z
  
  
  
   First Macro should run upto Row 264 and highlight the Max Value in
 Col
   T
  
   24 Rows data should be considered when highlighting the Max Value
  
   eg Row 25 - 48, 49 - 72 and so on till Row 264
  
  
  
  
  
   Second Macro should run only when the Cell pointer is on the
   highlighted
   Cell in Col T
  
  
  
   It should copy the values found in the highlighted Row and paste it
 in
   File
   2 as follows:
  
   Step 1 - Values from Cell C to I should be copied and transposed in
   File 2
   in Cell B9 down
  
   Step 2 - Values from Cell J to M should be copied and transposed in
   File 2
   in Cell C9 down
  
   Step 3 - Values from Cell N to S should be copied and transposed in
   File 2
   in Cell D9 down
  
   Step 4 - Values from Cell T to Z should be copied and transposed in
   File 2
   in Cell E9 down
  
  
  
   Colored only for sake of explanation
  
  
  
   Second Macro should run only once and then as and when required, as
   further
   work needs to be done after copy/transposing the data.
  
  
  
   TIA
  
   Rashid
  
   --
   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...@googlegroups.com.
   To post to this group, send email to excel-...@googlegroups.com.
   Visit this group at http://groups.google.com/group/excel-macros.
   For more options, visit https://groups.google.com/d/optout.
 
 
 
  --
  PramodSingh
 
  --
  Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do 

$$Excel-Macros$$ Help needed for 2 Layered Bar Chart

2014-09-24 Thread Amit Desai (MERU)
Dear All,

I would like to have a layered chart for 3 cities...So for each city there 
should be 3 main bars. These each Bar has to have 2 sub bars in side it...

So for Mumbai - we will have first Bar will be for 5, 2nd sub bar should be 
within the first bar  of 5500  3rd sub bar should be within 2nd bar with the 
value of 1200.
Similarly for Delhi - we will have first Bar will be for 6, 2nd sub bar 
should be within the first bar  of 6000  3rd sub bar should be within 2nd bar 
with the value of 1550.



MUM

DEL

HYD

A

5

6

7

B

5500

6000

7100

C

1200

1550

1400


Please guide me how to draw a chart.

Regards,
Amit Desai

Disclaimer: This message and its attachments contain confidential information 
and may also contain legally privileged information. This message is intended 
solely for the named addressee. If you are not the addressee indicated in this 
message (or authorized to receive for addressee), you may not copy or deliver 
any part of this message or its attachments to anyone or use any part of this 
message or its attachments. Rather, you should permanently delete this message 
and its attachments (and all copies) from your system and kindly notify the 
sender by reply e-mail. Any content of this message and its attachments that 
does not relate to the official business of Meru Cab Company Pvt. Ltd. must be 
taken not to have been sent or endorsed by any of them. Email communications 
are not private and no warranty is made that e-mail communications are timely, 
secure or free from computer virus or other defect.

-- 
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 http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


$$Excel-Macros$$ VBA question

2014-09-24 Thread Mandeep Baluja


i have a question that i have a list of entries with duplicates what i want 
is how to get the distnict values(values which occur only one time) . 
Please read my question carefully, I am not asking for removing duplicates 
what I want is how to get the list of data which occured 1 time only in the 
list. 
For Example 
List Result 
A A
B C 
B D
C
D
Please check this code as it is giving me right result but how can i store 
the values in next column this code is overwriting the values because of 
that loop . :( 
Sub test() Dim cell As Range
 Dim lastrow As Long lastrow = Range(b65536).End(xlUp).Row 
Dim workrng As Range 
Set workrng = Application.Selection 
Set workrng = Application.InputBox(Range, xTitleId, workrng.Address, 
Type:=8)
 For i = 1 To 10 If Application.WorksheetFunction.CountIf(workrng, Cells(i, 
1)) = 1 Then 
MsgBox lastrow Cells(lastrow, 2).Value = Cells(i, 1) 
End If lastrow = lastrow + 1
 Next End Subless 
https://www.linkedin.com/groups?viewMemberFeed=gid=3667803memberID=312532939trk=groups%2Finclude%2Fitem_snippet-0-b-pp#
https://www.linkedin.com/groupItem#

   

-- 
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 http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


Re: $$Excel-Macros$$ VBA question

2014-09-24 Thread Victor Momoh
You need to bring the lastrow=lastrow+1 into the IF statement, this seems
to work

Sub test()
Dim cell As Range
Dim lastrow As Long, xTitleID, I As Long
lastrow = Range(b65536).End(xlUp).Row
Dim workrng As Range
Set workrng = Application.Selection
Set workrng = Application.InputBox(Range, xTitleID, workrng.Address,
Type:=8)
For I = 1 To 10
If Application.WorksheetFunction.CountIf(workrng, Cells(I, 1))
= 1 Then
'MsgBox lastrow
Cells(lastrow, 2).Value = Cells(I, 1)
lastrow = lastrow + 1
End If

Next
 End Sub


On Wed, Sep 24, 2014 at 12:36 PM, Mandeep Baluja rockerna...@gmail.com
wrote:

 i have a question that i have a list of entries with duplicates what i
 want is how to get the distnict values(values which occur only one time) .
 Please read my question carefully, I am not asking for removing duplicates
 what I want is how to get the list of data which occured 1 time only in the
 list.
 For Example
 List Result
 A A
 B C
 B D
 C
 D
 Please check this code as it is giving me right result but how can i store
 the values in next column this code is overwriting the values because of
 that loop . :(
 Sub test() Dim cell As Range
  Dim lastrow As Long lastrow = Range(b65536).End(xlUp).Row
 Dim workrng As Range
 Set workrng = Application.Selection
 Set workrng = Application.InputBox(Range, xTitleId, workrng.Address,
 Type:=8)
  For i = 1 To 10 If Application.WorksheetFunction.CountIf(workrng,
 Cells(i, 1)) = 1 Then
 MsgBox lastrow Cells(lastrow, 2).Value = Cells(i, 1)
 End If lastrow = lastrow + 1
  Next End Subless
 https://www.linkedin.com/groups?viewMemberFeed=gid=3667803memberID=312532939trk=groups%2Finclude%2Fitem_snippet-0-b-pp#
 https://www.linkedin.com/groupItem#


  --
 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 http://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 http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


Re: $$Excel-Macros$$ Help needed for 2 Layered Bar Chart

2014-09-24 Thread Ashish Kumar
Hi Amit,

PFA..!!!



Regards
Ashish Kumar

On 24 September 2014 16:22, Amit Desai (MERU) amit.de...@merucabs.com
wrote:

  Dear All,



 I would like to have a layered chart for 3 cities...So for each city there
 should be 3 main bars. These each Bar has to have 2 sub bars in side it...



 So for Mumbai - we will have first Bar will be for 5, 2nd sub bar
 should be within the first bar  of 5500  3rd sub bar should be within 2
 nd bar with the value of 1200.

 Similarly for Delhi - we will have first Bar will be for 6, 2nd sub
 bar should be within the first bar  of 6000  3rd sub bar should be
 within 2nd bar with the value of 1550.





 MUM

 DEL

 HYD

 A

 5

 6

 7

 B

 5500

 6000

 7100

 C

 1200

 1550

 1400



 Please guide me how to draw a chart.



 Regards,

 *Amit Desai*


  Disclaimer: This message and its attachments contain confidential
 information and may also contain legally privileged information. This
 message is intended solely for the named addressee. If you are not the
 addressee indicated in this message (or authorized to receive for
 addressee), you may not copy or deliver any part of this message or its
 attachments to anyone or use any part of this message or its attachments.
 Rather, you should permanently delete this message and its attachments (and
 all copies) from your system and kindly notify the sender by reply e-mail.
 Any content of this message and its attachments that does not relate to the
 official business of Meru Cab Company Pvt. Ltd. must be taken not to have
 been sent or endorsed by any of them. Email communications are not private
 and no warranty is made that e-mail communications are timely, secure or
 free from computer virus or other defect.

 --
 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 http://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 http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


fOR amit.xlsx
Description: MS-Excel 2007 spreadsheet


Re: $$Excel-Macros$$ for updating the worksheet through the user form

2014-09-24 Thread Vaibhav Joshi
Its really cool!!

+
*I did not do this for you. God is here working through me for you.*

On Wed, Sep 24, 2014 at 1:20 PM, Ganesh N ganeshg...@gmail.com wrote:

 Dear Shankar,

 The modify will choose the particular row (enter the sn. no) and then wht
 ever change u want make (e.g out time) and then click the update button.

 Just try if you have doubt let me know.

 Regards,
 Ganesh N

 On Wed, Sep 24, 2014 at 1:07 PM, Shankar Bheema shankar.n...@gmail.com
 wrote:

 Dear Ganesh

 I have tried just now and what I found is, when I enter rest of column
 fields from the Form Entry and pressing the Modify, a message box asking
 for the sl no to modify and I have supplied but nothing is happening.
 Modify means, entered fields should reflect on the worksheet na.

 Please provide solution.

 On Wed, Sep 24, 2014 at 12:26 PM, Ganesh N ganeshg...@gmail.com wrote:

 Hi Shankar,

 PFA,

 I have just added one more button (Modify) use that before update button.

 Thanks  Regards,
 Ganesh N

 On Wed, Sep 24, 2014 at 11:00 AM, Shankar Bheema shankar.n...@gmail.com
  wrote:

 Good morning all,

 I am attaching an excel workbook which is meant for office file
 tracking.  On the worksheet I placed commandbutton namely Entry Form.
 Which enables entry of the data into the sheet.

 Entry fields will be initially filled upto TIMEIN column.

 From the Timeout, entry of columns will be made at the end of the
 office hours.  Hence, I placed an update command button.  I want to update
 the sl no.1 without disturbing the previous / initial entries.

 Kindly provide solution.

 what is this .xlsm.  I saved the file in .xls format but its showing as
 .xlsm.  However, its working on my machine.

 Thank you in advance

 regards
 shankar sb

 --
 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 http://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 http://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. 

Re: $$Excel-Macros$$ VBA question

2014-09-24 Thread ag sankar
update macro

Sub test1()
   Dim lastrow As Long, xTitleID, I As Long
Dim workrng As Range
Set workrng = Application.Selection
Set workrng = Application.InputBox(Range, xTitleID, workrng.Address,
Type:=8)
lastrow = Cells(65536, workrng.Column + 1).End(xlUp).Row + 1
For I = 1 To workrng.Count
If Application.WorksheetFunction.CountIf(workrng, workrng(I,
1)) = 1 Then
'MsgBox lastrow
Cells(lastrow, workrng.Column + 1).Value = workrng(I, 1)
lastrow = lastrow + 1
End If

Next
 End Sub


On Wed, Sep 24, 2014 at 5:22 PM, Victor Momoh vicmomen...@gmail.com wrote:

 You need to bring the lastrow=lastrow+1 into the IF statement, this seems
 to work

 Sub test()
 Dim cell As Range
 Dim lastrow As Long, xTitleID, I As Long
 lastrow = Range(b65536).End(xlUp).Row
 Dim workrng As Range
 Set workrng = Application.Selection
 Set workrng = Application.InputBox(Range, xTitleID, workrng.Address,
 Type:=8)
 For I = 1 To 10
 If Application.WorksheetFunction.CountIf(workrng, Cells(I, 1))
 = 1 Then
 'MsgBox lastrow
 Cells(lastrow, 2).Value = Cells(I, 1)
 lastrow = lastrow + 1
 End If

 Next
  End Sub


 On Wed, Sep 24, 2014 at 12:36 PM, Mandeep Baluja rockerna...@gmail.com
 wrote:

 i have a question that i have a list of entries with duplicates what i
 want is how to get the distnict values(values which occur only one time) .
 Please read my question carefully, I am not asking for removing duplicates
 what I want is how to get the list of data which occured 1 time only in the
 list.
 For Example
 List Result
 A A
 B C
 B D
 C
 D
 Please check this code as it is giving me right result but how can i
 store the values in next column this code is overwriting the values because
 of that loop . :(
 Sub test() Dim cell As Range
  Dim lastrow As Long lastrow = Range(b65536).End(xlUp).Row
 Dim workrng As Range
 Set workrng = Application.Selection
 Set workrng = Application.InputBox(Range, xTitleId, workrng.Address,
 Type:=8)
  For i = 1 To 10 If Application.WorksheetFunction.CountIf(workrng,
 Cells(i, 1)) = 1 Then
 MsgBox lastrow Cells(lastrow, 2).Value = Cells(i, 1)
 End If lastrow = lastrow + 1
  Next End Subless
 https://www.linkedin.com/groups?viewMemberFeed=gid=3667803memberID=312532939trk=groups%2Finclude%2Fitem_snippet-0-b-pp#
 https://www.linkedin.com/groupItem#


  --
 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 http://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 http://groups.google.com/group/excel-macros.
 For more options, visit https://groups.google.com/d/optout.


Re: $$Excel-Macros$$ Help in recording macro's

2014-09-24 Thread Vaibhav Joshi
hi

when you want to move data to compile sheet?

when you save  close data or any other trigger?

+
*I did not do this for you. God is here working through me for you.*

On Wed, Sep 24, 2014 at 2:26 PM, 'Ankit Chandna' via MS EXCEL AND VBA
MACROS excel-macros@googlegroups.com wrote:

 Hi,

 I want to record the macro's through which i can automate the data base
 that ways i want to enter details in main sheet and data should get
 accumulate in compile sheet once i save it.


 Please help me out in recording the macro's.

 --
 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 http://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 http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


Re: $$Excel-Macros$$ Macro to highlight Max Value in a Column and copy/transpose data in another file

2014-09-24 Thread prkhan56
This is what I did (with my limited knowledge)
It gives me Object Required error but not highlighting any particular row
Runtime Error 424

Would you correct me please?

Sub Transpose()
Dim wk As Workbook
Dim ws As Worksheet
Dim ex As Workbook
Dim es As Worksheet
Dim k As String
Set wk = ThisWorkbook
Set ws = wk.Worksheets(Sm)
Application.ScreenUpdating = False
tr = Target.Row
If Left(Target.Address, 2) = $T Then
 If Target.Interior.Color = vbRed Then

Set ex = Workbooks.Open(ws.Range(S1).Value)
Set es = ex.Worksheets(Input data)

  ws.Range(c  tr, I  tr).Copy
 es.Range(B9).PasteSpecial Paste:=xlPasteValues, Transpose:=True
 ws.Range(j  tr, m  tr).Copy
 es.Range(c9).PasteSpecial Paste:=xlPasteValues, Transpose:=True
 ws.Range(n  tr, s  tr).Copy
 es.Range(D9).PasteSpecial Paste:=xlPasteValues, Transpose:=True
 ws.Range(t  tr, z  tr).Copy
 es.Range(E9).PasteSpecial Paste:=xlPasteValues, Transpose:=True
 
 Application.CutCopyMode = False
 
 End If
End If

End Sub

On Wednesday, September 24, 2014 1:49:11 PM UTC+4, pramodb35 wrote:

 Hi Dear.

   You can self change of range that which range u want and remove the come 
 workbook.save /close. And create one new modul anf paste that code.

 Thanks
 P

 Pramod
 On 24 Sep 2014 14:38, prkhan56 prkh...@gmail.com javascript: wrote:

 Hi Pramod
 Thanks for your response.
 If you check my Input data sheet on File 1 of my original post.  I want 
 it to paste transposed data  it in B9, C9, D9 and E9 downwards.
 Second, please assign a shortcut or Button to the macro as clicking on 
 the Cell is bit risky...it paste the data again and again if we click on 
 the colored cell.
 Also File 2 will be open.  Your code saves and close the file
  File 1 and File 2 both will be opened by me when I am running Macro 1 
 and Macro 2
  


 On Wednesday, September 24, 2014 8:01:22 AM UTC+4, pramodb35 wrote:

 Hi prkhan56 , 

 Please find the your second macro.Kindly see the path as i mention 
 your attached file.[File2.xlsb] your will be second file. 


 Thanks 
 P 



 On Tue, Sep 23, 2014 at 9:23 PM, prkhan56 prkh...@gmail.com wrote: 
  
  
  Hello All, 
  Can someone help me with the Second Macro? 
  Thanks 
  On Monday, September 22, 2014 7:34:17 PM UTC+4, prkhan56 wrote: 
  
  Hi Pramod, 
  Thanks for your prompt reply. 
  Works great! 
  
  The second macro should run when the Cell Pointer is in Column T on a 
  Highlighted Cell (in red). Can red be given the RGB value mentioned 
 on my 
  sample data? 
  I want to copy and transpose cells from the Row where the Max value 
 is 
  found in Col T. 
  (Cells to be copied are colored and shown under various Steps) 
  
  See the output required is in the Input Data Sheet. I have made a 
 sample 
  output on Input Data sheet for values on Row 25 on SM Data sheet 
  
  I have shown the Input Data shown here for sake of explanation.  It 
 would 
  be in File 2 which would be on the shared folder Path S:\..\...\ 
  
  Hope it is clear now. 
  Thanks once again for your time. 
  Rashid 
  
  On Monday, September 22, 2014 5:23:52 PM UTC+4, pramodb35 wrote: 
  
  Hi Dear, 
  
  
  Please find the Attached file ... 
  
  
  Regards 
  P 
  
  On Mon, Sep 22, 2014 at 2:53 PM, prkhan56 prkh...@gmail.com 
 wrote: 
   Dear All, 
   
   I am using Excel 2010 and have attached a file with my problem. 
   
   I need Two Macros for my problem. 
   
   
   
   There are two Files (both in a shared location - Path S:\...\...\) 
   
   File 1 has sheet name SM 
   
   File 2 has sheet name Input Data (shown here to explain the 
 problem) 
   
   
   
   Data in set of 24 rows i.e for 24 Hours x 10 days 
   
   Data Set is starting from A25 to Z 
   
   
   
   First Macro should run upto Row 264 and highlight the Max Value in 
 Col 
   T 
   
   24 Rows data should be considered when highlighting the Max Value 
   
   eg Row 25 - 48, 49 - 72 and so on till Row 264 
   
   
   
   
   
   Second Macro should run only when the Cell pointer is on the 
   highlighted 
   Cell in Col T 
   
   
   
   It should copy the values found in the highlighted Row and paste 
 it in 
   File 
   2 as follows: 
   
   Step 1 - Values from Cell C to I should be copied and transposed 
 in 
   File 2 
   in Cell B9 down 
   
   Step 2 - Values from Cell J to M should be copied and transposed 
 in 
   File 2 
   in Cell C9 down 
   
   Step 3 - Values from Cell N to S should be copied and transposed 
 in 
   File 2 
   in Cell D9 down 
   
   Step 4 - Values from Cell T to Z should be copied and transposed 
 in 
   File 2 
   in Cell E9 down 
   
   
   
   Colored only for sake of explanation 
   
   
   
   Second Macro should run only once and then as and when required, 
 as 
   further 
   work needs to be done after copy/transposing the data. 
   
   
   
   TIA 
   
   Rashid 
   
   -- 
   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 

Re: $$Excel-Macros$$ Help needed for 2 Layered Bar Chart

2014-09-24 Thread Ashish Kumar
Hi,

Check this..!!


Regards
Ashish

-- 
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 http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


fOR amit.xlsx
Description: MS-Excel 2007 spreadsheet


Re: $$Excel-Macros$$ Help needed for 2 Layered Bar Chart

2014-09-24 Thread Ashish Kumar
Hi,

Check this one!

Regards
Ashish

-- 
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 http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


fOR amit.xlsx
Description: MS-Excel 2007 spreadsheet


FW: $$Excel-Macros$$ Help needed for 2 Layered Bar Chart

2014-09-24 Thread Amit Desai (MERU)
Dear Ashish,

Thanks a lot for your help...this one is very closed to what we needed...

Need to make some alteration;

1)  We will need if Say bar for A is of 10 mm large, bar for B should be 
say 6 mm ( inside the A bar)  bar for C should be say 3-4 mm ( inside the B 
bar).

2)  What I move the data for A on secondary axix..currently it moves all 
the data on second axix or nothing..

Please explain me how did you prepared the layered bar...

I also took help from the below link.. but not able to put more than 1 column 
data in chart...
http://www.exceldashboardtemplates.com/how-to-make-a-better-excel-sales-pipeline-or-sales-funnel-chart/

Regards,
Amit Desai

From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com] On 
Behalf Of Ashish Kumar
Sent: Wednesday, September 24, 2014 7:08 PM
To: excel-macros@googlegroups.com
Subject: Re: $$Excel-Macros$$ Help needed for 2 Layered Bar Chart

Hi,

Check this..!!


Regards
Ashish
--
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.commailto:excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to 
excel-macros@googlegroups.commailto:excel-macros@googlegroups.com.
Visit this group at http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.
Disclaimer: This message and its attachments contain confidential information 
and may also contain legally privileged information. This message is intended 
solely for the named addressee. If you are not the addressee indicated in this 
message (or authorized to receive for addressee), you may not copy or deliver 
any part of this message or its attachments to anyone or use any part of this 
message or its attachments. Rather, you should permanently delete this message 
and its attachments (and all copies) from your system and kindly notify the 
sender by reply e-mail. Any content of this message and its attachments that 
does not relate to the official business of Meru Cab Company Pvt. Ltd. must be 
taken not to have been sent or endorsed by any of them. Email communications 
are not private and no warranty is made that e-mail communications are timely, 
secure or free from computer virus or other defect.

-- 
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 http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


fOR amit.xlsx
Description: MS-Excel 2007 spreadsheet


Re: FW: $$Excel-Macros$$ Help needed for 2 Layered Bar Chart

2014-09-24 Thread Ashish Kumar
Hi,

Check this!!

Final shot from my side.

Regards
Ashish

-- 
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 http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


fOR amit.xlsx
Description: MS-Excel 2007 spreadsheet


RE: FW: $$Excel-Macros$$ Help needed for 2 Layered Bar Chart

2014-09-24 Thread Amit Desai (MERU)
Dear Ashish,

Thanks a lot for your help...however request you to please explain me how you 
did this?

Regards,
Amit Desai
From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com] On 
Behalf Of Ashish Kumar
Sent: Wednesday, September 24, 2014 8:11 PM
To: excel-macros@googlegroups.com
Subject: Re: FW: $$Excel-Macros$$ Help needed for 2 Layered Bar Chart

Hi,

Check this!!

Final shot from my side.

Regards
Ashish
--
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.commailto:excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to 
excel-macros@googlegroups.commailto:excel-macros@googlegroups.com.
Visit this group at http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.
Disclaimer: This message and its attachments contain confidential information 
and may also contain legally privileged information. This message is intended 
solely for the named addressee. If you are not the addressee indicated in this 
message (or authorized to receive for addressee), you may not copy or deliver 
any part of this message or its attachments to anyone or use any part of this 
message or its attachments. Rather, you should permanently delete this message 
and its attachments (and all copies) from your system and kindly notify the 
sender by reply e-mail. Any content of this message and its attachments that 
does not relate to the official business of Meru Cab Company Pvt. Ltd. must be 
taken not to have been sent or endorsed by any of them. Email communications 
are not private and no warranty is made that e-mail communications are timely, 
secure or free from computer virus or other defect.

-- 
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 http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


Re: FW: $$Excel-Macros$$ Help needed for 2 Layered Bar Chart

2014-09-24 Thread Ashish Kumar
call me

On 24 September 2014 21:35, Amit Desai (MERU) amit.de...@merucabs.com
wrote:

  Dear Ashish,



 Thanks a lot for your help...however request you to please explain me how
 you did this?



 Regards,

 *Amit Desai*

 *From:* excel-macros@googlegroups.com [mailto:
 excel-macros@googlegroups.com] *On Behalf Of *Ashish Kumar
 *Sent:* Wednesday, September 24, 2014 8:11 PM
 *To:* excel-macros@googlegroups.com
 *Subject:* Re: FW: $$Excel-Macros$$ Help needed for 2 Layered Bar Chart



 Hi,



 Check this!!



 Final shot from my side.



 Regards

 Ashish

 --
 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 http://groups.google.com/group/excel-macros.
 For more options, visit https://groups.google.com/d/optout.

  Disclaimer: This message and its attachments contain confidential
 information and may also contain legally privileged information. This
 message is intended solely for the named addressee. If you are not the
 addressee indicated in this message (or authorized to receive for
 addressee), you may not copy or deliver any part of this message or its
 attachments to anyone or use any part of this message or its attachments.
 Rather, you should permanently delete this message and its attachments (and
 all copies) from your system and kindly notify the sender by reply e-mail.
 Any content of this message and its attachments that does not relate to the
 official business of Meru Cab Company Pvt. Ltd. must be taken not to have
 been sent or endorsed by any of them. Email communications are not private
 and no warranty is made that e-mail communications are timely, secure or
 free from computer virus or other defect.

 --
 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 http://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$$ VBA Numbers only in Textbox

2014-09-24 Thread Mr_Bill
Can this code be adapted to work with only certain textboxs? I have 15 
boxes in a form that require a number to be input and all are named wtBox1 
- wtBox15

Dim LastPosition As Long
  
 Private Sub TextBox1_Change()
   Static LastText As String
   Static SecondTime As Boolean
   If Not SecondTime Then
 With TextBox1
  ' Digits Only (no plus or minus)
  *'If .Text Like *[!0-9]* Then*
  ' Digits Only (plus or minus allowed)
  *'If .Text Like *[!0-9+-]* Or .Text Like ?*[+-]* Then*
  ' Floating Point Numbers (no plus or minus)
  *'If .Text Like *[!0-9.]* Or .Text Like *.*.* Then*
  ' Floating Point Numbers (plus or minus allowed)
  *If .Text Like *[!0-9.+-]* Or .Text Like ?*[+-]* Or .Text Like 
 *.*.* Then*
 Beep
 SecondTime = True
 .Text = LastText
 .SelStart = LastPosition
   Else
 LastText = .Text
   End If
 End With
   End If
   SecondTime = False
 End Sub
  
 Private Sub TextBox1_MouseDown(ByVal Button As Integer, ByVal Shift As 
 Integer, _
ByVal X As Single, ByVal Y As Single)
   With TextBox1
 LastPosition = .SelStart
 'Place any other MouseDown event code here
   End With
 End Sub
  
 Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
   With TextBox1
 LastPosition = .SelStart
 'Place any other KeyPress checking code here
   End With
 End Sub



Thank you 

-- 
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 http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


$$Excel-Macros$$ Urgent SQL code required

2014-09-24 Thread manish mishra
Hi all,
Required is SQL codes for the below data and results

Cust_IDProd_RangeA1P1A1P2A1P3A2P4A2P5Required result is A1P1/P2/P3A2P4/P5

Please help its bit urgent

-- 
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 http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


$$Excel-Macros$$ Fwd: FILTER REQUIREMENTS -- Colour of Filter should catch our eyes. -- It may help more persons.

2014-09-24 Thread big smile
Respected Excel Guru / Friends

I think many of our friend is facing this problem When ever we use filter
column then the colour of small box sign changes

But we have to see properly that where ever filter is there ..

I have 10 entries in excel files from Raw 3 to Raw 12 ---  Column From B to
T ..

Is it possible that when ever we used filter then that full column colour
change of our choice colour.

so that we can catch it properly.

and if we go more advanced then in 1 st column we get list --- in which col
we hv used filter

I will me more thankful if you share the formula as  i want this system in
many excel files .

Thanks to all  have a nice day. happy Navrati to all persons.

From
Chandresh Savla .

-- 
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 http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


WORK SHEET 2.xlsx
Description: MS-Excel 2007 spreadsheet


Re: $$Excel-Macros$$ Fwd: FILTER REQUIREMENTS -- Colour of Filter should catch our eyes. -- It may help more persons.

2014-09-24 Thread Ashish Kumar
Hi,

Use custom sort function for this.


Regards
Ashish

-- 
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 http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


Re: $$Excel-Macros$$ Fwd: FILTER REQUIREMENTS -- Colour of Filter should catch our eyes. -- It may help more persons.

2014-09-24 Thread Ashish Kumar
Hi,

PFA!!


Sort and filter your data from (Row). {3.00}, {4.00}, {5.00} .!!


Regards
Ashish

-- 
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 http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


WORK SHEET 2.xlsx
Description: MS-Excel 2007 spreadsheet


Re: $$Excel-Macros$$ Fwd: FILTER REQUIREMENTS -- Colour of Filter should catch our eyes. -- It may help more persons.

2014-09-24 Thread big smile
Respected Sir ,

I think i have not properly explain you.

I want when we used filter then full column colour change  not raw colour.

So if i used filter in two or more colu at a time then i get it fast where
i have used filter..

On Thu, Sep 25, 2014 at 9:42 AM, Ashish Kumar kumar.ashish...@gmail.com
wrote:

 Hi,

 PFA!!


 Sort and filter your data from (Row). {3.00}, {4.00}, {5.00} .!!


 Regards
 Ashish

 --
 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 http://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 http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


Re: $$Excel-Macros$$ VBA Numbers only in Textbox

2014-09-24 Thread Vaibhav Joshi
hi

You need to change TextBox1 to text box you desired.

Cheers!!

+
*I did not do this for you. God is here working through me for you.*

On Wed, Sep 24, 2014 at 11:18 PM, Mr_Bill egge...@gmail.com wrote:

 Can this code be adapted to work with only certain textboxs? I have 15
 boxes in a form that require a number to be input and all are named wtBox1
 - wtBox15

 Dim LastPosition As Long

 Private Sub TextBox1_Change()
   Static LastText As String
   Static SecondTime As Boolean
   If Not SecondTime Then
 With TextBox1
  ' Digits Only (no plus or minus)
  *'If .Text Like *[!0-9]* Then*
  ' Digits Only (plus or minus allowed)
  *'If .Text Like *[!0-9+-]* Or .Text Like ?*[+-]* Then*
  ' Floating Point Numbers (no plus or minus)
  *'If .Text Like *[!0-9.]* Or .Text Like *.*.* Then*
  ' Floating Point Numbers (plus or minus allowed)
  *If .Text Like *[!0-9.+-]* Or .Text Like ?*[+-]* Or .Text Like 
 *.*.* Then*
 Beep
 SecondTime = True
 .Text = LastText
 .SelStart = LastPosition
   Else
 LastText = .Text
   End If
 End With
   End If
   SecondTime = False
 End Sub

 Private Sub TextBox1_MouseDown(ByVal Button As Integer, ByVal Shift As 
 Integer, _
ByVal X As Single, ByVal Y As Single)
   With TextBox1
 LastPosition = .SelStart
 'Place any other MouseDown event code here
   End With
 End Sub

 Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
   With TextBox1
 LastPosition = .SelStart
 'Place any other KeyPress checking code here
   End With
 End Sub



 Thank you

 --
 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 http://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 http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


Re: $$Excel-Macros$$ VBA Numbers only in Textbox

2014-09-24 Thread Mr_Bill

It requires a bit more than that. I change TextBox1 to wtBox1 now what 
about wtBox2,wtBox3,wtBox4,wtBox5 as I said there are 15 not just one. 
Suppose too much work for a freebie thank you anyways.
On Wednesday, September 24, 2014 10:31:21 PM UTC-7, Vabz wrote:

 hi

 You need to change TextBox1 to text box you desired.

 Cheers!!

 +
 *I did not do this for you. God is here working through me for you.*

 On Wed, Sep 24, 2014 at 11:18 PM, Mr_Bill egg...@gmail.com javascript: 
 wrote:

 Can this code be adapted to work with only certain textboxs? I have 15 
 boxes in a form that require a number to be input and all are named wtBox1 
 - wtBox15

 Dim LastPosition As Long
  
 Private Sub TextBox1_Change()
   Static LastText As String
   Static SecondTime As Boolean
   If Not SecondTime Then
 With TextBox1
  ' Digits Only (no plus or minus)
  *'If .Text Like *[!0-9]* Then*
  ' Digits Only (plus or minus allowed)
  *'If .Text Like *[!0-9+-]* Or .Text Like ?*[+-]* Then*
  ' Floating Point Numbers (no plus or minus)
  *'If .Text Like *[!0-9.]* Or .Text Like *.*.* Then*
  ' Floating Point Numbers (plus or minus allowed)
  *If .Text Like *[!0-9.+-]* Or .Text Like ?*[+-]* Or .Text Like 
 *.*.* Then*
 Beep
 SecondTime = True
 .Text = LastText
 .SelStart = LastPosition
   Else
 LastText = .Text
   End If
 End With
   End If
   SecondTime = False
 End Sub
  
 Private Sub TextBox1_MouseDown(ByVal Button As Integer, ByVal Shift As 
 Integer, _
ByVal X As Single, ByVal Y As Single)
   With TextBox1
 LastPosition = .SelStart
 'Place any other MouseDown event code here
   End With
 End Sub
  
 Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
   With TextBox1
 LastPosition = .SelStart
 'Place any other KeyPress checking code here
   End With
 End Sub



 Thank you 

 -- 
 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...@googlegroups.com javascript:.
 To post to this group, send email to excel-...@googlegroups.com 
 javascript:.
 Visit this group at http://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 http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.