$$Excel-Macros$$ Re: help me please ;)

2009-02-20 Thread Mehdi_21
thanks, i appreciate ur help ;) --~--~-~--~~~---~--~~ Visit the blog to download Excel tutorials at http://www.excel-macros.blogspot.com To post to this group, send email to excel-macros@googlegroups.com For more options, visit this group at http://groups.google

$$Excel-Macros$$ Re: help me please ;)

2009-02-05 Thread Mehdi_21
thanks ;) but i still have another problem in copying and pasting a group of cells in a particular row, the row must start with a cell containing the string "extra" , the code should cut a group of cell and paste it into another group of cell. here's the code : Dim extra As Range word =

$$Excel-Macros$$ Re: help me please ;)

2009-02-04 Thread yorkeyite
Unless it runs faster I would keep it simple Y On Feb 4, 5:58 am, Mehdi_21 wrote: > thanks a lot ;) > > i tried another code also, here's it : > >  Dim rng As Range >     what = "FF*" >     Do >         Set rng = ActiveSheet.UsedRange.Find(what) >         If rng Is Nothing Then >             Exit

$$Excel-Macros$$ Re: help me please ;)

2009-02-03 Thread Mehdi_21
thanks a lot ;) i tried another code also, here's it : Dim rng As Range what = "FF*" Do Set rng = ActiveSheet.UsedRange.Find(what) If rng Is Nothing Then Exit Do Else Rows(rng.Row).Delete End If Loop On Feb 2, 10:26 pm, york

$$Excel-Macros$$ Re: help me please ;)

2009-02-02 Thread yorkeyite
Try Dim c As Range For Each c In Range("A1:H1000") If c Like "FF*" Then c.EntireRow.Delete End If Next c Yorkeyite On Feb 2, 5:55 am, Mehdi_21 wrote: > hey guys, how r u all? > > i started a macro that imports a text file to a worksheet, it all > worked but when it comes to the pa

$$Excel-Macros$$ Re: help me please ;)

2009-02-02 Thread Paul Schreiner
What is it doing / not doing? I suspect I know the answer. You've created a loop from A1-H1000, it looks like you want to delete any row that has a cell that begins with "FF". Let's take a look at this example: let's say you have the data:     A  B C 1    (AA11) (BB12) (CC13) 2    (A