Thread: Macro Calls
View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
No Name
 
Posts: n/a
Default Macro Calls

Ichhat,

The macro seems to be an overkill for the task.
The following would do the job:

Say:
C is in Column A Row 1
A is in Column B Row 1
R is in Column C Row 1
S is in column D Row 1

In column E type this formula =A1&B1&C1&D

The ampersand & joins text together.

Jamal

the amph


-----Original Message-----

Hello,
I am looking for some help in merging 4 columns together

without losing
information in any colum:
i.e.
If I have C A R S in 4 different columns, I want the

fifth column
to say CARS.

I did some research online and came across this tip:
____________________________________
Sub Connects()
Dim intRow As Integer
Dim txt As String
intRow = 1
Do Until IsEmpty(Cells(intRow, 1))
Cells(intRow, 1) = Cells(intRow, 1) & " - " & Cells

(intRow, 2)
Cells(intRow, 2).ClearContents
Range(Cells(intRow, 1), Cells(intRow, 2)).Merge
intRow = intRow + 1
Loop
Columns(1).AutoFit
End Sub

_____________________________________

I inserted this into a Macro, but I have no idea on how

to call this
procedure. Can anyone please help??? Thanks.


------------------------------------------------
~~ Message posted from http://www.ExcelTip.com/
~~View and post usenet messages directly from

http://www.ExcelForum.com/

.