$$Excel-Macros$$ macro need

2013-08-09 Thread jmothilal
dear any one,

I need generate the no on installments based on paid amount m file attached

-- 

*J.Mothilal : **Universal Computer Systems : # 16, Brindavan Complex
:Otteri, Vellore-2*

-- 
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/groups/opt_out.


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


Re: $$Excel-Macros$$ macro need

2013-08-09 Thread De Premor

paste this on macro Sheets2

Private Sub Worksheet_Change(ByVal Target As Range)
Dim iRow As Integer, Dst As Range
If Target.Address = $B$3 Then
[A6].CurrentRegion.Clear
Range(A6:E6) = Split(sno,Amount,int,monthly pay,int + 
monthly pay, ,)

For iRow = 1 To [E3]
Set Dst = Range(A  iRow + 6)
Dst = iRow
Dst.Offset(, 1).Formula = IIf(iRow = 1, =D3, =B  iRow 
+ 5  -D  iRow + 5)
Dst.Offset(, 2).Formula = =ROUND((B  iRow + 6  
*F3%)/12,0)

Dst.Offset(, 3).Formula = =G3
Dst.Offset(, 4).Formula = =D  iRow + 6  +C  iRow + 6
Next
Range(C  [E3] + 7).Formula = =SUM(C7:C  [E3] + 6  )
Range(D  [E3] + 7).Formula = =SUM(D7:D  [E3] + 6  )
Range(E  [E3] + 7).Formula = =SUM(E7:E  [E3] + 6  )
Range(C  [E3] + 7  :E  [E3] + 7).Font.Bold = True
Range(A7:E  [E3] + 7).Style = Comma [0]
End If
End Sub


Pada 09/08/2013 20:44, jmothilal menulis:

dear any one,

I need generate the no on installments based on paid amount m file 
attached


--

*J.Mothilal : **Universal Computer Systems : # 16, Brindavan
Complex :Otteri, Vellore-2*

--
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/groups/opt_out.


--
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/groups/opt_out.


Copy of macro need.xlsm
Description: application/vnd.ms-excel.sheet.macroenabled.12


Re: $$Excel-Macros$$ macro need

2013-08-09 Thread jmothilal
Thanks its working . Mothilal.J


On Sat, Aug 10, 2013 at 9:07 AM, De Premor d...@premor.net wrote:

  paste this on macro Sheets2

 Private Sub Worksheet_Change(ByVal Target As Range)
 Dim iRow As Integer, Dst As Range
 If Target.Address = $B$3 Then
 [A6].CurrentRegion.Clear
 Range(A6:E6) = Split(sno,Amount,int,monthly pay,int + monthly
 pay, ,)
 For iRow = 1 To [E3]
 Set Dst = Range(A  iRow + 6)
 Dst = iRow
 Dst.Offset(, 1).Formula = IIf(iRow = 1, =D3, =B  iRow + 5
  -D  iRow + 5)
 Dst.Offset(, 2).Formula = =ROUND((B  iRow + 6 
 *F3%)/12,0)
 Dst.Offset(, 3).Formula = =G3
 Dst.Offset(, 4).Formula = =D  iRow + 6  +C  iRow + 6
 Next
 Range(C  [E3] + 7).Formula = =SUM(C7:C  [E3] + 6  )
 Range(D  [E3] + 7).Formula = =SUM(D7:D  [E3] + 6  )
 Range(E  [E3] + 7).Formula = =SUM(E7:E  [E3] + 6  )
 Range(C  [E3] + 7  :E  [E3] + 7).Font.Bold = True
 Range(A7:E  [E3] + 7).Style = Comma [0]
 End If
 End Sub


 Pada 09/08/2013 20:44, jmothilal menulis:

  dear any one,

  I need generate the no on installments based on paid amount m file
 attached

 --

 *J.Mothilal : **Universal Computer Systems : # 16, Brindavan Complex
 :Otteri, Vellore-2*

   --
 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/groups/opt_out.


  --
 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/groups/opt_out.




-- 

*J.Mothilal : **Universal Computer Systems : # 16, Brindavan Complex
:Otteri, Vellore-2*

-- 
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