Menu

Help with an Excel macro please?

Search this Thread

#1

Report Post

Posted to microsoft.public.excel.misc

Victor Delta[_2_] Victor Delta[_2_] is offline

Victor Delta[_2_] is offline

external usenet poster

Posts: 199

Default

Help with an Excel macro please?

In article ,
says...

Hi,

Am Mon, 28 Apr 2014 21:14:21 +0100 schrieb Victor Delta:

However, there is one final modification I would like to make if it's
possible. Rather than copying the sets of numbers straight down column
B, I would like to only copy them to those rows where the cells of
column E contain a 'Y'. So if C1 was 15, the 15 numbers might actually
be spread down a much greater number of rows.

try:

Sub Randomize()
Dim i As Long, n As Long
Dim c As Range

With Application
.ScreenUpdating = False
.Calculation = xlCalculationManual
End With

With ActiveSheet
i = 1
Set c = .Range("E:E").Find("Y", after:=.Range("E1"), _
LookIn:=xlValues, LookAt:=xlWhole)
Do
c.Offset(0, -3) = .Cells(i, 1)
i = i + 1
n = n + 1
If i = 7 Then
.Calculate
i = 1
End If
Set c = .Range("E:E").FindNext(c)
Loop While n < 15
End With

With Application
.ScreenUpdating = True
.Calculation = xlCalculationAutomatic
End With

End Sub

Regards
Claus B.

Claus

You are a star. Very many thanks,

V

Reply With Quote

Reply With Quote

Thread Tools	Search this Thread
Show Printable Version	Search this Thread: Advanced Search
Display Modes
Switch to Linear Mode Hybrid Mode Switch to Threaded Mode

Posting Rules
Smilies are On [IMG] code is On HTML code is Off Trackbacks are On Pingbacks are On Refbacks are On

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Macro Help Needed - Excel 2007 - Print Macro with Auto Sort	Gavin	Excel Worksheet Functions	0	May 17th 07 01:20 PM
My excel macro recorder no longer shows up when recording macro	jack	Excel Discussion (Misc queries)	1	February 5th 07 09:31 PM
Need syntax for RUNning a Word macro with an argument, called from an Excel macro	Steve[_84_]	Excel Programming	3	July 6th 06 07:42 PM
translate lotus 1-2-3 macro into excel macro using excel 2000	krutledge0209	Excel Programming	1	November 2nd 04 05:50 PM
Excel Macro Issue Trying to autorun Macro Upon Opening Worksheet	wyndman	Excel Programming	2	May 25th 04 06:59 PM

All times are GMT +1. The time now is 02:14 PM.

About Us

"It's about Microsoft Excel"

Contact Us ExcelBanter forum home Privacy Statement