Hi Greg,
How about ten names:
'==========>>
Public Sub Tester()
Dim WB As Workbook
Dim SH As Worksheet
Dim rng As Range
Dim i As Long
Const sStr As String = "Piggy"
Set WB = ThisWorkbook
Set SH = WB.Sheets("Sheet1")
Set rng = SH.Range("A1")
For i = 1 To 10
WB.Names.Add Name:=sStr & i, _
RefersTo:=rng.Address
Next i
End Sub
'<<==========
---
Regards.
Norman
"greg" <(E-Mail Removed)> wrote in message
news:uI%(E-Mail Removed)...
> Just currious.
> If I wanted to put 2 different named cells on a single cell. I use named
> cells to exchange information to other programs.
>
> I would not think this can be done. Haveing 2 different named cells.
> Would there be a way to trick excel into allowing something like this?
> Has anyone thought about this problem?
>
> thanks for any input
>
>
|