Hi Guys!
I am looking for a very simple thing. A VBA code for splitting first three letters of a column to the column before (offset -1). For ex. if K column contains "SEKWPRTY6" then should be "SEK" in J column and "WPRTY6" should stay in K column still.
My 'Dim's are usually going like this
so I would be happy if you try to use same 'Dim's.
Thanks a lot!
I am looking for a very simple thing. A VBA code for splitting first three letters of a column to the column before (offset -1). For ex. if K column contains "SEKWPRTY6" then should be "SEK" in J column and "WPRTY6" should stay in K column still.
My 'Dim's are usually going like this
Code:
Dim cell As Range
[/FONT][FONT=Verdana]Dim bottomK As Integer[/FONT]
[FONT=Verdana]bottomK = Range("k" & Rows.Count).End(xlUp).Row[/FONT]
[FONT=Verdana]Dim rng As Range[/FONT]
[FONT=Verdana]Set rng = Range("K1:K" & bottomK)[/FONT]
[FONT=Verdana]For Each cell In rng[/FONT]
so I would be happy if you try to use same 'Dim's.
Thanks a lot!
Last edited by a moderator: