View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.programming
Pierre via OfficeKB.com[_2_] Pierre via OfficeKB.com[_2_] is offline
external usenet poster
 
Posts: 122
Default find value and delete cell and the cell next to it

Thanks Topper, this works fine !
Pierre

Toppers wrote:
Try

zoekrange.Resize(1, 2).Delete shift:=xlShiftUp

Hi experts,

[quoted text clipped - 19 lines]
thanks,
Pierre


--
Message posted via http://www.officekb.com