close

I am trying to create a list (like summary) of all the comments from a
survey. The comment are all in the same cell (i.e. C70), but on approximatley
140 worksheets.
I would like them all to be listed wihtin my 'summary' worksheet... but
can't figure out how to 'compile' them. Help please.

try something like

for each ws in worksheets
dlr=sheets(quot;summaryquot;).cells(rows.count,quot;aquot;).end(xl up).row 1
sheets(quot;summaryquot;).cells(dlr,quot;aquot;).value=ws.range(quot;c 70quot;)
next ws

--
Don Guillett
SalesAid Software

quot;deidrequot; gt; wrote in message
...
gt;I am trying to create a list (like summary) of all the comments from a
gt; survey. The comment are all in the same cell (i.e. C70), but on
gt; approximatley
gt; 140 worksheets.
gt; I would like them all to be listed wihtin my 'summary' worksheet... but
gt; can't figure out how to 'compile' them. Help please.
Put this formula in A1 and copy down for your number of sheets........

=quot;=Sheetquot;amp;ROW(A1) 1amp;quot;!$C$70quot;

Then, run this little macro........

Sub TextToFormula()
Range(quot;A:Aquot;).Value = Range(quot;A:Aquot;).Value
End SubVaya con Dios,
Chuck, CABGx3
quot;deidrequot; wrote:

gt; I am trying to create a list (like summary) of all the comments from a
gt; survey. The comment are all in the same cell (i.e. C70), but on approximatley
gt; 140 worksheets.
gt; I would like them all to be listed wihtin my 'summary' worksheet... but
gt; can't figure out how to 'compile' them. Help please.

You'll have to forgive me... I'm a 'relative' novice... certainly have no
programming background. I don't understand your response.
I'd like all the comments (from cell C70) from 141 separate worksheets (all
with different names, not sequencially derived names... quot;S.A.12quot;:quot;MC.V.11quot;)
in one place.
I have a worksheet called quot;Summaryquot;, I wanted each response compiled in a
list starting in cell A80 (down to A??... there are are many worksheets
without any comments but there may be ~40 with comments).
Your help is appreciated.
deidre

quot;Don Guillettquot; wrote:

gt; try something like
gt;
gt; for each ws in worksheets
gt; dlr=sheets(quot;summaryquot;).cells(rows.count,quot;aquot;).end(xl up).row 1
gt; sheets(quot;summaryquot;).cells(dlr,quot;aquot;).value=ws.range(quot;c 70quot;)
gt; next ws
gt;
gt; --
gt; Don Guillett
gt; SalesAid Software
gt;
gt; quot;deidrequot; gt; wrote in message
gt; ...
gt; gt;I am trying to create a list (like summary) of all the comments from a
gt; gt; survey. The comment are all in the same cell (i.e. C70), but on
gt; gt; approximatley
gt; gt; 140 worksheets.
gt; gt; I would like them all to be listed wihtin my 'summary' worksheet... but
gt; gt; can't figure out how to 'compile' them. Help please.
gt;
gt;
gt;

Forgive me.

That is exactly what I sent. Here is a mod that will also
give you each sheet name and start at row 80

Sub copyonecelltosummary()
counter = 80
For Each ws In Worksheets
With Sheets(quot;summaryquot;)
.Cells(counter, quot;aquot;) = ws.Name
.Cells(counter, quot;bquot;).Value = ws.Range(quot;c7quot;)
End With
counter = counter 1
Next ws
End Sub--
Don Guillett
SalesAid Software

quot;deidrequot; gt; wrote in message
...
gt; You'll have to forgive me... I'm a 'relative' novice... certainly have no
gt; programming background. I don't understand your response.
gt; I'd like all the comments (from cell C70) from 141 separate worksheets
gt; (all
gt; with different names, not sequencially derived names...
gt; quot;S.A.12quot;:quot;MC.V.11quot;)
gt; in one place.
gt; I have a worksheet called quot;Summaryquot;, I wanted each response compiled in a
gt; list starting in cell A80 (down to A??... there are are many worksheets
gt; without any comments but there may be ~40 with comments).
gt; Your help is appreciated.
gt; deidre
gt;
gt; quot;Don Guillettquot; wrote:
gt;
gt;gt; try something like
gt;gt;
gt;gt; for each ws in worksheets
gt;gt; dlr=sheets(quot;summaryquot;).cells(rows.count,quot;aquot;).end(xl up).row 1
gt;gt; sheets(quot;summaryquot;).cells(dlr,quot;aquot;).value=ws.range(quot;c 70quot;)
gt;gt; next ws
gt;gt;
gt;gt; --
gt;gt; Don Guillett
gt;gt; SalesAid Software
gt;gt;
gt;gt; quot;deidrequot; gt; wrote in message
gt;gt; ...
gt;gt; gt;I am trying to create a list (like summary) of all the comments from a
gt;gt; gt; survey. The comment are all in the same cell (i.e. C70), but on
gt;gt; gt; approximatley
gt;gt; gt; 140 worksheets.
gt;gt; gt; I would like them all to be listed wihtin my 'summary' worksheet... but
gt;gt; gt; can't figure out how to 'compile' them. Help please.
gt;gt;
gt;gt;
gt;gt;

arrow
arrow
    全站熱搜
    創作者介紹
    創作者 software 的頭像
    software

    software

    software 發表在 痞客邦 留言(0) 人氣()