View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Wellie Wellie is offline
external usenet poster
 
Posts: 13
Default Value not shown on selected ActiveCell

I have the following code attached to a macro. The macro is associated to a
command button. When the command button is clicked, this macro will ve
invoked and the display/place the result into ActiveCell.

Problem I have is that the macro knows which is the active cell but unable
to place the value in there. Can someone please help to let me know where is
my problem ?
----------- Code Start ---------------
... Other codes ....
If ActiveCell.Column < 4 Then
MsgBox "Sorry! Invalud column selected. It must be on column D",
vbExclamation, "Column Error"
Exit Sub
End If
Select Case Cells(28, 3)
Case 0
ActiveCell.Value = ""
Range(Results_Cell) = ""
Case 1
ActiveCell.Value = ""
Range(Results_Cell) = ""
Case Else
ActiveCell.Value = "Hello" ' Test to see Hello will be place
in active cell.
'ActiveCell.Value = Item(Cells(28, 3) - 1
Debug.Print "Cell(" & ActiveCell.Row & "," & ActiveCell.Column &
")=" _
& Cells(28, 3) & " " & Item(Cells(28, 3) - 1)
End Select
----------- Code End ----------------