Hi
I have a data in Sheet1 as below:
<tbody>
</tbody>
Now in each cell if the last character is not ~ or if the 2nd last character is * it will give error in column A on the other sheet as:
<tbody>
</tbody>
I have a data in Sheet1 as below:
Data1~ | Data2~ | Data3~ | Data4*~ | Data5* | Data6~ | Data7~ |
Data8~ | Data16~ | Data24~ | Data32~ | Data40 | Data48~ | Data56~ |
Data9~ | Data17~ | Data25~ | Data33~ | Data41~ | Data49~ | Data57~ |
Data10~ | Data18~ | Data26~ | Data34~ | Data42~ | Data50~ | Data58~ |
Data11*~ | Data19~ | Data27~ | Data35~ | Data43~ | Data51~ | Data59~ |
Data12 | Data20~ | Data28~ | Data36~ | Data44~ | Data52~ | Data60~ |
Data13~ | Data21~ | Data29~ | Data37* | Data45~ | Data53~ | Data61~ |
Data14~ | Data22~ | Data30~ | Data38~ | Data46~ | Data54~ | Data62*~ |
Data15~ | Data23~ | Data31~ | Data39~ | Data47~ | Data55~ | Data63~ |
<tbody>
</tbody>
Now in each cell if the last character is not ~ or if the 2nd last character is * it will give error in column A on the other sheet as:
Format Error in Row 1, Col D |
Format Error in Row 1, Col E |
Format Error in Row 2, Col E |
Format Error in Row 5, Col A |
Format Error in Row 6, Col A |
Format Error in Row 7, Col D |
Format Error in Row 8, Col G How can I acheive it through VBA. Also I want to expand the logic checking in Sheet1 eg. the length of each cell should be greater than 3 and if it is <=3 it will give an error statement in the next sheet. |
<tbody>
</tbody>