Dear Experts:

This simple code snippet automatically creates names from values in
the left column of a selection

Sub CreateNames()
Selection.CreateNames Left:=True
End Sub

The built-in functionality is: Formulas - Create from Selection -
Create names from values in the left column.

For the macro solution to work, one must select cells from at least
two columns. Hence this simple macro should be re-written so that the
current selection of cells ( cells have been selected from just one
column) automatically gets extended to the right. For example: Current
selection A2:A5. The code snippet for the extension of the selection
should extend the selection to A2:B5.

Help is much appreciated. Thank you very much in advance.

Regards, Andreas

I wouldn't use CreateNames as the macro name -- it looks way too much like the
..CreateNames method for a range.

Option Explicit
Sub MyCreateNames()
Selection.Columns(1).Resize(, 2).CreateNames Left:=True
End Sub

The .columns(1) tells excel to just look at the first column in the selection.

The .resize(, 2) tells excel to include the adjacent column.



On 07/17/2010 14:18, andreashermle wrote:
> Dear Experts:
>
> This simple code snippet automatically creates names from values in
> the left column of a selection
>
> Sub CreateNames()
> Selection.CreateNames Left:=True
> End Sub
>
> The built-in functionality is: Formulas - Create from Selection -
> Create names from values in the left column.
>
> For the macro solution to work, one must select cells from at least
> two columns. Hence this simple macro should be re-written so that the
> current selection of cells ( cells have been selected from just one
> column) automatically gets extended to the right. For example: Current
> selection A2:A5. The code snippet for the extension of the selection
> should extend the selection to A2:B5.
>
> Help is much appreciated. Thank you very much in advance.
>
> Regards, Andreas
>

--
Dave Peterson

On 17 Jul., 22:00, Dave Peterson <peter...@XSPAMverizon.net> wrote:
> I wouldn't use CreateNames as the macro name -- it looks way too much like the
> .CreateNames method for a range.
>
> Option Explicit
> Sub MyCreateNames()
> * * *Selection.Columns(1).Resize(, 2).CreateNames Left:=True
> End Sub
>
> The .columns(1) tells excel to just look at the first column in the selection.
>
> The .resize(, 2) tells excel to include the adjacent column.
>
> On 07/17/2010 14:18, andreashermle wrote:
>
>
>
>
>
> > Dear Experts:
>
> > This simple code snippet automatically creates names from values in
> > the left column of a selection
>
> > Sub CreateNames()
> > * Selection.CreateNames Left:=True
> > End Sub
>
> > The built-in functionality is: Formulas - Create from Selection -
> > Create names from values in the left column.
>
> > For the macro solution to work, one must select cells from at least
> > two columns. Hence this simple macro should be re-written so that the
> > current selection of cells ( cells have been selected from just one
> > column) automatically gets extended to the right. For example: Current
> > selection A2:A5. The code snippet for the extension of the selection
> > should extend the selection to A2:B5.
>
> > Help is much appreciated. Thank you very much in advance.
>
> > Regards, Andreas
>
> --
> Dave Peterson- Zitierten Text ausblenden -
>
> - Zitierten Text anzeigen -

Hi Dave,

thank you very much for your greate support.

Regards, Andreas