Move parts of the text from one column to another

[zack8576]

I need to use VBA to move the first 3 characters from column O to in front of the text in column K, so in the example below
it should look like: J-7,4x8',Base,8"w,96"
appreciate your help !

 

[arthurbr]

Any chance you can post your data with XL2BB - Excel Range to BBCode

 

[zack8576]

Any chance you can post your data with XL2BB - Excel Range to BBCode

Order#

Str#

Quantity

Item#

Job Req'd?

Piece#

Job#

Price

Source

Weight

Description

PART - Height (Int)

PART - Catalog ID

MH - Spec

MH - Type

CF25684

BU-06 E INLET

1​

F22143J-54"

Yes

P1

F25684AI01

0​

Production

7387 lb

E Box,6"w

54"

54"

FDOT 425-052,001

E BOXES

CF25684

BU-06 E INLET

1​

No

P2

F25684AI02

0​

Production

2 lb

CHAIN & EYEBOLT

0"

2 @ 30"

FDOT 425-052,001

E BOXES

CF25684

BU-06 E INLET

1​

F906608

No

P3

F25684AI03

0​

Purchased

215 lb

USF 6608 GRATE

0"

FDOT 425-052,001

E BOXES

CF25684

BU-06 E INLET

1​

No

0​

Purchased

-964 lb

HOLE 42"

0"

FDOT 425-052,001

E BOXES

CF25684

BU-05A E INLET

1​

F22143J-54"

Yes

P1

F25684AM01

0​

Production

7387 lb

E Box,6"w

54"

54"

FDOT 425-052,001

E BOXES

CF25684

BU-05A E INLET

1​

No

P2

F25684AM02

0​

Production

2 lb

CHAIN & EYEBOLT

0"

2 @ 30"

FDOT 425-052,001

E BOXES

CF25684

BU-05A E INLET

1​

F03370

No

P3

F25684AM03

0​

Purchased

215 lb

USF 6608 GRATE

0"

FDOT 425-052,001

E BOXES

CF25684

BU-05A E INLET

1​

No

0​

Purchased

-964 lb

HOLE 42"

0"

FDOT 425-052,001

E BOXES

CF25684

BU-07D E INLET

1​

F22143J-66"

Yes

P1

F25684AN01

0​

Production

8662 lb

E Box,6"w

66"

66"

FDOT 425-052,001

E BOXES

CF25684

BU-07D E INLET

1​

No

P2

F25684AN02

0​

Production

2 lb

CHAIN & EYEBOLT

0"

2 @ 30"

FDOT 425-052,001

E BOXES

CF25684

BU-07D E INLET

1​

F03370

No

P3

F25684AN03

0​

Purchased

215 lb

USF 6608 GRATE

0"

FDOT 425-052,001

E BOXES

CF25684

BU-07D E INLET

1​

No

0​

Purchased

-1257 lb

HOLE 48"

0"

FDOT 425-052,001

E BOXES

CF25684

BU-08 E INLET

1​

F22143J-60"

Yes

P1

F25684AQ01

0​

Production

8025 lb

E Box,6"w

60"

60"

FDOT 425-052,001

E BOXES

CF25684

BU-08 E INLET

1​

No

P2

F25684AQ02

0​

Production

2 lb

CHAIN & EYEBOLT

0"

2 @ 30"

FDOT 425-052,001

E BOXES

CF25684

BU-08 E INLET

1​

F03370

No

P3

F25684AQ03

0​

Purchased

215 lb

USF 6608 GRATE

0"

FDOT 425-052,001

E BOXES

CF25684

BU-08 E INLET

1​

No

0​

Purchased

-725 lb

HOLE 36"

0"

FDOT 425-052,001

E BOXES

CF25684

BU-12A E INLET

1​

F21143J-48"

Yes

P1

F25684AO01

0​

Production

6750 lb

E Base,6"w

48"

48"

FDOT 425-052,001

E BASES

CF25684

BU-12A E INLET

1​

F21242J-24"

No

P2

F25684AO02

0​

Production

2550 lb

E Collar,6"w

24"

24"

FDOT 425-052,001

E BASES

CF25684

BU-12A E INLET

1​

No

P3

F25684AO03

0​

Production

2 lb

CHAIN & EYEBOLT

0"

2 @ 30"

FDOT 425-052,001

E BASES

CF25684

BU-12A E INLET

1​

F03370

No

P4

F25684AO04

0​

Purchased

215 lb

USF 6608 GRATE

0"

FDOT 425-052,001

E BASES

CF25684

BU-12A E INLET

1​

No

0​

Purchased

-1257 lb

HOLE 48"

0"

FDOT 425-052,001

E BASES

CF25684

DM-07H J MANHOLE

1​

F13210J-80"

Yes

P1

F25684AR01

0​

Production

23514 lb

4x8',Base,8"w

80"

80"

FDOT 425-010,001

J-7 STORM MANHOLE

CF25684

DM-07H J MANHOLE

1​

F13245R

No

P2

F25684AR02

0​

Production

3721 lb

TS,64x112",48"OS,TNG

8"

8"

FDOT 425-010,001

J-7 STORM MANHOLE

CF25684

DM-07H J MANHOLE

1​

F14448

No

P3

F25684AR03

0​

Production

2683 lb

MH,4'dia,Cone,Ecc,5"w

48"

48"

FDOT 425-010,001

J-7 STORM MANHOLE

CF25684

DM-07H J MANHOLE

1​

No

P4

F25684AR04

0​

Production

419 lb

ADJUSTMENT

6"

6"

FDOT 425-010,001

J-7 STORM MANHOLE

CF25684

DM-07H J MANHOLE

1​

F90170

No

P5

F25684AR05

0​

Production

150 lb

USF 170 RING

6"

6"

FDOT 425-010,001

J-7 STORM MANHOLE

CF25684

DM-07H J MANHOLE

1​

No

P6

F25684AR06

0​

Production

130 lb

USF CM COVER

0"

"C/O Orlando,The City Beautiful Storm,FL"

FDOT 425-010,001

J-7 STORM MANHOLE

 

[zack8576]

Any chance you can post your data with XL2BB - Excel Range to BBCode

This is a company computer and the add-on got blocked

 

[zack8576]

Any chance you can post your data with XL2BB - Excel Range to BBCode

data in column O look like these:

J-7 STORM MANHOLE J-8 STORM MANHOLE P-8 STORM MANHOLE E BASES data in column K always contain the word "Base"

 

[arthurbr]

So in your last column you have text like " e bases" or text starting with " J-7 ". What has to go where ? ( in your original picture only strings starting with J-7)

 

[zack8576]

take the J-7 as an example:
column K:

4x8',Base,8"w column O: J-7 STORM MANHOLE I just need the J-7 to go in front of the 4x8, like this J-7 4x8',Base,8"w

 

[zack8576]

I need to use VBA to move the first 3 characters from column O to in front of the text in column K, so in the example below
it should look like: J-7,4x8',Base,8"w,96"
appreciate your help !

View attachment 72536

This is what I have so far

Sub StructureID() 'Add structure ID to P1
     c4 As Range
     For Each c4 In rng
        If c4 Like "*Base*" Then
            c4 = c4.Offset(, 4) & "," & c4
        End If
     Next c4
End Sub