Try
Sub belle()
Dim oTextBox As TextBox
For Each oTextBox In ActiveSheet.TextBoxes
If oTextBox.Characters.Count = 0 Then oTextBox.Delete
Next oTextBox
End Sub
I don't get it.
At the top of the message list, above the column headings, are two preset filtering options—All and Unread.
When All is selected, every message in the current folder is shown in the message list.
When Unread is selected, only the unread...
This one workks
=IF(C2<=15000;C2*VLOOKUP(B2;A10:D12;3;0);(C2-15000)*VLOOKUP(B2;A10:D12;4;0)+15000*VLOOKUP(B2;A10:D12;3;0))
I want this something like this
=((B10-15000)*D10)+(15000*C10)