Home | Contact Us | FAQ | Search & Site Map | Link to Us
Sign In | Join | Other 45 Sites in Network
Home
DiscussionsAccessExcelInfoPathOutlookPowerPointPublisherWord
DirectoryUser Groups
Related Topics
Outlook ExpressInternet ExplorerWindowsMS Server ProductsMore Topics ...

MS Office Forum / Excel / Programming / September 2007

Tip: Looking for answers? Try searching our database.

How do I display cell name with Msgbox?

Thread view: 
Enable EMail Alerts  Start New Thread
Thread rating: 
nomail1983@hotmail.com - 17 Sep 2007 09:58 GMT
As I said before, I left my VBA programming book at home.  So I'm
flying blind.  Sorry for the rudimentary questions.

How do I display the cell name with Msgbox?

For example (pseudocode):

function myfunc(arg)
if TypeName(arg) = "Range" then
  for each cell in arg
     Msgbox cell.Name
  next
end if
end function
I.R;)) - 17 Sep 2007 10:16 GMT
On 17 ruj, 10:58, "nomail1...@hotmail.com" <nomail1...@hotmail.com>
wrote:
> As I said before, I left my VBA programming book at home.  So I'm
> flying blind.  Sorry for the rudimentary questions.
[quoted text clipped - 10 lines]
> end if
> end function

In VBA editor you must DBLClick on sheet (no module), for example
"Sheet1" and paste this source

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
MsgBox (Target.Address)
End Sub
nomail1983@hotmail.com - 17 Sep 2007 11:05 GMT
> On 17 ruj, 10:58, <nomail1...@hotmail.com> wrote:
> > How do I display the cell name with Msgbox?
> [....]
> MsgBox (Target.Address)

Perfect!  Thanks.
I.R;)) - 17 Sep 2007 11:14 GMT
On 17 ruj, 12:05, "nomail1...@hotmail.com" <nomail1...@hotmail.com>
wrote:

> > On 17 ruj, 10:58, <nomail1...@hotmail.com> wrote:
> > > How do I display the cell name with Msgbox?
> > [....]
> > MsgBox (Target.Address)
>
> Perfect!  Thanks.

No problemo!!!!
Mike H - 17 Sep 2007 10:22 GMT
Hi,

Sub ListNamedRanges()
   Dim objName As Name
   For Each objName In ThisWorkbook.Names
       MsgBox objName.Name & objName.RefersTo
   Next
End Sub

Mike

> As I said before, I left my VBA programming book at home.  So I'm
> flying blind.  Sorry for the rudimentary questions.
[quoted text clipped - 10 lines]
> end if
> end function
Bill Renaud - 18 Sep 2007 05:33 GMT
Looks like it's about time to start learn to use the Object Browser, and
the Locals and Immediate windows in the VBA editor. (Most of my VBA
books stay on the shelf anymore also.)

Since you know that you are probably looking for a property or something
that is related to a Range, open up the Object Browser (<F2> key), then
type Range into the "Search Text" combo box. You could also choose
"Excel" in the "Project/Library" combo box right above it to limit the
search. Search Results will show a table with the first column being
"Library", the next being Class, and the last being Member. Click on the
row that has Excel in the Library column and Range in the Class column.
2 list boxes below the "Search Results" will show Classes and Members of
'Range'. Select "Range" in the Classes list box, then scroll up and down
the list of Members in the list box to the right. Notice that "Address"
is one of the Members. Click on it and see the arguments, return type,
and read/write status in the gray area at the bottom.

Alternatively, type in a quick demo routine, like below:

Public Sub Test()
 Dim rng As Range

 Set rng = ActiveCell
End Sub

Single-step through the routine, until reaching the End Sub line. In the
locals window, open up the "rng" object and see if you can find any
properties that look like they might give you what you want.

Also, open up the Immediate window, and type in the following (after you
type the period, auto-data members should bring up a drop down box so
the "Address" can be selected without having to type it all (be sure to
include the "?" at the front end):

?rng.Address

After pressing Enter, the VBA run-time will return the current result:

$A$1

Maybe this is what you are looking for? Try different properties (edit
the original line) until you see something interesting, then use Help to
get the usage details.

Sorry if this reply is sounds condescending, but we all (including
me!!!) need to get better at looking up stuff using all of the online
resources! I realize Microsoft didn't explain the VBA environment very
well or how to use the editor features to the fullest extent. It took me
quite a while to learn them also!!!
Signature

Regards,
Bill Renaud

 
Sign In
Join
My Latest Posts
My Monitored Threads
My Blog
My Photo Gallery
My Profile
My Homepage

Start New Thread
Enable EMail Alerts
Rate this Thread



©2008 Advenet LLC   Privacy Policy - Terms of Use
This website includes both content owned or controlled by Advenet as well as content owned or controlled by third parties.