I want to clear data, meaning that I delete anything below row 4, en
after say "D"

Right now it jumps to EE10000 as the last cell, eg highest cell.

This code does not work

ws.Rows("200:65536").EntireRow.Delete
ws.Columns("Z:IV").EntireColumn.Delete
ws.UsedRange ' invalid use of property?

Sonnich

Have a look at http://contextures.com/xlfaqApp.html#Unused

--

HTH

Bob

"jodleren" <(E-Mail Removed)> wrote in message
news:5db301a7-b3bb-4b69-b9fb-(E-Mail Removed)...
>I want to clear data, meaning that I delete anything below row 4, en
> after say "D"
>
> Right now it jumps to EE10000 as the last cell, eg highest cell.
>
> This code does not work
>
> ws.Rows("200:65536").EntireRow.Delete
> ws.Columns("Z:IV").EntireColumn.Delete
> ws.UsedRange ' invalid use of property?
>
> Sonnich

On Mar 17, 11:41*am, "Bob Phillips" <bob.phill...@somewhere.com>
wrote:
> Have a look athttp://contextures.com/xlfaqApp.html#Unused
>
> --
>
> HTH
>
> Bob
>
> "jodleren" <sonn...@hot.ee> wrote in message
>
> news:5db301a7-b3bb-4b69-b9fb-(E-Mail Removed)...
>
> >I want to clear data, meaning that I delete anything below row 4, en
> > after say "D"
>
> > Right now it jumps to EE10000 as the last cell, eg highest cell.
>
> > This code does not work
>
> > ws.Rows("200:65536").EntireRow.Delete
> > ws.Columns("Z:IV").EntireColumn.Delete
> > ws.UsedRange ' invalid use of property?
>
> > Sonnich

Yes..... does not change anything

Hi,

Dim ws As Worksheet

Set ws = Sheets("Sheet2")

'dispense with EntireRow and EntireColumn
'Have already said Row and Column which
'means Entire Row or Entire column.
ws.Rows("200:65536").Delete
ws.Columns("Z:IV").Delete

'Need to do something with UsedRange
'Your example is a bit like entering
'ws.Range ("A110")

'ws.UsedRange ' invalid use of property?

'**********************************

alternative method

Dim ws As Worksheet
Dim lastRow As Long

Set ws = Sheets("Sheet2")

'Find last row of used range
With ws.UsedRange
lastRow = .Rows(.Rows.Count).Row
End With

ws.Rows(200 & ":" & lastRow).Delete

ws.Columns("Z:IV").Delete


--
Regards,

OssieMac