Target and Concatenate

[Perriraz]

Dear all,

I having two problems in my vba code, first:
I want to a cell assumes the formula (concatenate)
Worksheets(New_Calc).[A1].Formula = "=CONCATENATE(" & Target.Offset(0, -1) & "," & ") " & "," & Target & ")"

Second:
I having problems with my code when I change values of 2 or more cells at same time, the line of the problem is:
If Application.Intersect(Target, Planilhas) Is Nothing Or Target.Value() = Empty Then

Could some one help?

[HaHoBe]

Hi, Perriraz,

you should either show all the code you use or even better attach a sample workbook - I canīt figure out why you use VBA code and a formula instead of writing the values to the A1 and if you use the SelectionChange or Change-Event (on one or more worksheets).

For the second problem maybe use

Please Login or Register  to view this content.

and narrow the range down by Intersect to the range to be monitored.

Ciao,
Holger