UCase function
Returns a Variant (String) containing the specified string, converted
to uppercase.
Syntax: UCase(string)
Example
Range A10 contain text data : "tOtaL Cost"
x = UCase(Left(Range("A10")),5)
return x = "TOTAL"
x = Left(Range("A10"),5)
returns x = "tOtaL"
comparing
UCase(Left(Rang
Thanks for the code... I am trying it out it all makes sense to me,
except "UCase" -- what is it? It's not a function... and when I run this
code , nothing happens -- can you explain a little more? Sorry, but I am a
novice...
On Wed, May 12, 2010 at 6:55 PM, siti Vi wrote:
> Sub Bla_Bla_Bla(
Sub Bla_Bla_Bla()
Dim MyRng As Range, n As Long
Set MyRng = ActiveSheet.UsedRange
For n = MyRng.Rows.Count To 1 Step -1
If UCase(Left(Trim(MyRng(n, 1)), 5)) = "TOTAL" _
Then MyRng(n + 1, 1).EntireRow.Insert
Next
End Sub
NOTE:
to insert a row you have to say the range o
