value of the active cell

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Is there a function that would allow me to get the value of the active cell?
like it is done in VBA: Activecell.value
thanks
 
Not a function, worksheet functions do not know what the active cell is, you
need event code for this

'This is worksheet event code, which means that it needs to be
'placed in the appropriate worksheet code module, not a standard
'code module. To do this, right-click on the sheet tab, select
'the View Code option from the menu, and paste the code in.



Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Me.Range("H10").Value = ActiveCell.Value
End Sub


--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)
 
Thanks That is what I thought.

--
caroline


Bob Phillips said:
Not a function, worksheet functions do not know what the active cell is, you
need event code for this

'This is worksheet event code, which means that it needs to be
'placed in the appropriate worksheet code module, not a standard
'code module. To do this, right-click on the sheet tab, select
'the View Code option from the menu, and paste the code in.



Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Me.Range("H10").Value = ActiveCell.Value
End Sub


--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)
Click to expand...
 
You must log in or register to reply here.

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Add a new row in Named Table (Table1) and add data from txtboxes into last empty cells based on header named of the Table1 0
VBA Excel - Select a value from one cell in Excel to update a SQL table 1
Excel VBA 1
Excel How to capture data to a specified excel sheet(first workbook) of two different workbooks from the 0
Excel code, end function? 0
loop until empty row and column problem (format cells until the lastrow and column in a report) 2
Run-time error 1004: Unable to set the left property of the OLEObject class 0
Retrieving values from another sheet 1

Back
Top