How to get VBA to ignore "blank" cells or cells with "text"

[mss90]

Im trying to get my script to ignore all blank cells or cells with text but I cant seem to manage.
I tried this but it didnt work;

Sub Knapp3_Klikk()

If IsError(myvalue = Application.Match(tosearch, Range("K1:K100"), 0)) Then
GoTo nextloop:
Dim olddeg As Range, newval As Double
For Each olddeg In Range("K2:K99999").CurrentRegion
newval = 360 + 90 - olddeg
olddeg.Offset(0, 0) = newval - (newval \ 360) * 360

Next olddeg

End Sub

Any idea?

Thanks

[jason.b75]

Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code.

Posting code between [CODE]Please [url=https://www.excelforum.com/login.php]Login or Register [/url] to view this content.[/CODE] tags makes your code much easier to read and copy for testing, it also maintains VBA formatting.

Highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found here



(This thread should receive no further responses until this moderation request is fulfilled, as per Forum Rule 7)

[mss90]

Please Login or Register  to view this content.

[jason.b75]

The intention was for you to edit your original post with code tags, but I guess that is close enough.

Not really following what you're trying to do from the snippet of code you've provided, assuming that you want to test olddeg for a numeric value, try

Please Login or Register  to view this content.

Not so sure that the use of CurrentRegion is a good idea though, you could quite easily end up running the code on incorrect columns.

[mss90]

Okay so I would like my angles to get converted from polar angles to North Azimuth system using the following code

Please Login or Register  to view this content.

But the code stops if any cells in column A contains text or if any of them are empty.
So I would like the script to ignore any cells with text or without any data and just continue from Cell A1 to A10000.
Sorry If my question wasnt clear. I hope this helps

Best regards

[jason.b75]

See if this works.

Please Login or Register  to view this content.

Using current region would also include any adjacent 'used' columns, for example if you had your data in column A, with a heading in B1 ready for the column of new values, then column B would be included in the current region. Subsequently the values that the code writes into column B would then be recalculated, and entered (incorrectly) into column C.

[mss90]

Awesome, your a lifesaver! Thanks

Regards