concatenate function in excel

[Al H]

i am trying to recall how to use the above mentioned function to plot suveyed points into CAD and it is wrecking my head:ouch:

 

i can get one point on but to add multiple points is beyond me at the moment

[Murph_map]

I have used the "Muliple" command along with the "Point" command and copy/paste to the command line the csv file.

[Mike_Taylor]

I have a custom command I had made in Excel at home for listing names in photos that include a space and comma. It could very easily be modified to remove the space and have just the comma in it making it ideal for exporting to a script.

 

I will post it when i get home for you to take a look at.

[ayethzerothree]

excel:

sample :

east value = 10000 north value = 200000

command : concatenate

click east value then (,) click north value [ be sure no space)

result = 10000,20000

do it for all your data that you want to paste on your drawing

 

sample result = 10000,20000

20000,40000

30000,60000

. . . . till the last value

 

then copy the result

 

 

on the drawing command line type polyline or pl only click 1 point on the screen then paste on the command line the value you have copy from excel.

 

and thats it. . .

 

hope it helps. . .

 

have a nice day

[mdbdesign]

If you know, how to use macro codes in Excel, it will be perfect for you.

Don't remember who write it for me (must be one of Excel forum)

This macro combine two column into one with space between merged items.

Is very easy to replace space with one you need (, . ; : ' "+-*/) using Find and Replace

One thing: THERE IS NO UNDO FOR THIS MACRO, save file before execute.

 

Sub ColumnsToMerge()
   Dim Rng As Range
   Dim Col_1 As Long, Col_2 As Long

   Set Rng = Selection
   Col_1 = Rng.Column
   Col_2 = Rng.Column + Rng.Columns.Count - 1
   MergeTwoColumns Col_1, Col_2

   Set Rng = Nothing

End Sub
Sub MergeTwoColumns(strCol_1 As Long, strCol_2 As Long)
   Dim LastRow As Long, RowNo As Long

   LastRow = Cells(Rows.Count, strCol_1).End(xlUp).Row

   For RowNo = 1 To LastRow
       Cells(RowNo, strCol_1) = Cells(RowNo, strCol_1) & Space(1) & Cells(RowNo, strCol_2)
       Cells(RowNo, strCol_2) = ""
       Columns(1).AutoFit
   Next
End Sub

 

BE CAREFUL WHEN WORKING WITH MACRO

[mdbdesign]

Code modify to use comma between merged items:

 

Sub ColumnsToMerge()
   Dim Rng As Range
   Dim Col_1 As Long, Col_2 As Long

   Set Rng = Selection
   Col_1 = Rng.Column
   Col_2 = Rng.Column + Rng.Columns.Count - 1
   MergeTwoColumns Col_1, Col_2

   Set Rng = Nothing

End Sub
Sub MergeTwoColumns(strCol_1 As Long, strCol_2 As Long)
   Dim LastRow As Long, RowNo As Long

   LastRow = Cells(Rows.Count, strCol_1).End(xlUp).Row

   For RowNo = 1 To LastRow
       Cells(RowNo, strCol_1) = Cells(RowNo, strCol_1) & "[color=red],[/color]" & Cells(RowNo, strCol_2)
       Cells(RowNo, strCol_2) = ""
       Columns(1).AutoFit
   Next
End Sub

 

Replace red colored symbol to one suit you if needed.

[BIGAL]

concatenate function in excel

 

Go to help for example

A1=1000 B1 =2000

but =concatenate(A1,",",B1)

note the "," is a comma in the string required A1,B1 would give 10002000

[mdbdesign]

The only inconvenience of this concatenate function is, that you req'd additional column to do it, one sometime lack of.

[WilliamClarke123]

Thanks Bigal. Your concatenate function works and it really helped me out.