Selection Entirely In Names : Name « Excel « VBA / Excel / Access / Word

VBA / Excel / Access / Word
1. Access
2. Application
3. Data Type
4. Data Type Functions
5. Date Functions
6. Excel
7. File Path
8. Forms
9. Language Basics
10. Math Functions
11. Outlook
12. PowerPoint
13. String Functions
14. Windows API
15. Word
16. XML
Java
Java Tutorial
Java Source Code / Java Documentation
Java Open Source
Jar File Download
Java Articles
Java Products
Java by API
Photoshop Tutorials
Maya Tutorials
Flash Tutorials
3ds-Max Tutorials
Illustrator Tutorials
GIMP Tutorials
C# / C Sharp
C# / CSharp Tutorial
C# / CSharp Open Source
ASP.Net
ASP.NET Tutorial
JavaScript DHTML
JavaScript Tutorial
JavaScript Reference
HTML / CSS
HTML CSS Reference
C / ANSI-C
C Tutorial
C++
C++ Tutorial
Ruby
PHP
Python
Python Tutorial
Python Open Source
SQL Server / T-SQL
SQL Server / T-SQL Tutorial
Oracle PL / SQL
Oracle PL/SQL Tutorial
PostgreSQL
SQL / MySQL
MySQL Tutorial
VB.Net
VB.Net Tutorial
Flash / Flex / ActionScript
XML
XML Tutorial
Microsoft Office PowerPoint 2007 Tutorial
Microsoft Office Excel 2007 Tutorial
Microsoft Office Word 2007 Tutorial
VBA / Excel / Access / Word » Excel » Name 
Selection Entirely In Names
 
Public Sub SelectionEntirelyInNames()
  Dim Message As String
  Dim aName As Name
  Dim NameRange As Range
  Dim aRange As Range

  On Error Resume Next
  
  For Each aName In Names
    Set NameRange = Nothing
    Set NameRange = aName.RefersToRange
    If Not NameRange Is Nothing Then
      If NameRange.Parent.Name = ActiveSheet.Name Then
        Set aRange = Intersect(Selection, NameRange)
        If Not aRange Is Nothing Then
          If Selection.Address = aRange.Address Then
            Message = Message & aName.Name & vbCr
          End If
        End If
      End If
    End If
  Next aName
  If Message = "" Then
    MsgBox "The selection is not entirely in any name"
  Else
    MsgBox Message
  End If
End Sub

 
Related examples in the same category
1. Using named ranges of cells
2. Storing Values in Names
3. Store formulas into names. The formula must start with an equals sign (=).
4. use the Evaluate method equivalent to evaluate the name in VBA:
5. Hide a name by setting its Visible property to False
6. Hide the name after it has been created:
7. Searching for a Name
8. Searching for the Name of a Range
9. Determining which Names Overlap a Range
10. A name can also store the data stored in an array.
11. find out which names are overlapping the selected cells, regardless of whether they entirely contain the selected cells
12. specify that the Names collection belongs to a worksheet:
13. Adding Comments for a name
14. storing a formula in a name is the same as for a range
15. use names to store numbers between sessions
16. Checking for the Existence of a Name
17. Define a name by hard code the cell address
18. Select named range
19. Go to a name
20. Generate Range object from named range
21. Generate named range from Range object
22. Check Name existance
23. Is Name In Workbook
24. Names Overlapping Selection
25. Insert hidden name
26. Fill named range with values
27. Range objects cannot be used with an worksheet object as superobject
28. Enables access to named ranges in arbitrary workbooks
29. Using the Names Object to List All Named Ranges
30. Retrieving Values Stored as a Workbook Name Using the Evaluate Method
www.java2java.com | Contact Us
Copyright 2009 - 12 Demo Source and Support. All rights reserved.
All other trademarks are property of their respective owners.