--------------------------------------------
On Mon, 1/23/17, Paul Schreiner <schreiner_p...@att.net> wrote:
Subject: Re: $$Excel-Macros$$ MACRO FOR COPYING A RANGE FOR MULTIPLE TIMES
To: "excel-macros@googlegroups.com" <excel-macros@googlegroups.com>
Date: Monday, January 23, 2017, 2:42 PM
Are
you wanting the end result such that cell A19 contains
"Bill" (the value of A2)A20 =
JoeA21 =
DaveA22 =
Fredand
so on, then repeating this series for 15 sets?
For
THAT, you could use something like:Option ExplicitSub
Dup_Sets()
Dim nRow, nRows, dRow, SetCnt, SetNo
SetCnt = 15
nRows =
Application.WorksheetFunction.CountA(Range("A:A"))
For SetNo = 1 To SetCnt - 1
For nRow = 2 To nRows
Debug.Print nRow + (SetNo * (nRows - 1))
Cells(nRow + (SetNo * (nRows - 1)), "A").Value =
Cells(nRow, "A").Value
Next nRow
Next SetNo
End
Sub
If that's not what you
meant, then I need further explanation.
Paul-----------------------------------------
“Do
all the good you can,
By all the means you
can,
In all the ways you can,
In all the places you can,
At
all the times you can,
To all the people you
can,
As long as ever you can.” - John
Wesley
-----------------------------------------
On Friday, January 20, 2017 11:15 PM,
Izhar <izharra...@gmail.com> wrote:
I need code for the above nameSCENARIOif I want to copy the above
names below the range for about 15
times
--
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you
wanna be? It’s =TIME(2,DO:IT,N:OW) ! Join official
Facebook page of this forum @ https://www.facebook.com/discussexcel
FORUM RULES
1) Use concise, accurate thread titles. Poor thread titles,
like Please Help, Urgent, Need Help, Formula Problem, Code
Problem, and Need Advice will not get quick attention or may
not be answered.
2) Don't post a question in the thread of another
member.
3) Don't post questions regarding breaking or bypassing
any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not
allowed.
NOTE : Don't ever post confidential data in a workbook.
Forum owners and members are not responsible for any
loss.
---
You received this message because you are subscribed to the
Google Groups "MS EXCEL AND VBA MACROS" group.
To unsubscribe from this group and stop receiving emails
from it, send an email to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at https://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.
--
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you
wanna be? It’s =TIME(2,DO:IT,N:OW) ! Join official
Facebook page of this forum @ https://www.facebook.com/discussexcel
FORUM RULES
1) Use concise, accurate thread titles. Poor thread titles,
like Please Help, Urgent, Need Help, Formula Problem, Code
Problem, and Need Advice will not get quick attention or may
not be answered.
2) Don't post a question in the thread of another
member.
3) Don't post questions regarding breaking or bypassing
any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not
allowed.
NOTE : Don't ever post confidential data in a workbook.
Forum owners and members are not responsible for any
loss.
---
You received this message because you are subscribed to the
Google Groups "MS EXCEL AND VBA MACROS" group.
To unsubscribe from this group and stop receiving emails
from it, send an email to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at https://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.
lteta Regala ceea ce a semnificat intarirea prestigiului sau dar si in
special afirmarea unui nou statut international pentru Romania. Ulterior
guvernele europene au recunoscut noul titlu oficial. Consolidarea pozitiei
internationale a tarii noastre dupa cucerirea independentei de stat a permis
proclamarea Romaniei ca regat. Aceasta s-a realizat la 14 martie 1881 dupa
votul din parlament. in urma unor festivitati la 10 22 mai 1881 Carol'si sotia
sa Ehsabeta de Wfeo poeta Carmen Sylva au fost incoronati.
--
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @
https://www.facebook.com/discussexcel
FORUM RULES
1) Use concise, accurate thread titles. Poor thread titles, like Please Help,
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get
quick attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.
NOTE : Don't ever post confidential data in a workbook. Forum owners and
members are not responsible for any loss.
---
You received this message because you are subscribed to the Google Groups "MS
EXCEL AND VBA MACROS" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at https://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.
