Your code works fine for me. What problem are you having? What
exact error message do you receive on what line of code?


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"scott" wrote in message
...
I'm just trying to pass "B" to the Function and allow the
function to concatenate the "B" with a "1" to set the begin
cell. Can you help me rewrite it or point out why it won't
work?

The function works fine hard coded with Set rng =
Range("B1:B10")



"Jim Thomlinson"
wrote in message
...
Your function does not indicate that it has a return value. Is
that an
oversight or is it not really a function? As it stands it is a
sub...

"scott" wrote:

If I want to pass the variable iRefStart to the DeleteCells()
Function, what
syntax is needed? Below, I'm just trying to say"Start at Cell
B1"

Sub CleanSpreed()
iRefStart = "B"
Call DeleteCells(iRefStart)

Function DeleteCells(ByVal iRefStart As String)

Dim rng As Range

Set rng = Range(iRefStart & "1:B10")