ByVal in excel is what in OOo

[village-idiot]

The following is OOo basic, it's part of the whole thing, I'm including only part because it's pretty long. I'm using it to high light a range (list11, 12 etc) when other cells are the active cell (M31, N31 etc). I'm using it in a worksheet to do Sudoko puzzles. In the other spread sheet program, it works fine, but in OOo the first range (list 11) is high lighted no matter what cell is active. If I make another cell active the other ranges aren't high lighted. When I open OOo basic to check a pop up says that there is a Basic Syntex error, unexpected symbol, and ByVal on the third line is high lighted. Is there another term to use instead of ByVal?
If it will help, I can e-mail both OOo and the other spread sheet to you, so you can see exactly what I'm talking about. Thanks in advance for any help, I don't know that much about OOo, I like to say I'm self taught and my teacher is an idiot.
village-idiot

Rem Attribute VBA_ModuleType=VBADocumentModule
Sub Sheet1
Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = x1None
Range("vstrip1").Interior.ColorIndex = 1
Range("vstrip2").Interior.ColorIndex = 1
Range("hstrip1").Interior.ColorIndex = 1
Range("hstrip2").Interior.ColorIndex = 1
rem
If Intersect(Target, Range("m31")) Is Nothing Then
Else
Range("list11").Interior.ColorIndex = 36
Rem
End If
Rem
If Intersect(Target, Range("n31")) Is Nothing Then
Else
Range("list12").Interior.ColorIndex = 36
Rem
End If
Rem
If Intersect(Target, Range("o31")) Is Nothing Then
Else
Range("list13").Interior.ColorIndex = 36
Rem
Rem End If
Rem
Rem If Intersect(Target, Range("m32")) Is Nothing Then
Rem Else
Rem Range("list14").Interior.ColorIndex = 36
Rem
Rem End If
Rem