Rewriting each IF statement so that it is on a single line??

[nV138]

Hi, I have the following IF statement

If strMyOperation = "+" Then
Worksheets("Sheet1").Range("F10").Value = sngMy1stValue + sngMy2ndValue
End If

How can I write this on one single line

Putting "Worksheets("Sheet1").Range("F10").Value = sngMy1stValue + sngMy2ndValue End If right after the first statement does not work, any ideas??

would be very grateful

 

[Jonmo1]

Welcome to the board..

If you put it on a single line, you don't need the End If

Try

If strMyOperation = "+" Then Worksheets("Sheet1").Range("F10").Value = sngMy1stValue + sngMy2ndValue

 

[nV138]

It worked, Thank you so much

 

[Jonmo1]

Glad to help..

Note, that doesn't make your code any faster.
At least not to my knowledge..

Personally, I prefer to use the Block If Structure in longer more complicated codes.
It makes for easier reading in my opinion, particularly when you indent the If's and Loops and Withs..

If strMyOperation = "+" Then
    Worksheets("Sheet1").Range("F10").Value = sngMy1stValue + sngMy2ndValue
End If

The indents really make reading the code so much easier.