BLOG META

Excel - how to add a string after 2 or 3 position in columns

You need to write this macro in Visual Basic

 

Sub replaceat()

Dim rng As Range Dim

cl As Range

Set rng = Range(Selection.Address)

 

For Each cl In rng.Cells

cl.Formula = “=Replace(“”” & cl.Value & “”” ,3,0,””.””)”

Next

End Sub

 

Then you can execute it on any selection via the Developer > Macros menu

 

{"type":"main_options","images_arr":"'#ffffff'","enable_ajax":"off","soundcloud_apikey":"","bg_isparallax":"off","bg_slideshow_time":"0","bg_transition":"slidedown","site_url":"http:\/\/digitalzoomstudio.net","theme_url":"http:\/\/digitalzoomstudio.net\/wp-content\/themes\/qucreative\/","blur_ammount":"26","width_column":"50","width_section_bg":"","width_gap":"30","border_width":"0","border_color":"#ffffff","translate_cancel_comment":"Cancel reply","translate_leave_a_comment":"Leave a comment","translate_leave_a_comment_to":"Leave a comment to","is_customize_preview":"off","width_blur_margin":"30","gallery_w_thumbs_autoplay_videos":"off","enable_native_scrollbar":"on","content_enviroment_opacity":"30","menu_enviroment_opacity":"70"}
{"type":"darkfull"}