Excel: Find & Offset
Solved/Closed
madambath
-
May 28, 2010 at 08:20 AM
rizvisa1 Posts 4479 Registration date Thursday January 28, 2010 Status Contributor Last seen May 5, 2022 - May 28, 2010 at 02:12 PM
rizvisa1 Posts 4479 Registration date Thursday January 28, 2010 Status Contributor Last seen May 5, 2022 - May 28, 2010 at 02:12 PM
Related:
- Excel: Find & Offset
- Excel date format dd.mm.yyyy - Guide
- Screenshot in excel - Guide
- Kernel for excel - Download - Backup and recovery
- Number to words in excel without vba - Guide
- Transfer data from one excel worksheet to another automatically - Guide
2 responses
rizvisa1
Posts
4479
Registration date
Thursday January 28, 2010
Status
Contributor
Last seen
May 5, 2022
766
May 28, 2010 at 10:34 AM
May 28, 2010 at 10:34 AM
See if this help
Sub SearchAndReplace() Dim myRange As Range Dim Cell As Range Set myRange = Range("E3:Q32") For Each Cell In myRange If ((Cell = ">0.01") Or (Cell = "> 0.01")) Then Cell.Offset(0, 3) = "" ElseIf ((Cell = ">10000") Or (Cell = "> 10000")) Then Cell.Offset(0, 4) = "" ElseIf ((IsNumeric(Cell)) And (Cell >= 10000)) Then Cell.Offset(0, 4) = "" End If Next Cell Set Cell = Nothing Set myRange = Nothing End Sub
SOLVED
Hi Riz,
Thank you very much. I appreciate the help & support that you always showing to the forum members.
With regards,
PramodKumar
Hi Riz,
Thank you very much. I appreciate the help & support that you always showing to the forum members.
With regards,
PramodKumar
rizvisa1
Posts
4479
Registration date
Thursday January 28, 2010
Status
Contributor
Last seen
May 5, 2022
766
May 28, 2010 at 02:12 PM
May 28, 2010 at 02:12 PM
You are welcome Pramod