ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   MACRO BASED ON A NUMBER OF CHARACTERS (https://www.excelbanter.com/excel-programming/442321-macro-based-number-characters.html)

JOSEPH WEBER

MACRO BASED ON A NUMBER OF CHARACTERS
 
I have the following code in a macro and it works fine. The format of my
original report changed, so i need the macro to do pick up data where
certain criteria are met.


If Range("Salesp") < "" Then Call XXXXXX

I want this line to keep looping if the amount of characters is above a
certain number. in other words, this will keep going until it hits a cell
with 10 characters or more and then it will call the other macro.

Per Jessen

MACRO BASED ON A NUMBER OF CHARACTERS
 
If Len(Range("Salesp")) 10 Then Call XXXXXX

Regards,
Per

"JOSEPH WEBER" skrev i meddelelsen
...
I have the following code in a macro and it works fine. The format of my
original report changed, so i need the macro to do pick up data where
certain criteria are met.


If Range("Salesp") < "" Then Call XXXXXX

I want this line to keep looping if the amount of characters is above a
certain number. in other words, this will keep going until it hits a cell
with 10 characters or more and then it will call the other macro.



Javed

MACRO BASED ON A NUMBER OF CHARACTERS
 
On May 5, 10:36*pm, "Per Jessen" wrote:
If Len(Range("Salesp")) 10 Then Call XXXXXX

Regards,
Per

"JOSEPH WEBER" skrev i ...



I have the following code in a macro and it works fine. The format of my
original *report changed, so i need the macro to do pick up data where
certain criteria are met.


If Range("Salesp") < "" Then Call XXXXXX


I want this line to keep looping if the amount of characters is above a
certain number. in other words, this will keep going until it hits a cell
with 10 characters or more and then it will call the other macro.- Hide quoted text -


- Show quoted text -


If the number 10 changes due to format change then you need recoding.
Better use Constant

Const ct as Integer=10

If Len(Range("Salesp")) ct Then Call XXXXXX


All times are GMT +1. The time now is 12:28 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com